// PROC RGN=2560K,DPTY='(14,15)',SOUT=I, // IMSLVL='IMS1010', // IMSID=, // DSW31='D10.PETDSW4', // IMSVAR=&IMSVAR //IEFPROC EXEC PGM=DFSMVRC0,REGION=&RGN, // DPRTY=&DPTY,PARM=(DRC,&IMSID) //STEPLIB DD DSN=&IMSLVL..&IMSVAR..SDFSRESL,DISP=SHR // DD DSN=&IMSLVL..PET.DYNALLOC,DISP=SHR //PROCLIB DD DSN=&DSW31..PROCLIB,DISP=SHR //JCLOUT DD SYSOUT=(A,INTRDR) //JCLPDS DD DSN=&DSW31..PROCLIB,DISP=SHR //SYSUDUMP DD SYSOUT=&SOUT //SYSABEND DD SYSOUT=&SOUT