ESASLRPA JCL
//GASM PROC //ASM EXEC PGM=IEV90, // TIME=40, // PARM='DECK,NOXREF,LIST,NORLD,NOOBJECT' //SYSPRINT DD SYSOUT=* //SYSLIB DD DISP=SHR,DCB=SYS1.MACLIB,DSN=SLR.SLRMACS // DD DISP=SHR,DSN=SYS1.MACLIB //SYSPUNCH DD UNIT=SYSDA,SPACE=(CYL,(2,1)),DSN=&&LOADSET, // DISP=(,PASS),DCB=(RECFM=FB,LRECL=80,BLKSIZE=1680) //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(2,1)) //SYSUT2 DD UNIT=SYSDA,SPACE=(CYL,(2,1)) //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(2,1)) //* //LKED EXEC PGM=IEWL,COND=(4,LT,ASM), // PARM='MAP,LIST,NCAL,LET,SIZE=(490K,40K),AMODE=31,RMODE=ANY' //SYSPRINT DD SYSOUT=* //SYSLMOD DD DISP=SHR,DSN=userid.ESASLR.SLRLOAD(&M.) //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(2,1)) //SYSLIN DD DSN=&&LOADSET,DISP=(OLD,DELETE) //* //P PEND