Dynamisches SQL in einem CL erstellen

[Sony]

Hallo zusammen

Ich möchte in einem CL ein SQL Statement (INSERT) ausführen und einen Parameter mitgeben.

Ist das möglich?

Folgendes habe ich schon probiert:

1. Mit RUNSQLSTM kann ich zwar mein SQL Statement ausführen, aber keinen Parameter mitgeben.

2. Mit STRQMQRY kann ich zwar einen Parameter mitgeben, aber kein INSERT Statement ausführen.

3. Mit STRQSH oder QSH kommt nach Ausführung des SQL Befehls immer ein Terminalfenster, welches nicht erscheinen sollte.

4. Den Befehl RUNSQL findet das CL gar nicht.

Ich bin für jede Hilfe dankbar.

Viele Grüsse,

Sony

[Pikachu]

Sieh mal nach, ob du im STRQMQRY die SQL-Anweisung INSERT verwenden darfst: STRQM, dann Auswahl 10 "Mit Query Manager Profilen arbeiten", dann dein Benutzerprofil mit 2=Ändern auswählen. Dann bis zur letzten Seite blättern und dort bei "Zulässige SQL-Anweisungen auswählen" ein J=Ja eingeben. Hier kannst du die SQL-Anweisung INSERT zulassen. Danach sollte ein INSERT mit STRQMQRY gehen.

[Sony]

Hallo Pikachu

Vielen Dank. Den INSERT kann ich jetzt verwenden.

Kannst du mir noch sagen, wie die Syntax im QMQRY für die Variable aussehen soll?

Mit folgendem Aufruf erhalte ich den Fehler QWM2701:

CL:
STRQMQRY QMQRY(BIBLIOTHEK/ABFRAGE) SETVAR((VARIABLE &WERT))

QMQRY:
INSERT INTO....
WHERE DBFELD = &VARIABLE

Danke und Gruss,

Sony

[kuempi von stein]

Hello,

hab hier nen Zettel, da steht das so drauf:

#1) SQL-Source mit SEU erstellen.
Beispiel:

insert into....where dbfeld = &var1 

#2) Die Abfrage mit CRTQMQRY erstellen

#3) Die Abfrage mit STRQMQRY ausführen.

k.

[Pikachu]

Wenn &WERT eine Zeichenkette ist, dann musst du diese im CL mit Anführungszeichen umgeben und dann so als Variable übergeben. Z.B. CHGVAR VAR(&WERTS) VALUE('''' *CAT &WERT *TCAT '''') und dann &WERTS anstelle von &WERT als Variable übergeben.

[Sony]

Super hat geklappt!

Vielen Dank für die Hilfe.

[Fuerchau]

Es gibt da noch einen kleinen Trick.
QMQRY interpretiert den SQL erst nachdem die Variablen gefüllt sind.
Der Inhalt jeder Variable kann bis zu 55 Zeichen lang sein.
Nun kann man also einfach einen QMQRY erstellen:

&V1&V2&V3&V4&V5

Per CLP kann der SQL nun in einer Variablen zusammengebaut werden.
Per "
STRQMQRY ... SETVAR((&V1 (%SST(&MYCLVAR 1 55)) (&V2 (%SST(&MYCLVAR 56 55)) ....)
kann dann jeder beliebige SQL übergeben werden.

Die QM-Berechtigungsprüfung wird somit umgangen, da diese nur beim QMQRY selber vorgenommen wird.
Zur Laufzeit geht QMQRY davon aus, dass diese Prüfung bereits erfolgt ist.

Je nachdem, wie lang der SQL werden kann, soviele Variablen werden benötigt. Aber Achtung: alle Variablen müssen angegeben werden, sie können aber Leerzeichen enthalten.

[alfredo]

Ich mach es mit einem Mini RPG-Programm

C/EXEC SQL
C+ EXECUTE IMMEDIATE :SqlStmt
C/END-EXEC

[schatte]

Hallo,

Ich habe hier ein Savefile mit dem entsprechenden Objekten. Dort enthalten ist das entsprechende Programm, um ein SQL in einem CL auszuführen.
Das Savefile kann ab V3R2M0 rückgesichert werden. Wer interesse hat, bitte bei mir melden. Eigentlich wollte ich die Datei hier hochladen, aber das hat leider nicht geklappt.

Viele Grüße und frohe Weihnachten wünscht euch
Matthias

[Andreas Herzfeldt]

Hallo Matthias, ich wäre an dem SAVF interessiert. Könntest Du den an herzfeldta@toepfer.com senden ?

MFG
Andreas

[RLPforum]

Hallo Matthias, ich wäre auch an dem SAVF interessiert. Könntest Du den an mrzik@tddk.de senden ?

MFG
mrzik

[Proggi]

Hallo Matthias, kannst Du mir das SAVF auch bitte zuschicken, kalle100@web.de