Previous Topic: PDS Compression ExamplesNext Topic: Example 2—Compress ISPF Profile PDSs and Reallocate


Example 1—Compress Specified Data Sets by Percent Full and Number of Extents

Compress the data set named DEVE.TESTLIB, and all PDS data sets on the TSO volumes that are 80 percent full or over, or are in more than 15 extents. Reallocate the TSO PDSs such that they are only 50 percent full. Adjust the directory size such that the directory of each PDS will be 80 percent used.

//jobname JOB (acct,info),etc.
//         EXEC COMPRES
//SYSIN     DD  *
COMPRESS DSN=DEVE.TESTLIB,USE
SCAN VOL=TSO/,THR=(80,15,00),ALL=(50,0,80),SHRINK