Re: Re: Compile and run later

How to compress a PDS:

 

//MYJOB    JOB (JCLLIB),

//             'SOMETHING',

//             CLASS=A,NOTIFY=&USERID,

//*            MSGCLASS=A,

//             MSGLEVEL=(0,0)

//COMPRESS EXEC PGM=IEBCOPY

//SYSPRINT DD  SYSOUT=*

//SYSUT3   DD  UNIT=SYSDA,SPACE=(TRK,(1,1))

//SYSUT4   DD  UNIT=SYSDA,SPACE=(TRK,(1,1))

//I1       DD  DSN=YOUR.LIBRARY.NAME,DISP=SHR

//SYSIN    DD  *

 COPY INDD=((I1,R)),OUTDD=I1

 

 

Carlos Aguilera

1401 Liggates Rd

Lynchburg VA 24502

Carlos-FiVMtmHp2a9Wk0Htik3J/[email protected]

434-401-4828