Hallo,

wir haben ein CL-Programm aus dem ein RUNSQL aufgerufen wird, um eine Datei zu löschen. Dieser Job läuft einmal monatlich währen des laufenden Betriebes. Bis voriges Monat hatten wir damit keine Probleme, doch jetzt geht gar nix mehr. Bekommen ein LOCKWaiting obwohl wir am Programm nichts geändert haben.

Folgender CL-Code:
*10772*/ CHGVAR VAR(&STMT) VALUE('DELETE FROM LEABS1')
/*10772*/ RUNSQL STMT(&STMT)
/*10772*/ CPYFRMIMPF FROMSTMF('/home/updbs1.dat') +
TOFILE(LEA/LEABS1) MBROPT(*ADD) +
RCDDLM(*CRLF) STRDLM(*NONE) FLDDLM(&TAB)
/*11468*/ CHGVAR VAR(&STMT) VALUE('DELETE FROM LEA/LEABS1 +
WHERE BACASTELLE > 09999')
/*11468*/ RUNSQL STMT(&STMT)
CHGVAR VAR(&MSG) VALUE('Update LEABS1 durchgef +
ührt, Sicherung LEABS1SAV')
SNDPGMMSG MSG(&MSG)


Hat irgendjemand eine Idee???
LG