Many a time we get the space error in a PDS and this is the JCL we are using to compress it. Is it fine to copy a PDS to itself for this purpose? If it is in use by someone, can not it create a problem?
Code: Select all
//*********************************************************************
//* PURPOSE - COMPRESS A PDS BY COPYING ITSELF TO ITSELF *
//*********************************************************************
//STEP01 EXEC PGM=IEBCOPY,COND=(0,LT)
//SYSUT1 DD DISP=SHR,DSN='TEST.SOME.LOADLIB'
//SYSPRINT DD SYSOUT=*,DCB=(RECFM=FB,BLKSIZE=8000)
//SYSIN DD *
COPY OUTDD=SYSUT1,I=SYSUT1
//*