How do I compress a Partitioned Data Set? - IBA-mainframe-dev/Global-Repository-for-Mainframe-Developers GitHub Wiki

How to compress a Partitioned Data Set PDS?

Specify value for #input_pds

//STEP1    EXEC PGM=IEBCOPY
//SYSPRINT DD   SYSOUT=*
//SYSUT1   DD   DSN='input_pds',DISP=SHR
//SYSIN    DD *
  COPY OUTDD=SYSUT1,INDD=SYSUT1