Utility to expand all copybooks in a COBOL program

IBM supplied program called ISRLEMX can be used to expand all the copybooks in a COBOL program. The documentation of the utility can be found at https://www.ibm.com/docs/en/zos/2.4.0?topic=4-member-expansion-isrlemx
 
Please note that this utility has some restrictions. It can be found at
https://www.ibm.com/docs/en/zos/2.4.0?topic=isrlemx-restrictions-member-expansion-member-parts-lists
 
It does not expand INCLUDE statements in a COBOL program.
 
Below is a sample Job step to expand the program called “PROGNAME”. You should concatenate both COPY library and SOURCE library under ISRLCODE ddname.  
 
//STEP10   EXEC PGM=ISRLEMX,                          
// PARM=('COB,PROGNAME,B,N,E,4, ,00,ENU,4,7',         
//      '1,/,VIO')                                    
//*                                                   
//ISRLMSG DD SYSOUT=*                                 
//SYSPRINT DD SYSOUT=*                                
//SYSOUT   DD SYSOUT=*                                
//ISRLXREF DD SYSOUT=*                                
//ISRLCODE DD DISP=SHR,DSN=MY.COPYLIB             
//         DD DISP=SHR,DSN=MY.SOURCE.PDS
//ISRLEXPD DD DSN=EXPANDED.SOURCE.FILE,               
//         DISP=(,CATLG,DELETE),                      
//         DCB=(LRECL=80,RECFM=FB),                   
//         SPACE=(CYL,(50,50),RLSE)                   
//*