SRMJOB01—DFDSS compress and release data set space
In the following skeleton JCL example, each record would cause the control statements to be repeated because they are encompassed in the DO loop. Therefore, in this example, the end result would be the submission of one batch job that contains 25 DD statements matched to 25 paired compress and release statements, one for each data set. This example assumes ACT_COUNT=25 is coded and that there are actually 25 data sets that match the FLST/RLST criteria. For a full explanation about skeleton tailoring, see Skeleton-tailoring.
SRMJOB01 skeleton JCL example
//SRMJOB01 JOB (XXXX),'XXXXX',CLASS=A,MSGCLASS=X
//* TYPRUN=HOLD
//*************************************************************
//* DFDSS COMPRESS AND RELEASE DATA SET *
//*************************************************************
//* SOLUTION IS &SOL
//* FUNCTION IS &FUNC
//*************************************************************
//COMPRESS EXEC PGM=ADRDSSU,REGION=0K
//SYSPRINT DD SYSOUT=*
)DO
//*DD&I DD UNIT=SYSALLDA,
//* VOL=SER=&VOLSER,
//* DISP=SHR
)END
//SYSIN DD *
)DO
//* &DSN
//* COMPRESS DDNAME(DD&I) -
//* INC(&DSN)
//* RELEASE DDNAME(DD&I) -
//* INCLUDE(&DSN) -
//* MINSEC(2)
//*
)END
/*
//
//* TYPRUN=HOLD
//*************************************************************
//* DFDSS COMPRESS AND RELEASE DATA SET *
//*************************************************************
//* SOLUTION IS &SOL
//* FUNCTION IS &FUNC
//*************************************************************
//COMPRESS EXEC PGM=ADRDSSU,REGION=0K
//SYSPRINT DD SYSOUT=*
)DO
//*DD&I DD UNIT=SYSALLDA,
//* VOL=SER=&VOLSER,
//* DISP=SHR
)END
//SYSIN DD *
)DO
//* &DSN
//* COMPRESS DDNAME(DD&I) -
//* INC(&DSN)
//* RELEASE DDNAME(DD&I) -
//* INCLUDE(&DSN) -
//* MINSEC(2)
//*
)END
/*
//
Tip: For faster searching, add an asterisk to the end of your partial query. Example: cert*