... a reverse MONMSG.

A way of executing code if a specific message is NOT encountered.

For example:

CHKOBJ OBJ(&LIBNAM/&OBJNAME) OBJTYPE(*PGM)
MONMSG NOTMSGID(CPF9801) EXEC(<do something>)

david





Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2015 by MIDRANGE dot COM and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available here. If you have questions about this, please contact