|
Entire document Available as PDF |
You can use the CARDDISK utility to create a disk data set from card images (80-byte records) or to add card images to the end of an existing disk data set. The only required parameter is the data set name to be given to the new
disk data set. By default, this will provide a primary allocation of 10 tracks and secondary allocations of 5 tracks. If it is created successfully, the new data set will be cataloged. The record format will be FB (fixed block), with 80 characters per
record and a blocksize of 6160. NOTE: The data set name must conform to standard CNS disk data set naming conventions or it will be deleted at the end of the day.
Use the following JCL for CARDDISK:
Figure 1. JCL for the CARDDISK Procedure
//jobnameJOB ,'your name',CLASS=class,TIME=(mm,ss),LINES=lines/*ROUTE PRINTnode.location// EXEC CARDDISK,DDSN='data.set.name' //GO.CARDS DD * ...card images...
To override any of the default values, specify any of the optional parameters and values below on the EXEC statement. Commas must separate each parameter.
PRIM=#tracksspecifies
the number of tracks needed in primary space allocation. Default is 10.
SEC=#tracksspecifies the number
of tracks in secondary space allocation. Default is 5.
N1DISP=dispspecifies the disposition of the new
data set at the start of the job step. Default is NEW.
DRECFM=formatspecifies output record format.
Default is FB.
DLRECL=lengthspecifies logical record length. Default is 80.
DBLKS=sizespecifies
block size. Default is 6160.
N2DISP=dispspecifies disposition of disk data set at the end of the job
step. Default is CATLG.
UNIT=unitspecifies a type of disk unit. Default is SYSDA.
DVOL=volumegives
the name of a specific disk volume. Default is null.
The following EXEC statement creates a sequential disk data set called 'UF.KITTIES.CATNIP' using default values:
// EXEC CARDDISK,DDSN='UF.KITTIES.CATNIP'
The following EXEC statement creates a disk data set with a primary allocation of 50 tracks and no secondary allocation:
// EXEC CARDDISK,DDSN='UF.PUPPIES.CUDDLE',PRIM=50,SEC=
The following EXEC statement adds card images to the end of an existing disk data set called 'UF.ISTUDY.BOOKS':
// EXEC CARDDISK,DDSN='UF.ISTUDY.BOOKS',N1DISP=MOD