PGM                                                        
                                                                   
/******************************************************************************/
/* MERGE ALL SPOOL FILES IN OUTQ TEST AND SEND TO EMAIL OUTQ */         
/******************************************************************************/
        RPTSPLIT30/RPTMRG OUTQ(QGPL/TEST) DESTOUTQ(QGPL/EMAIL)     
                                                                   
/******************************************************************************/
/* MERGE ALL SPOOL FILES IN OUTQ TEST THAT MATCH SPOOL FILE  */         
/* RPT100P AND SEND TO THE EMAIL OUTQ TO BE MAILED.          */         
/******************************************************************************/
       RPTSPLIT30/RPTMRG OUTQ(QGPL/TEST) DESTOUTQ(QGPL/EMAIL) +   
                     SELSPLF(RPT100P)                              
                                                                   
        ENDPGM     

Still have questions? We can help. Submit a case to technical support

Last Modified On:
You don't have the appropriate permissions.
No, open a new Support Case