■  データセットをバックアップとってから削除するサンプル


//STEP1 EXEC PGM=ADRDSSU
//SYSPRINT DD SYSOUT=*
//DASD DD DISP=OLD,UNIT=DISK,VOL=SER=MYVOL
//TAPE DD DSN=MYBACKUP.TAPE,DISP=(NEW,KEEP),UNIT=TAPE
//SYSIN DD *
  DUMP  DATASET(INCLUDE(MYDATA.FILE1 MYDATA.FILE2>)) -
        INDDNAME(DASD) OUTDDNAME(TAPE
        ALLDATA(*)   ALLEXCP   TOL(ENQF)   DELETE
/*      


※ボリューム上の順次データセットをバックアップしてから削除する例です。



BEFORE PAGE

TOP PAGE