General Information › Basic Conventions and Requirements › Year 2000 Considerations › JCL, SYSPARMS, or Command parameters

JCL, SYSPARMS, or Command parameters

Even after January 1, 2000, CA Disk will continue to honor these special never expire dates. If JCL specifies LABEL=EXPDT=99365, the data set(s) processed will be kept until explicitly deleted even after December 31, 1999.

For example:

• If you explicitly specify EXPDT=99365 for an ARCHVOL or DSNINDEX record, then the data set is kept until explicitly deleted even after December 31, 1999.

  SCAN REALVOLS
  SELECT DSNAMES=PROD./
  BACKUP EXPDT=99365
  //SYSPARMS  DD  *
  DYNEXPDTE99365
  

  The ARCHVOLS and DSNINDEX records created by this sample BACKUP job will have their respective EXPDT values set to 99365. These records will reside in the FILES even after December 31, 1999.

• If you specify RETPD=nnnnn and the system calculates an expiration date of the last day 99365, the actual expiration date will be bumped one day to January 1, 2000, to prevent inadvertently assigning a never expire date.

  //jobcard
  //BACKUP   EXEC DMS
  //ARCHIVE0  DD  LABEL=RETPD=nnnn
  SELECT DSNAMES=PROD./
  BACKUP RETPD=nnnn
  

  The ARCHVOLS and DSNINDEX records created by this sample BACKUP job will have their respective RETPD values set to TODAY+nnnn. If TODAY+nnnn calculates to 99365, the actual expiration date is bumped to 2000.001.

• If you specify RETPD=nnnn and the calculation extends beyond 2155.365 then the EXPDT is set to 2155.365.

Important! RETPD values calculating to 98nnn and 99nnn can cause problems in certain situations. For example, TMS considers tapes valued at 99060 scratch after 60 days of non-use.