During RESTORE and COPY operations, source and target data set
creation dates remain the same, unless the data set is renamed. However,
if you rename the restored or copied data set, the current date (TODAY)
replaces the creation date in the target data set's DS1CREDT field.
DFSMSdss provides four patch bytes that allow you to change the
method of setting the DS1CREDT field. These patch bytes apply only
to data sets that are allocated by DFSMSdss (not prealocated data
sets). The patch bytes are below:
- If the patch byte at offset X'46' of module ADRPATCH
is set to X'FF', the creation date of the target data set
that is restored without a rename is set to the current date.
- If the patch byte at offset X'47' of module ADRPATCH
is set to X'FF', the creation date of the target data set
that is restored and renamed is set to the source data set's creation
date.
- If the patch byte at offset X'48' of module ADRPATCH
is set to X'FF', the creation date of the target data set
that is copied without a rename is set to the current date.
- If the patch byte at offset X'49' of module ADRPATCH
is set to X'FF', the creation date of the target data set
that is copied and renamed is set to the source data set's creation
date.
To cause DFSMSdss to set the creation date to the current date
for all data sets being copied and restored and not renamed, modify
the sample JCL (see
Sample JCL) as follows:
//SYSIN DD *
NAME ADRDSSU ADRPATCH
VER 46 00
REP 46 FF
VER 48 00
REP 48 FF
Note: - As an alternative, you can use the SET PATCH command to set the
patch bytes dynamically
- For a preallocated target that has F8/F9 DSCBs, the F9 DSCB field
DS9CREAT is set ON, and is being scratched and reallocated, these
patch byte settings will not be honored. These types of data sets
have a field in the F9 DSCB which corresponds to the number of milliseconds
past midnight in which the data set was created (DS9TIME). In order
for the DS9TIME to be usable, the creation date and the time past
midnight of the preallocated target will be preserved as its value
prior to scratching.