Information Systems:Overnight EODEMAIL

Tape 999999 used for Power8 backup

This message is not sent until 8:00AM, as it has to wait for Catapult to be available. Catapult builds this email based on the BRMS recovery report, and archives it to SuperServer.

/* hold BRMS maintenance reports so they don't print                     */ 
                                                                            
             OVRPRTF    FILE(QP1AEP) HOLD(*YES)                             
             OVRPRTF    FILE(QP1ARCY) HOLD(*YES)                            
             OVRPRTF    FILE(QP1A2RCY) HOLD(*YES)                           
             OVRPRTF    FILE(QP1AASP) HOLD(*YES)                            
             OVRPRTF    FILE(QP1A2SL) HOLD(*YES)                            
                                                                            
             STRMNTBRM  PRTEXPMED(*NO) PRTVSNRPT(*NO) PRTBKUACT(*NO) +      
                          PRTRCYRPT(*RCYANL)                                
                                                                            
/* email report of backup tape used to IT, and archive it to SuperServer */ 
                                                                            
             ADDLIBLE   LIB(XL_CATAPLT)                                     
             MONMSG     MSGID(CPF0000)                                      
             ZRUNRULE   FILE(QP1A2RCY) JOB(*) SPLNBR(*LAST) +               
                          RULENBR(8971) TIMEOUT(20)                         
             ZRUNRULE   FILE(QP1ARCY) JOB(*) SPLNBR(*LAST) +                
                          RULENBR(8998) TIMEOUT(20)            

/* delete unused generated spool files                                   */  
                                                                             
             DLTSPLF    FILE(QP1AEP) SPLNBR(*LAST)                           
             MONMSG     MSGID(CPF0000)                                       
             DLTSPLF    FILE(QP1AASP) SPLNBR(*LAST)                          
             MONMSG     MSGID(CPF0000)                                       
             DLTSPLF    FILE(QP1A2SL) SPLNBR(*LAST)                          
             MONMSG     MSGID(CPF0000)