Das deutet ggf. auf ein IBM-Problem hin.
Ich denke du musst da eine Fehlermeldung abgeben.

Ansonsten kann man fast alles mit einer Monitor-Gruppe abfangen:

monitor;
MachWas...;
on-error *all;
//Fehlercodes in SDS
endmon;