Ibcdasdi - IBM System/370 Operator's Reference Manual

Sample Control-Statement Streams
Source:
GC35-00050S!VS Utilities
A few examples of utility functions and the control statements that must be prepared
to execute them follow.
IBCDASDI
In this example, a 3330 volume is initialized for later use as a system residence
volume. An IPL program is included in standard TXT format.
The example follows:
INIT JOB 'INITIALIZE 3330'
MSG TODEV=1403,TOADDR=OOE
DADEF TODEV=3330,TOADDR=l50,IPL=YES
VLD NEWVOLlD=Pl0000,OWNERID=BROWN,ADDLABEL=2
VTOCD STRTADR=2,EXTENT=7
IPLTXT
(IPL program text statements)
END
The control statements are discussed below:
DADEF specifies that a 3330 volume is to be initialized and specifies the
channel number and unit number. An IPL program is to be included.
VLD specifies a volume serial number and owner identification for the
volume to be initialized. It also specifies that space is to be allocated fo'
two additional labels.
VTOCD specifies that the volume table of contents is to begin on track 2
and is
to
extend
over
nine tracks.
END specifies the end of IPL program text statements. Because IPL text is
included, END begins in column 2.
IEHDASDR
In this example, alternate tracks are to be assigned for three suspected defective tracks
on a 3330 volume.
The example follows:
IIDASDR3 JOB
II
EXEC PGM=IEHDASDR
IISYSPRINT DD SYSOUT=A
'/VOLUME 1 DD
UNIT=(3330 .. DEFER),DISP=OLD,
II
VOLUME=(PRIVATE .. SER=(333000))
I/SYSIN DD •
I'
GETALT
GETALT
GETALT
LABEL
TODD=VOLUME1,TRACK=00050011
TODD=VOLUME1,TRACK=OOAOOOO7
TODD=VOLUME l,TRACK=01010002
TODD=VOLUME1,NEWVOLlD=DISKOO,OWNERID=SMITH
The control statements are discussed below:
Page 6-14
VOL U MEl DD defines a device that is to contain the 3330 volume
(333000).
SYSIN DD defines the control data set, which follows in the input stream.
The GETALT statements specify the ddname of the DD statement defining
the device on which the 3330 volume is mounted. The GETAL T statements
specify the relative track addresses of the tracks for which alternates are to
be assigned.