■  データセットのコピーを作るサンプル


  //COPY    JOB  CLASS=x,MSGCLASS=x,REGION=4M
  //STEP1    EXEC  PGM=ADRDSSU
  //SYSPRINT DD    SYSOUT=A
  //BACKUP   DD    UNIT=3480,VOL=SER=TAPE05,DISP=OLD,
  //  DSNAME=V111111.BACKUP
  //COPY1    DD    UNIT=3480,VOL=SER=TAPE06,
  //  DISP=(NEW,CATLG),DSNAME=V111111.BACKUP1
  //COPY2    DD    UNIT=3480,VOL=SER=TAPE07,
  //  DISP=(NEW,CATLG),DSNAME=V111111.BACKUP2
  //SYSIN    DD    *
    COPYDUMP -
      INDD(BACKUP) -
      OUTDD(COPY1,COPY2)
この例では、DFSMSdss ダンプ・テープ (OUTDD(COPY1,COPY2)) から 2 つのコピー が作成されます。



BEFORE PAGE

TOP PAGE