//       PROC RGN=0M,DPTY='(14,15)',SOUT=I,                   
//            IMSID=,                                         
//            IMSLVL='IMS1010',                               
//            DSW31='D10.PETDSW4',                            
//            IMSVAR=&IMSVAR                                  
//IEFPROC EXEC PGM=DFSMVRC0,REGION=&RGN,                      
// DPRTY=&DPTY,PARM=(DLS,&IMSID)                              
//STEPLIB  DD DSN=&IMSLVL..&IMSVAR..SDFSRESL,DISP=SHR         
//         DD DSN=&IMSLVL..PET.DYNALLOC,DISP=SHR              
//         DD DSN=IMS1010.PET.IMSRAND,DISP=SHR                
//PROCLIB  DD DSN=&DSW31..PROCLIB,DISP=SHR                    
//IMSACBA  DD DSN=&IMSLVL..&IMSVAR..ACBLIBA,DISP=SHR          
//IMSACBB  DD DSN=&IMSLVL..&IMSVAR..ACBLIBB,DISP=SHR          
//SYSUDUMP DD SYSOUT=&SOUT                                    
//SYSABEND DD SYSOUT=&SOUT