■ データセットをバックアップとってから削除するサンプル
//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 /*
※ボリューム上の順次データセットをバックアップしてから削除する例です。