Copying the journal data set to tape

If you are running SETSYS CDSVERSIONBACKUP(TAPE), then copy the appropriate journal data set or sets to tape. Be sure to include a hardcopy of the JCL used when you send the data sets to IBM®.

If you have allocated the CDSs in your startup procedure, use the following JCL to copy the online journal data sets to tape.

                                                      Note: if DFSMShsm
   //JRNCOPY JOB MSGCLASS=A                         ┌─is in operation, the
   //S1 EXEC PGM=IEBGENER                           │ disposition for DFSMShsm
   //SYSPRINT DD SYSOUT=A                           │ must also be SHR.
   //SYSIN DD DUMMY                                 ▼
   //SYSUT1 DD DSN=HSM.JRNL.BACKUP.V0000002,DISP=SHR
   //SYSUT2 DD DSN=OW99999.JRNL,LABEL=(3,SL),VOL=SER=TAPE01,
   //          DISP=(NEW,KEEP),UNIT=TAPE