Difference between revisions of "Information Systems:EOM"
Jump to navigation
Jump to search
m |
|||
| (One intermediate revision by the same user not shown) | |||
| Line 21: | Line 21: | ||
CHGVAR VAR(&LMSG) VALUE(&SMSG) |
CHGVAR VAR(&LMSG) VALUE(&SMSG) |
||
CALL PGM(OPMSGSEND) PARM(&SMSG &LMSG) |
CALL PGM(OPMSGSEND) PARM(&SMSG &LMSG) |
||
| + | |||
| + | [[Category:Overnight Processing]] |
||
Revision as of 09:59, 20 July 2016
/* send email that daily overnight process is starting */
CHGVAR VAR(&SMSG) VALUE('Monthly processing is +
starting')
CHGVAR VAR(&LMSG) VALUE(&SMSG)
CALL PGM(OPMSGSEND) PARM(&SMSG &LMSG)
/* MAKE SURE LIBRARY LIST IS CORRECT */
ADDLIBLE LIB(DOCMGRCMD)
ADDLIBLE LIB(UNIPHARMIT)
/* RUN ASW PROCESSING */
CALL PGM(EOMASW)
/* send email that daily overnight process is ending */
CHGVAR VAR(&SMSG) VALUE('Monthly processing is +
ending')
CHGVAR VAR(&LMSG) VALUE(&SMSG)
CALL PGM(OPMSGSEND) PARM(&SMSG &LMSG)