With one main CL as control batch, the system can send e-mail when a MSGW in WRKACTJOB occurs. This also works with a message on cell phones that have message access. Every 3 min. (DLYJOB) Code one is activated and searches for messages. Code two then will copy the text to a spoolfile, which can be searched for strings and send to a physical file. If data exists, Code three will send the message to required personnel. (Parameters can help in decision making).
1. DSPMSG MSGQ(QSYSOPR) OUTPUT(*PRINT) MSGTYPE(*INQ) ASTLVL(*BASIC)
2. CPYSPLF FILE(QPDSPMSG) TOFILE(FILENAME) SPLNBR(*LAST)
3. SNDDST TYPE(*LMSG) TOINTNET((EMAIL@TEST.COM)) DSTD(MSGW) MSG(JOBNAME) LONGMSG('DETAILED message')