Creating the database data sets of the IMS catalog manually
When the IMS management of ACBs is enabled, the IMS catalog uses additional system data sets. These data sets are considered extensions of the IMS catalog and include the IMS directory data sets, an IMS directory staging data set, and an IMS directory bootstrap data set.
HALDB databases use a data set naming convention that requires specific suffixes on the data set names. For example, A00001, X00001, and so on. You must use these suffixes as shown in the following examples.
The IMS catalog is a full-function database (ACCESS=PHIDAM,OSAM) and supports either OSAM physical sequential data sets or VSAM linear data sets.
Procedure
Create the partition data sets for either OSAM physical sequential data sets or for VSAM data
sets.
See the following examples for OSAM physical sequential data sets or for VSAM linear data sets. In the examples, the DSNPREFX=IMS.
OSAM
//SYSIN DD *
ALLOCATE -
DSNAME('IMS.DFSCD000.A00001') -
FILE(A00001) -
RECFM(F,B,S) -
LRECL(4096) -
BLKSIZE(4096) -
DSORG(PS) -
NEW CATALOG -
SPACE(20,20) CYLINDERS -
VOLUME(volser) -
UNIT(name)
ALLOCATE -
DSNAME('IMS.DFSCD000.B00001') -
FILE(B00001) -
RECFM(F,B,S) -
LRECL(4096) -
BLKSIZE(4096) -
DSORG(PS) -
NEW CATALOG -
SPACE(20,20) CYLINDERS -
VOLUME(volser) -
UNIT(name)
ALLOCATE -
DSNAME('IMS.DFSCD000.C00001') -
FILE(C00001) -
RECFM(F,B,S) -
LRECL(4096) -
BLKSIZE(4096) -
DSORG(PS) -
NEW CATALOG -
SPACE(20,20) CYLINDERS -
VOLUME(volser) -
UNIT(name)
ALLOCATE -
DSNAME('IMS.DFSCD000.D00001') -
FILE(D00001) -
RECFM(F,B,S) -
LRECL(4096) -
BLKSIZE(4096) -
DSORG(PS) -
NEW CATALOG -
SPACE(20,20) CYLINDERS -
VOLUME(volser) -
UNIT(name)
DEFINE CLUSTER( -
NAME(IMS.DFSCD000.X00001) -
CYLINDERS(2 1) -
REUSE -
INDEXED -
KEYS(16,5) -
FREESPACE(80 10) -
RECORDSIZE(22 22) -
SHAREOPTIONS(3 3) -
SPEED -
VOLUMES(volser) -
) -
DATA(CONTROLINTERVALSIZE(4096))
DEFINE CLUSTER( -
NAME(IMS.DFSCD000.L00001) -
CYLINDERS(1 1) -
REUSE -
FREESPACE(80 10) -
SHAREOPTIONS(3 3) -
SPEED -
VOLUMES(volser) -
) -
DATA( -
NAME(IMS.DFSCD000.L00001.D) -
CISZ(512) -
KEYS(9,0) -
RECSZ(50,50) -
) -
INDEX( -
NAME(IMS.DFSCD000.L00001.S) -
CISZ(2048) -
)
DEFINE CLUSTER( -
NAME(IMS.DFSCX000.A00001) -
CYLINDERS(2 1) -
REUSE -
INDEXED -
KEYS(37,45) -
FREESPACE(80 10) -
RECORDSIZE(82 82) -
SHAREOPTIONS(3 3) -
SPEED -
VOLUMES(volser) -
) -
DATA(CONTROLINTERVALSIZE(4096))
VSAM
//SYSIN DD *
DEFINE CLUSTER -
(NAME('IMS.DFSCD000.A00001') -
FILE(A00001) -
REUSE -
CONTROLINTERVALSIZE(4096) -
SHAREOPTIONS(3 3) -
CYL(30) -
LINEAR)
DEFINE CLUSTER -
(NAME('IMS.DFSCD000.B00001') -
FILE(B00001) -
REUSE -
CONTROLINTERVALSIZE(4096) -
SHAREOPTIONS(3 3) -
CYL(30) -
LINEAR)
DEFINE CLUSTER -
(NAME('IMS.DFSCD000.C00001') -
FILE(C00001) -
REUSE -
CONTROLINTERVALSIZE(4096) -
SHAREOPTIONS(3 3) -
CYL(30) -
LINEAR)
DEFINE CLUSTER -
(NAME('IMS.DFSCD000.D00001') -
FILE(D00001) -
REUSE -
CONTROLINTERVALSIZE(4096) -
SHAREOPTIONS(3 3) -
CYL(30) -
LINEAR)
/* PRIMARY INDEX DATA SET */
DEFINE CLUSTER( -
NAME(IMS.DFSCD000.X00001) -
CYLINDERS(5 1) -
REUSE -
INDEXED -
KEYS(16,5) -
FREESPACE(80 10) -
RECORDSIZE(22 22) -
SHAREOPTIONS(3 3) -
SPEED -
VOLUMES(volser) -
) -
DATA(CONTROLINTERVALSIZE(4096))
/* INDIRECT LIST DATA SET */
DEFINE CLUSTER( -
NAME(IMS.DFSCD000.L00001) -
CYLINDERS(3 1) -
REUSE -
FREESPACE(80 10) -
SHAREOPTIONS(3 3) -
SPEED -
VOLUMES(volser) -
) -
DATA( -
NAME(IMS.DFSCD000.L00001.D) -
CISZ(512) -
KEYS(9,0) -
RECSZ(50,50) -
) -
INDEX( -
NAME(IMS.DFSCD000.L00001.S) -
CISZ(2048) -
)
/* SECONDARY INDEX DATA SET */
DEFINE CLUSTER( -
NAME(IMS.DFSCX000.A00001) -
CYLINDERS(3 1) -
REUSE -
INDEXED -
KEYS(37,45) -
FREESPACE(80 10) -
RECORDSIZE(82 82) -
SHAREOPTIONS(3 3) -
SPEED -
VOLUMES(volser) -
) -
DATA(CONTROLINTERVALSIZE(4096))
/* DEFINE CLUSTER -
(NAME('IMS.DFSCD000.A00001') -
FILE(A00001) -
REUSE -
CONTROLINTERVALSIZE(4096) -
SHAREOPTIONS(3 3) -
CYL(30) -
LINEAR)
DEFINE CLUSTER -
(NAME('IMS.DFSCD000.B00001') -
FILE(B00001) -
REUSE -
CONTROLINTERVALSIZE(4096) -
SHAREOPTIONS(3 3) -
CYL(30) -
LINEAR)
DEFINE CLUSTER -
(NAME('IMS.DFSCD000.C00001') -
FILE(C00001) -
REUSE -
CONTROLINTERVALSIZE(4096) -
SHAREOPTIONS(3 3) -
CYL(30) -
LINEAR)
DEFINE CLUSTER -
(NAME('IMS.DFSCD000.D00001') -
FILE(D00001) -
REUSE -
CONTROLINTERVALSIZE(4096) -
SHAREOPTIONS(3 3) -
CYL(30) -
LINEAR)
/* PRIMARY INDEX DATA SET */
DEFINE CLUSTER( -
NAME(IMS.DFSCD000.X00001) -
CYLINDERS(5 1) -
REUSE -
INDEXED -
KEYS(16,5) -
FREESPACE(80 10) -
RECORDSIZE(22 22) -
SHAREOPTIONS(3 3) -
SPEED -
VOLUMES(volser) -
) -
DATA(CONTROLINTERVALSIZE(4096))
/* INDIRECT LIST DATA SET */
DEFINE CLUSTER( -
NAME(IMS.DFSCD000.L00001) -
CYLINDERS(3 1) -
REUSE -
FREESPACE(80 10) -
SHAREOPTIONS(3 3) -
SPEED -
VOLUMES(volser) -
) -
DATA( -
NAME(IMS.DFSCD000.L00001.D) -
CISZ(512) -
KEYS(9,0) -
RECSZ(50,50) -
) -
INDEX( -
NAME(IMS.DFSCD000.L00001.S) -
CISZ(2048) -
)
/* SECONDARY INDEX DATA SET */
DEFINE CLUSTER( -
NAME(IMS.DFSCX000.A00001) -
CYLINDERS(3 1) -
REUSE -
INDEXED -
KEYS(37,45) -
FREESPACE(80 10) -
RECORDSIZE(82 82) -
SHAREOPTIONS(3 3) -
SPEED -
VOLUMES(volser) -
) -
DATA(CONTROLINTERVALSIZE(4096))
/*