MVSFORUMS.com

[Jim Oates]

How can a single job check for five HLQ's and compress (and release space) for various PDS datasets? The list of PDS datasets and volumes will change each time the scheduled (not manual) job is executed.

Based on the documentation for ADRDSSU (DF/DSS) it seems a series of steps are required for each HLQ just to generate the INCLUDE (FILTERDD) and DYNAM information for the selection. Then one step per volume is required for the COMPRESS. Surely I am missing something obvious.


ExampleAssume the following HLQ's are scanned at each execution.
1. P.DABC.X+
2. P.DXYZ.X+
3. P.DJKL.X+

This week

HLQ 1 returns 3 datasets on 3 vols VOL1, VOL2, VOL3
HLQ 2 returns 2 datasets on 2 volumes on VOL1 and VOL4
HLQ 3 returns 2 datasets on 2 volumes VOL3 and VOL5

At this point it seems five compress steps, one for each volume, are required.
VOL1 2 DSNs
VOL2 1 DSN
VOL3 2 DSNs
VOL4 1 DSN
VOL5 1 DSN


What I have so far.

1. A step to find all PDS datasets to be compressed that match one of the five HLQ's. (SAVELIST EXEC ACBJBAOB - one step per HLQ.)

2. A step to generate a report from the above list. (GENREP EXEC ACBJBAOB - one step for each HLQ.)

3. A program to create a FILTERDD DSN containing the INCLUDE statements and the DYNAM entry for each volume.

[Jim Oates]

Never mind. My last tests were hampered by a formatting error in the FILTERDD dataset.

For the compress, this worked.
//CLEANUP EXEC PGM=ADRDSSU,REGION=0M
//FILTER1 DD DISP=SHR,DSN=P.DABC.COMPRESS.FILTER1
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
COMPRESS FILTERDD(FILTER1) DYNAM('ABCT27')
COMPRESS FILTERDD(FILTER1) DYNAM('ABCT02')
//

Where one compress statement per volume was added.

[papadi]

Good to hear it is working - thanks for letting us know

d