PDA

View Full Version : embedded SQL - Tabelle leeren



jogisarge
22-04-09, 16:11
Hallo zusammen,

ich versuche mit folgendem Code:


Halwnull(*usrctl)
H DEBUG DECEDIT('0,') DATEDIT(*DMY.)
C/EXEC SQL
C+ DELETE FROM adrlogp
C/END-EXEC
c eval *inlr = *on

eine Datei zu leeren, aber es passiert nichts.
Das Programm lässt umwandeln und aufrufen, aber es tut sich nichts.
Die Datei wird nicht geleert.
Der Code steht in einem ILE-RPG (SQLRPGLE)

Interaktiv in STR geht das aber SQL ??

RobertMack
22-04-09, 17:19
...mit COMMIT(*NONE) übersetzt?

jogisarge
22-04-09, 17:30
oh mann,

vielen dank !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!

B.Hauser
22-04-09, 19:04
Hallo,

ich würde mir angewöhnen in jede Quelle, in der embedded SQL verwendet wird ein SET OPTION-Statement, über das Compile Optionen wie z.B. Commit gesetzt werden, einzufügen:


C/EXEC SQL
C+ SET OPTION Commit = *None, DatFmt = *ISO, CloSQLCsr = *ENDACTGRP
C***** evt. weitere Optionen
C/END-EXEC

* Sonstiger Source Code und embedded SQL statements.



Birgitta