W dniu 04.03.2024 o 20:29, Wendell Lovewell pisze:
As Allan said, you can compress an in-use PDS using IEBCOPY.

//CMP    EXEC  PGM=IEBCOPY
//SYSPRINT DD  SYSOUT=*
//SYSUT3   DD  UNIT=SYSDA,SPACE=(CYL,(90))
//SYSUT4   DD  UNIT=SYSDA,SPACE=(CYL,(90))
//INDD0    DD  DISP=SHR,DSN=&YOURPDS
//SYSIN    DD *
     C I=INDD0,O=INDD0
/*

You might have to adjust the SYSUT3/4 space.

My advice: use contemporary REGION and get rid of both SYSUT3/4 ddnames.
Especially for small datasets like TCPPARM.


--
Radoslaw Skorupka
Lodz, Poland

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to