Dynamisches SQL in einem CL erstellen

[sinclair]

Danke für den Tipp.
Das habe ich mal so umgesetzt!
Zähle ich also ab Stelle 55 zurück bis zum nächsten Blank, dann trenne ich und fülle die nächste Variable.

Einziger Nachteil: Ich kann keine Blanko-Ausdrücke wie z. B. ' abcde ' mehr verwenden, jedenfalls nicht, ohne unsicher zu sein, dass so ein String mit Blanks nicht wieder richtig zusammen gesetzt wird (SETVAR-Trim schnibbelt allles hinweg).

Naja, kann man ja mit leben.

[Fuerchau]

Die Alternative wäre nur noch ein ILERPG mit dynamischem SQL:

d MyStmt 10000 varying

exec sql prepare MyStmt from : MyStmt;
exec sql execute MyStmt;

oder REXX.

[sinclair]

Aber das QM-QRY hat schon seine Vorteile v.a . bei der Anzeige einer Select-Klausel, oder beim *PRINT/*OUTFILE.

(Ich verwende das Command gern in Jobs um z. B. Fehlerlisten auszudrucken, da man weder Printerfile noch Druckpgm braucht).

Für UPDATE/INSERT/DELETE-Anweisungen werde ich diese Überlegung per embedded-SQL aber im Hinterkopf behalten!

REXX kenn ich nur von Hörensagen! Was wäre denn der Vorteil davon?

Gruß

[Fuerchau]

Nun ja, REXX kann auch keinen Select ausgeben.

Die Alternative zu diesem Verfahren geht auch noch über einen weiteren Umweg.
Der CRTQMQRY kann eine Quelle in einen QM-Query umsetzen, also mit einem kleinen RPG'le eine SRC schreiben und dann das QM-Query erstellen.
Dynamischer gehts dann wohl kaum noch und du hast dann alle Freiheiten.

Kleines Manko am Rande:
QM-Query kann nur max. 255 Felder als endgültige Ausgabe, zumindest bekomme ich eine entsprechende Meldung.

Und noch ein Tipp (Eigennutz )
Mit meinem SQLCPY kann man auch ne Menge machen.