commitment control mit autom. rollback? [Archiv]

View Full Version : commitment control mit autom. rollback?

rebe

11-03-03, 13:40

Hallo,

ich habe folgendes Problem:

In einem CL-Programm wird ein
STRCMTCTL LCKLVL(*ALL) CMTSCOPE(*JOB) gemacht, danach mit SBMJOB ein Cobol-Programm gestartet. In diesem Cobol-Programm ist ein I-O-CONTROLL mit COMMITMENT CONTROLL für verschiedene ph.Dateien. Wenn das Cobol-Programm mal mit MCH1202 abbricht und ich die Nachricht mit 'C' beantworte, wird nicht automatisch ein Rollback gemacht.
Warum nicht? Wozu dann das Ganze??

Ein etwas ratloser AS400-Programmierer.

Danke für viele Tipps.
Reiner

RobertMack

11-03-03, 14:19

Hallo Reiner,

durch den SBMJOB entsteht ein eigener Job!

Du solltest das CL submitten und dort nur
noch den CALL auf das Cobol-Pgm ausführen...

Gruß Robert

rebe

11-03-03, 14:34

Hallo Robert,

da habe ich mich vertan.

Es wird ein CL-Programm aufgerufen, dieses ruft per SBMJOB ein anderes CL-Programm auf, hier wird STRCMTCTL gemacht und dann per Call das Cobol-Programm gestartet.

Sorry, für diesen Beschreibungsfehler.

Reiner

RobertMack

11-03-03, 14:43

okay,

in diesem Falle fängst Du den (misslungenen)
Call mit MONMSG ab (am besten CPF0000, d.h.
alle evtl. Probleme) und codierst den
ROLLBACK dort ...

viel Erfolg,

Robert