Example 9: Manually erase a volume

In Figure 1, volume 0A7100 is erased and defined to DFSMSrmm. The volume is successfully erased and the volume label is written as an ISO/ANSI label.

Figure 1. Erase a volume

   //LABEL8 JOB ....
   //STEP1 EXEC PGM=EDGINERS
   //SYSPRINT  DD  SYSOUT=A
   //TAPE  DD  UNIT=(tape,,DEFER)
   //SYSIN  DD  *
     ERASE VOLUME(0A7100) LABEL(AL) ERASE(SHREDDSE)
   /*

Control statement description:

TAPE DD allocates a drive suitable for this volume.
SYSIN DD includes the command requested to erase the volume.