Instructions and examples for backing up a dataset.

- create a gdg      (run once) 
- run backup as desired 
- restore as necessary (same name or new name)

Examples:


Example 1:  Create a new GDG.   

  (Note: Set the LIMIT parameter to the number of versions you want to keep.)

//STEP010  EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=Q
//SYSIN    DD *
  DEFINE   GDG (NAME(A45UF.USER.SRCE.GDG.BKUP) -
           NOEMPTY SCRATCH LIMIT(nn) )
/*


Example 2:  Back up the data set.

//STEP010  EXEC PGM=FDRDSF
//SYSPRINT DD SYSOUT=Q
//SYSUDUMP DD SYSOUT=Q
//DISK1    DD DSN=A45UF.USER.SRCE,DISP=SHR
//TAPE1    DD DSN=A45UF.USER.SRCE.GDG.BKUP(+1),
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=CART,EXPDT=99000
//SYSIN    DD  *
  DUMP     TYPE=DSF,DATA=ALL
  SELECT   DSN=A45UF.USER.SRCE
/*


Example 3:  Restore the data set to new name.

//STEP010  EXEC PGM=FDRDSF
//SYSPRINT DD SYSOUT=Q
//SYSUDUMP DD SYSOUT=Q
//TAPE1    DD DSN=A45UF.USER.SRCE.GDG.BKUP(+0),DISP=SHR
//SYSIN    DD *
  RESTORE  TYPE=DSF,DATA=ALL
  SELECT   DSN=A45UF.USER.SRCE,NEWNAME=A45UF.USER.SRCE.TEMP
/*