Nachrichtenbehandlung nach QCMDEXC in COBOL/400

[Ralle]

Ich mein mich zu erinnern je nach Compiler-Stand gibt es nach dem Parameter noch den Befehl ["ON OVERLOW" imperative-statment]. Mit dem imperative-statment könnte dann man verzweigen oder andere error-Routinen anstoßen.
vielleicht hilfst ...
Gruß

[Fuerchau]

Wird ein Hochkomma als Literal benötigt, so ist es zu verdoppeln:

10 FILLER PIC X(012) VALUE 'SNDMSG MSG('''.

Ralle hat natürlich Recht:

CALL 'QCMDEXC' USING PARM-1 PARM-2
on error mach was
end-call