Kontrollierter Abbruch in COBOL

[Fuerchau]

Whenever an implicit or explicit STOP RUN occurs, the Languages and Utilities return code is set to 0. Otherwise, it is set to 2. The RETURN-CODE register is copied to the user portion of the work control block. See the RTVJOBA and DSPJOB commands in the

CL Programming book for more information about return codes.

M.a.W: Der Return-Code ist im CLP per RTVJOBA abfragbar.
Ist der Aufrufer ein COBOL-Programm, kann dieses direkt auf den RETURN-CODE zugreifen.
Es wird kein Fehler ausgelöst.

QMHSNDPM ist nicht unbedingt eine Lösung, da eine ESC-Nachricht auch zu einer Nachricht führt, wenn sie nicht per MONMSG überwacht oder automatisch beantwortet wird.

[BenderD]

... das ist doch genau das, was ich erreichen will: die aufrufende Funktion wird zu error handling gezwungen, sonst endet sie selber irregulär!
D*B

[SIZE=2]

QMHSNDPM ist nicht unbedingt eine Lösung, da eine ESC-Nachricht auch zu einer Nachricht führt, wenn sie nicht per MONMSG überwacht oder automatisch beantwortet wird.

[/LEFT]