SQL: ODP innerhalb eines Moduls löschen?

[claudia_669]

Damit könnte es zu tun haben.

Mein SQL sieht aus wie folgt:

EXEC SQL Prepare S1 from : mstfSqlStm ;
EXEC SQL Declare C1 Cursor for S1 ;
EXEC SQL Open C1 ;

DoU SqlCod <> 0 ;
EXEC SQL Fetch c1 into : mstfSqlData ;
If SqlCod < 0 ;
Iter ;
Endif ;
If SqlCod = 100 ;
Leave ;
Endif ;
// hier: Fill Subfile ...
Enddo ;

EXEC SQL
Close C1 ;

Aus der Subfile wird danach entsprechend ein Datensatz zur Bearbeitung ausgewählt, z.B. ein Update, das über ein Serviceprogramm erfolgt, in dem die Datei in den F-Bestimmungen so definiert ist:
FDatei UF A E Disk UsrOpn Commit(mblnCmtCtl),
d.h. optional mit Commit-Steuerung.
Dieser Schalter ist in meinem Fall aber auf aus gesetzt und ein Update erfolgt auch auf dem Satz.
Lt. Debugger komme ich aus diesem Serviceprogramm daher OHNE Sperre wieder heraus und erst das dann folgende erneute Einlesen der Subfile per SQL setzt dann die Sperre, die durch das Close nicht mehr aufgehoben wird.

Hast Du hierzu eine Idee, ob da die Ursache liegt?

[claudia_669]

Ohje, mea culpa.

Zwar ist es tatsächlich so, dass bei der ersten Ausführung der ODP wieder gelöscht wird und beim zweiten Mal nicht mehr und das "Satzsperren" (read) stehen bleiben, aber das hat nicht mein Problem verursacht, dass ich danach keine Löschoperation auf dem Satz ausführen konnte, sondern der Fehler lag in der delete-Funktion an sich.

Vielen Dank für die Bemühungen und sorry für die "Fehlanfrage"!

Claudia

[andreaspr@aon.at]

Nur noch zum Verständnis. Der ODP KANN und DARF nicht vom Benutzer/PGM gelöscht werden. Das macht die DB2 von sich aus!

Ein offener ODP setzt auch keine Satzsperren!

Der ODP wird von der DB2 aufgehoben, um Abfragen beschleunigen zu können. Auch wenn der ODP nicht gelöscht wird, werden beim nächsten OPEN dennoch die aktuellen Daten gelesen (auch ohne Sesitive).

Einzig in der QAQQINI kann definiert werden wieviele ODPs maximal pro Job erhalten bleiben dürfen.

lg Andreas