Dateien bleiben in RPGLE offen

[cbe]

Hallo,

weiß eigentlich jemand, warum meine Dateien, die ich mit fetch in einem RPGLE-Pgm lese, offen bleiben?


C/exec sql
+ declare chkbtc_sq1 dynamic scroll cursor for
+ select * from chkbtc
+ for read only
C/end-exec

C/exec sql
+ open chkbtc_sq1
C/end-exec
...
C/exec sql
+ fetch next from chkbtc_sq1 into ...
C/end-exec
...
C/exec sql
+ close chkbtc_sq1
C/end-exec


Gruß
Christian

[Fuerchau]

Nun, so ist das mit den SQL-Optimierungen. Da dieser Zugriff wieder gebraucht werden könnte, wird der Cursor eben nicht geschlossen.
Erst wenn das Programm beendet ist, die Verbindung zur DB von SQL geschlossen wird, werden auch die Cursor endgültig geschlossen.
Siehe auch entsprechende Hinweise im Joblog mit STRDBG.

[cbe]

es funktioniert jetzt, danke!

Der Tip mit dem STRDBG ist prima.