Previous Topic: ARCHIVE Command Example 3Next Topic: DELETE Command


ARCHIVE Command Example 4

Archive for 7 years, allowing auto-restore, non-VSAM data sets and VSAM clusters not used in 28 days, except for SYS data sets.

Also archive, allowing auto-restore, generation data group data sets, except leave the two most recent generations of most GDGs on disk, and leave the five most recent generations of the rest. Have these data sets under "catalog control", which means that they are to be expired from the CA Disk archives when they roll off of the catalog (see the IDCAMS DEFINE GENERATIONDATAGROUP command LIMIT parameter).

//jobname JOB (acct,info),etc.
// EXEC DMS
PASSWORD MASTER=the-DMS-master-password
SCAN REALVOLS
EXCLUDE DSNAMES=(data.set.name.patterns.that.should,
have.more.than.two.generations.left.on.disk),
SELECT CRITERIA=(GDG,EQ,YES,AND,GDGGEN,LE,-2)
ARCHIVE DISP=RECAT,EXPDT=99000
SELECT CRITERIA=(GDG,EQ,YES,AND,GDGGEN,LE,-5)
ARCHIVE DISP=RECAT,EXPDT=99000
SELECT CRI=(USEDT,LE,TODAY-28)
EXCLUDE DSNAMES=SYS/
ARCHIVE DISP=RECAT,RETPD=2557