The following examples illustrate a scenario in which
several entire 3390-3 volumes have been dedicated to a single library.
No secondary allocation is specified; consequently this library cannot
be extended dynamically by SAS. These examples can also be adapted
for libraries that use less than an entire volume.
The following JCL preallocates
a three-volume 3390 library:
//ALLOC EXEC PGM=IEFBR14
//VOL1 DD DSN=MY.PAYROLL.LIBRARY,DISP=(NEW,KEEP),
// DCB=(DSORG=PS,RECFM=FS,LRECL=27648,
// BLKSIZE=27648),UNIT=3390,
// SPACE=(CYL,1113),VOL=SER=PR0001
//VOL2 DD DSN=MY.PAYROLL.LIBRARY,DISP=(NEW,KEEP),
// DCB=(DSORG=PS,RECFM=FS,LRECL=27648,
// BLKSIZE=27648),UNIT=3390,
// SPACE=(CYL,1113),VOL=SER=PR0002
//VOL3 DD DSN=MY.PAYROLL.LIBRARY,DISP=(NEW,KEEP),
// DCB=(DSORG=PS,RECFM=FS,LRECL=27648,
// BLKSIZE=27648),UNIT=3390,
// SPACE=(CYL,1113),VOL=SER=PR0003
//CATDD DD DSN=MY.PAYROLL.LIBRARY,
// DISP=(OLD,CATLG),UNIT=3390,
// VOL=SER=(PR0001,PR0002,PR0003)
Note that
IEFBR14 is an IBM utility program that returns immediately, allowing
the system to perform job step allocation or deallocation processing.
The following JCL adds
a fourth volume to the library that was allocated in the previous
example. Notice that you must maintain the original sequence for the
volume serial numbers when recataloging the library.
//ALLOC EXEC PGM=IEFBR14
//UNCATDD DD DSN=MY.PAYROLL.LIBRARY,
// DISP=(OLD,UNCATLG)
//NEWVOL DD DSN=MY.PAYROLL.LIBRARY,
// DISP=(NEW,KEEP_,DCB=(DSORG=PS,
// RECFM=FS,LRECL=27648,
// BLKSIZE=27648),UNIT=3390,
// SPACE=(CYL,1113),VOL=SER=PR0004
//CATDD DD DSN=MY.PAYROLL.LIBRARY,
// DISP=(OLD,CATLG),UNIT=3390,
// VOL=SER=(PR0001,PR0002,PR0003,
// PR0004)
The following JCL preallocates
a three-volume library in an SMS environment. Note that the SMS STORCLAS
specified must allow multi-unit allocations and have the GUARANTEED
SPACE attribute. Your SMS system administrator needs to set up the
specified storage class for you. The SASGUAR storage class name is
used only as an example.
//ALLOC EXEC PGM=IEFBR14
//DD1 DD DSN=MY.PAYROLL.LIBRARY,
// DISP=(NEW,CATLG),DCB=(DSORG=PS,
// RECFM=FS,LRECL=27648,
// BLKSIZE=27648),SPACE=(CYL,1113),
// UNIT=(DISK,3),STORCLAS=SASGUAR
//
The GUARANTEED SPACE attribute causes
the system to allocate the primary space amount on each volume when
the library is allocated.