Danke Dieter,

wär schön gewesen, wenn's so einfach wäre.

Hier ein Debug-Screenshot von meinem Programm:

================================================== ===============
Modulquelle anzeigen

Programm: KDANL106 Bibliothek: WR_DOK Modul: KDANL106
229 Exec SQL
230 Declare $SQLC2 Cursor For
231 Select *
232 From EDERAS01.BDLT.VRSSTABK;
233 //
234 // Ö f f n e Datei aus SQL-Abfrage
235 //
236 Exec SQL
237 Open $SQLC2;
238 //
239 // L a d e jeden gefundenen Satz in Arbeitsbereich
240 //
241 dow sqlcod = 0;
242 //
243 Exec SQL
Weitere ...
Testhilfe

F3=Programm beenden F6=Unterbrechungspunkt hinzufügen/löschen F10=Step
F11=Variable anzeigen F12=Wiederaufnehmen F24=Weitere Tasten
SQLCOD = -000000084.

================================================== ===============

Any ideas ?