CA Global SubSystem › Back Up IMODs

Back Up IMODs

If you write or modify IMODs, you should create backup copies of the ISET data sets that contain them in case these ISETs are damaged by system failure or by accident.

To back up IMODs, use the IDCAMS REPRO function in the following sample JCL procedure:

//REPRO      EXEC PGM=IDCAMS
//SYSPRINT   DD SYSOUT=*
//OUTPUT1    DD DSN=CAI.BACKUP.IMOD1,
//             UNIT=TAPE,VOL=SER=BACK01,
//             DCB=(RECFM=VB,LRECL=8000,BLKSIZE=16004),
//             DISP=(,PASS),LABEL=1
//IMOD1      DD DSN=CAI.IMOD1,DISP=SHR
//SYSIN      DD *
  REPRO IFILE(IMOD1) OFILE(OUTPUT1)
//

The output is a sequential file that you can store on tape or disk.