| ■ カタログされていないデータセットを削除するサンプル |  |
//STEP1 EXEC PGM=IEFBR14 //INPUT DD DSN=TESTFILE, // DISP=(OLD,DELETE),UNIT=…,VOL=SER=… /*
※保存期限の指定してあるデータセットは削除できません。削除しようとすると、
IEC614I SCRATCH FAILED - RC 008, DIAGNOSTIC INFORMATION IS (xxxxxxxx)
のメッセージが出力されます。
■ カタログされていないデータセットを削除するサンプル
//STEP1 EXEC PGM=IEFBR14 //INPUT DD DSN=TESTFILE, // DISP=(OLD,DELETE),UNIT=…,VOL=SER=… /*
※保存期限の指定してあるデータセットは削除できません。削除しようとすると、
IEC614I SCRATCH FAILED - RC 008, DIAGNOSTIC INFORMATION IS (xxxxxxxx)
のメッセージが出力されます。