z/OS DFSMSrmm Implementation and Customization Guide
Previous topic | Next topic | Contents | Contact z/OS | Library | PDF


Assigning expiration dates

z/OS DFSMSrmm Implementation and Customization Guide
SC23-6874-00

When a JFCB address is supplied, the sample EDGUX100 exit module checks to see whether an expiration date, rather than a retention period, is specified by the user. If an expiration date was specified:
  • If the JCL expiration date is 98000, the sample EDGUX100 exit module clears the expiration date so that DFSMSrmm uses the DFSMSrmm parmlib default retention period to calculate the expiration date. This prevents DFSMSrmm from treating a special expiration date as an actual expiration date. If the exit parameter list indicates that the exit can request the volume is ignored, the sample EDGUX100 exit module requests that DFSMSrmm ignores the volume.
  • If the JCL expiration date is 99000, the sample EDGUX100 exit module clears the expiration date field, so that DFSMSrmm uses the DFSMSrmm parmlib default retention period to calculate an expiration date. This prevents DFSMSrmm from treating a special expiration date as an actual expiration date. If the exit parameter list indicates that the exit can specify a vital record specification management value, the sample EDGUX100 exit module returns a vital record specification management value of D99000.
  • Before checking for any other expiration date values, the sample EDGUX100 exit module checks to see if you want the expiration dates to be used as actual expiration dates or special dates. The sample EDGUX100 exit module checks for the existence of a dummy DD statement with the name NOTKEYD8.
    //NOTKEYD8 DD DUMMY

    Code a NOTKEYD8 dummy DD statement to indicate that the date is an actual expiration date. When you do not code the NOTKEYD8 DD statement in the current job step or do not code it as a dummy DD statement, the expiration date is treated as a special date.

    If you want to use a DD name other than NOTKEYD8, change the DD name that is coded in the sample EDGUX100 exit module. Ensure that you specify a DD name padded to 8 characters with trailing blanks.

    The sample EDGUX100 exit module does not perform any further special date processing. However, if you want to add checks for additional special dates you can do so.

Go to the previous page Go to the next page




Copyright IBM Corporation 1990, 2014