Re: Exception message in Joblog

["Leif Svalgaard" <leif@xxxxxxxx>]

From: Dave McKenzie <davemck@galois.com>
To: <MI400@midrange.com>
Sent: Monday, January 08, 2001 2:29 PM
Subject: Re: Exception message in Joblog


> Now I'm confused again (not unusual :-)
> The MODEXCP can be used to turn exception monitors on (handle) and off
> (skip),
> plus several other states (ignore, resignal, defer).  Are you saying
> that
> originally you didn't have a MODEXCP and it caught the exception, but
> still put
> the MCH1202 in the joblog?  If that's the case, I don't have an
> explanation.

Yes that's what I'm saying. The following program
ends up at BAD as it should and puts a "decimal data error"
message in the job log.

DCL DD XX CHAR(20);
DCL DD NN PKD(5,0) DEF(XX) POS(1);
DCL EXCM * EXCID(H'0C02') BP(BAD) CV("MCH");
    CPYBREP XX, " ";
    ADDN(S) NN,1;
BRK "GOOD";
    RTX *;
BAD:
BRK "BAD";
    RTX *;
PEND;


+---
| This is the MI Programmers Mailing List!
| To submit a new message, send your mail to MI400@midrange.com.
| To subscribe to this list send email to MI400-SUB@midrange.com.
| To unsubscribe from this list send email to MI400-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: dr2@cssas400.com
+---