09.07.2015 Views

z/OS V1R6.0 DFSMS Access Method Services for Catalogs

z/OS V1R6.0 DFSMS Access Method Services for Catalogs

z/OS V1R6.0 DFSMS Access Method Services for Catalogs

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

DEFINE GENERATIONDATAGROUP||||||||||||||||TO(date)|FOR(days)Specifies the retention period <strong>for</strong> the GDG being defined.TO(date)Specifies the earliest date that a command without the PURGE parametercan delete the GDG. Specify the expiration date in the <strong>for</strong>m yyyyddd, whereyyyy is a four-digit year (to a maximum of 2155) and ddd is the three-digitday of the year from 001 through 365 (<strong>for</strong> non-leap years) or 366 (<strong>for</strong> leapyears).The following four values are ″never-expire″ dates: 99365, 99366, 1999365,and 1999366. Specifying a ″never-expire″ date means that the PURGEparameter will always be required to delete the GDG. For relatedin<strong>for</strong>mation, see the ″EXPDT Parameter″ section of z/<strong>OS</strong> MVS JCL Reference,SA22-7597.Notes:1. Any dates with two-digit years (other than 99365 or 99366) will betreated as pre-2000 dates. (See note 2.)2. Specifying the current date or a prior date as the expiration date willmake the GDG immediately eligible <strong>for</strong> deletion.FOR(days)Specifies the number of days to keep the GDG being defined. Themaximum number that can be specified is 9999. If the number specified is0 through 9998, the GDG is retained <strong>for</strong> the number of days specified; ifthe number is 9999, the GDG is retained indefinitely. If neither TO nor FORis specified, the GDG can be deleted at any time.DEFINE GENERATIONDATAGROUP ExamplesDefine a Generation Data Group and a Generation Data Setwithin it: Example 1In this example, a generation data group is defined in the master catalog. Next, ageneration data set is defined within the GDG by using JCL statements.//DEFGDG1 JOB ...//STEP1 EXEC PGM=IDCAMS//GDGMOD DD DSNAME=GDG01,DISP=(,KEEP),// SPACE=(TRK,(0)),UNIT=DISK,VOL=SER=VSER03,// DCB=(RECFM=FB,BLKSIZE=2000,LRECL=100)//SYSPRINT DD SYSOUT=A//SYSIN DD *DEFINE GENERATIONDATAGROUP -(NAME(GDG01) -EMPTY -N<strong>OS</strong>CRATCH -LIMIT(255) )/*//DEFGDG2 JOB ...//STEP1 EXEC PGM=IEFBR14//GDGDD1 DD DSNAME=GDG01(+1),DISP=(NEW,CATLG),// SPACE=(TRK,(10,5)),VOL=SER=VSER03,// UNIT=DISK//SYSPRINT DD SYSOUT=A//SYSIN DD */*Job control language statement:Chapter 15. DEFINE GENERATIONDATAGROUP 177

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!