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
To Next Page
Loading...
Need help?
General