Previous Topic: Example 1—Compress Specified Data Sets by Percent Full and Number of ExtentsNext Topic: Example 3—Select Empty PDSs and Reallocate


Example 2—Compress ISPF Profile PDSs and Reallocate

Compress all ISPF profile PDSs that have allocated space (excluding the directory blocks) less than 50 percent used. Reallocate the data sets, such that the primary allocation (excluding the directory blocks) will be 85 percent used, and adjust the directory size such that the directory of each PDS will be 75 percent used.

Note: This example illustrates how to recover additional space from ISPF profile PDSs that are still overallocated due to compression performed using releases prior to 7.7. Some of these data sets occupying two tracks can be further compressed to use only one track.

//jobname JOB (acct,info),etc.
//         EXEC COMPRES
//SYSIN     DD  *
SCAN DSN=!ISP,VOL=/,THR=(0,0,0,50),ALL=(85,0,75),SHRINK