In this example, two entry-sequenced clusters are defined. The
attributes of the second cluster defined are modeled from the first
cluster.
//DEFCLU7 JOB ...
//STEP1 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=A
//SYSIN DD *
DEFINE CLUSTER -
(NAME(GENERIC.A.BAKER) -
VOLUMES(VSER02) -
RECORDS(100 100) -
RECORDSIZE(80 80) -
NONINDEXED ) -
CATALOG(USERCAT4)
DEFINE CLUSTER -
(NAME(GENERIC.B.BAKER) -
MODEL(GENERIC.A.BAKER USERCAT4)) -
CATALOG(USERCAT4)
/*
The first DEFINE CLUSTER command defines an entry-sequenced cluster,
GENERIC.A.BAKER. Its parameters are:
- NAME specifies the name of the entry-sequenced cluster, GENERIC.A.BAKER.
- VOLUMES specifies that the cluster is to reside on volume VSER02.
- RECORDS specifies that the cluster's space allocation is 100 records.
When the cluster is extended, it is extended in increments of 100
records.
- RECORDSIZE specifies that the cluster's records are fixed length
(the average record size equals the maximum record size) and 80 bytes
long.
- NONINDEXED specifies that the cluster is entry-sequenced.
- CATALOG specifies that the cluster is to be defined in the USERCAT4
catalog.
The second DEFINE CLUSTER command uses the attributes and specifications
of the previously defined cluster, GENERIC.A.BAKER, as a model for
the cluster still to be defined, GENERIC.B.BAKER. A list of the parameters
follows:
- NAME specifies the name of the entry-sequenced cluster, GENERIC.B.BAKER.
- MODEL identifies GENERIC.A.BAKER, cataloged in user catalog USERCAT4,
as the cluster to use as a model for GENERIC.B.BAKER. The attributes
and specifications of GENERIC.A.BAKER that are not otherwise specified
with the DEFINE command's parameters are used to define the attributes
and specifications of GENERIC.B.BAKER.
- CATALOG specifies that the cluster is to be defined in the USERCAT4
catalog.