Example 11: Manually labeling duplicate volumes using EDGINERS

You can label volumes as duplicate volumes using the EDGINERS utility that uses manual processing, with the VOL1 operand on the command in the SYSIN file, as shown in the example in Figure 1. The VOL1 value is written to the tape label.

Figure 1. Labeling duplicate volumes using EDGINERS

//MANUAL   EXEC PGM=EDGINERS
//SYSPRINT DD SYSOUT=*
//TAPE     DD UNIT=(tape,,DEFER)
//SYSIN    DD *
INIT VOLUME(D00001) LABEL(SL) VOL1(ABC123)
/*

Control statement description:

TAPE DD allocates a drive suitable for this volume.