Iebisam - IBM System/370 Operator's Reference Manual

Sample Control-Statement Streams (cont'd)
LABEL specifies the ddname of the DD statement defining the device on
which the 3330 volume is mounted. The LABEL statement changes the serial
number of the 3330 volume from 333000 to DISKoo.
IEBISAM
In th is example, an unloaded data set is to be converted to the form of the original
indexed sequential data set.
The example follows:
IISTEPA JOB 09#770,SMITH
II
EXEC PGM=IEBISAM,PARM=LOAD
/lSYSPRINT DD SYSOUT=A
IISYSUT1
DD DSNAME=INDSEQ,DISP=(,KEEPl.DCB=(DSORG=IS).
II
DISP=(OLD,KEEPl.VOLUME=SER=001234
IISYSUT2
DD DSNAME=INDSEQ,DISP=('KEEP),DCB=(DSORG=IS),
1/
SPACE=(CYL,(1)l.VOLUME=SER=111112,UNIT=2314
1*
The control statements are discussed below:
EXEC specifies the program name and the LOAD operation.
SYSUTl DD defines the input data set, which is a sequential (unloaded) data
set. The data ,set is the second data set on a g·track tape volume.
SYSUT2 DD defines the output data set, which is an indexed sequential data
set. One cylinder of space is allocated for the data set on a 2314 volume.
IEHLlST
In this example, a volume table of contents, in edited form, is to be listect.' The edited
listing is supplemented by an unedited listing of selected data set control blocks.
The example follows:
IILlSTVTOC
JOB 09#550,BLUE
II
EXEC
PGM=I EH LIST
/lSYSPRINT DD
SYSOUT=A
UNIT=2314,VOLUME=SER=231400,DISP=OLD /lDD2 DD
//SYSIN DD
1*
LISTVTOC
LlSTVTOC
FORMAT ,VOL=2314=231400
DUMP,VOL=2314=231400,DSNAME=(SET1,SET2,SET3)
The control statements are discussed below:
DD2 DD defines a mountable device on which the volume containing the
specified volume table of contents is to be mounted.
SYSI N DD defines the control data set which follows in the input stream.
The first LlSTVTOC statement indicates that the volume table of contents
on the specified 2314 volume is to be listed in edited form.
The second LlSTVTOC statement indicates that the data set control blocks
representing data sets SET1, SET2, and SET3 are to be listed in unedited
form.
Page 6-15