Create table lib/file as ...

[B.Hauser]

Mach das SQL-Statement dynamisch und fühere es mit EXECUTE immediate aus. Etwas in die Richtung:

D  MySQLStmt     S            1024A   Varying

 /Free
    MySQLStmt = 'Create Table QTEMP/MYTABLE +
                     as (Select ..... +
                           From ... +
                           Where     MyFld1 = '   + %Char(MyNumVar) +
                               ' and MyFld2 = ''' + MyCharVar + ''' +
                                 and ... ) +
                 With Data';

    Exec SQL Execute immediate :MySQLStmt;
 /End-Free

Birgitta

[Robi]

Hallo Birgitta,
sowas wollt ich vermeiden
die Lesbarkeit und die Pgm Pflege wird so zum Horrortrip.

Wir würden beim Kunden viel mehr mit SQL machen, wenn ich die das SQL Ergebnis einfach in eine Datei umleiten könnte.
(zusätzlich)
Da sowol beim fetch als auch bei massen Updat's
Zum Testen Schalter setzen und dann prüfen ob die verwendeten Sätze die richtigen sind.
Bisher machen wir das vorwiegend interaktiv aber kopier mal 3 Seiten strukturiert geschriebennen Code aus einem Pgm in eine interaktive Sitzung.
(oder umgekehrt)
Anschließend müssen noch die Host-Variablen gesetzt oder entfernd werden

Ich hab das jetzt gemacht, und es funzt erstmal, Danke
Gruß
Robi

[B.Hauser]

Zerlegt Ihr eure komplexen Abfragen nicht in Views und setzt dann nur noch die Where-Bedingungen dazu.

Views können verschachtelt werden. (Ich hab' teilweise Views, die 4 oder 5fach verschachtelt sind).

Da Views keine Schlüssel haben kosten Sie beim Insert/Update und Delete von Datensätzen keine Performance, d.h. du kannst buchstäblich tausende von Views haben ohne irgendwelche Performance-Einbußen.

Die Views könnt Ihr dann sowohl in die Programme einbinden als auch zum Testen verwenden.
... und sofern sich die View ändert, braucht wahrscheinlich noch nicht einmal das Programm angepasst werden.
... und alle SQL Interfaces (incl. Query/400 und Download auf PC) können die Views verwenden.

Wahrscheinlich braucht ihr dann noch nichteinmal temporäre Dateien.

Birgitta