In this example, a sequential data set is unloaded onto a 9-track,
unlabeled tape volume (800 bits per inch).
//UNLOAD JOB ...
//STEP1 EXEC PGM=IEHMOVE
//SYSPRINT DD SYSOUT=A
//SYSUT1 DD UNIT=disk,VOLUME=SER=222222,DISP=OLD
//DD1 DD UNIT=disk,VOLUME=SER=111111,DISP=OLD
//DD2 DD UNIT=disk,VOLUME=SER=222222,DISP=OLD
//TAPEOUT DD UNIT=tape,VOLUME=SER=SCRCH2,DISP=OLD,
// DCB=(DEN=2,RECFM=FB,LRECL=80,BLKSIZE=800),
// LABEL=(,NL)
//SYSIN DD *
MOVE DSNAME=SEQSET1,TO=tape=SCRCH2,
FROM=disk=222222,TODD=TAPEOUT
/*
The control statements are discussed below:
- SYSUT1 DD defines the device that is to contain the work data
set.
- DD1 DD defines the system residence device.
- DD2 DD defines a device on which the source volume is mounted.
- TAPEOUT DD defines a device on which the receiving tape volume
is mounted. This statement also provides label and mode information.
- SYSIN DD defines the control data set, which follows in the input
stream.
- MOVE moves the sequential data set SEQSET1 from a disk volume
to the receiving tape volume. The data set is unloaded. The TODD parameter
in this statement refers to the TAPEOUT DD statement for label and
mode information.