Appendix B. Utility programs 431
FILE(OGDEN) -
RECORDS (2000 1000) -
TO (99366) -
INDEXED -
KEYS(9 8) -
RECORDSIZE(72 100) -
CONTROLINTERVALSIZE(4096) -
SPANNED -
SHR(4) -
VOLUMES (DOSRES,SYSWK1)) -
DATA (NAME (OGDEN.DATA.VSAM.@D@)) -
INDEX (NAME (OGDEN.DATA.VSAM.@I@)) -
CATALOG(VSESP.USER.CATALOG)
/*
This example illustrates a number of points:
There are two job steps. The first step deletes the data set that will be created
by the second step. This is a clean-up function. The data set might not exist at
this point, and the first step will have a completion code indicating that the
action failed. This is ignored.
The second step creates a VSAM data set (with the DEFINE CLUSTER
command). The DEFINE CLUSTER command is continued ...