Difference between revisions of "Information Systems:EOM"

From uniWIKI
Jump to navigation Jump to search
 
m
 
(3 intermediate revisions by 2 users not shown)
Line 13: Line 13:
 
/* RUN ASW PROCESSING */
 
/* RUN ASW PROCESSING */
 
 
CALL PGM(EOMASW)
+
CALL PGM([[EOMASW]])
 
 
 
/* send email that daily overnight process is ending */
 
/* send email that daily overnight process is ending */
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]]
  +
[[Category: Articles containing mostly code]]

Latest revision as of 10:00, 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)