Re: Error Message

[Mike.Barton@xxxxxxxxxxxx]

>Hi -  I would like to be able to Monitor for this message: CPA5877 'Contact not
successful on Controller...'. Is this >possible with a regular MONMSG? I tried
it, but it didn't pick it up.

Phil
     not all messages can be monitored using the std MONMSG in a cl program as
the
messages got to QSYSOPR instead.
One way to handle these is to do the following.
This will set the message to auto-answer with a Cancel.

RTVJOBA    INQMSGRPY(&IM)
CHGJOB     INQMSGRPY(*DFT)

CRTMSGF    MSGF(QTEMP/QCPFMSG)
OVRMSGF    MSGF(QCPFMSG) TOMSGF(QTEMP/QCPFMSG)

MRGMSGF FROMMSGF(QSYS/QCPFMSG) TOMSGF(QTEMP/QCPFMSG) SELECT(CPA5877)

CHGMSGD MSGID(CPA5877) MSGF(QTEMP/QCPFMSG) DFT(C)


{ your code here }


CHGJOB     INQMSGRPY(&IM)


+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---