The CDBM GROUP command data set, DFHDBFK, is a VSAM key-sequenced data set
(KSDS). The CDBM transaction uses this data set to provide a repository for stored groups of DBCTL
commands.
Procedure Create the DFHDBFK data set by running an IDCAMS job, an example
of which is shown in Figure 1 . Figure 1. Sample job to define and initialize the DFHDBFK
data set
//DBFKJOB JOB 'accounting information',name,MSGCLASS=A
//*
//DBFKDEF EXEC PGM=IDCAMS,REGION=1M
//SYSPRINT DD SYSOUT=*
//AMSDUMP DD SYSOUT=*
//SYSIN DD *
DELETE CICSTS56 .CICS .DFHDBFK
SET MAXCC=0
DEFINE CLUSTER ( -
NAME( CICSTS56 .CICS .DFHDBFK ) -
INDEXED -
RECORDS(100 20) -
KEYS(22,0) -
RECORDSIZE(1428 1428) -
) -
INDEX ( -
NAME( CICSTS56 .CICS .DFHDBFK.INDEX ) -
CONTROLINTERVALSIZE(512) -
) -
DATA ( -
NAME( CICSTS56 .CICS .DFHDBFK.DATA ) -
CONTROLINTERVALSIZE(2048) -
)
/*
//* The next two job steps are optional.
//*
//DBFKINID EXEC PGM=IDCAMS,REGION=1M
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DELETE CICSTS56 .CICS .DBFKINIT
/*
//DBFKINIF EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=A
//SYSUT2 DD DSN=CICSTS56 .CICS .DBFKINIT,DISP=(NEW,CATLG),
// UNIT=dbfkunit ,VOL=SER=dbfkvol ,SPACE=(TRK,(1,1)),
// DCB=(RECFM=FB,LRECL=40,BLKSIZE=6160)
//* Place the definitions you want to load after SYSUT1. For example:
//SYSUT1 DD *
SAMPLE DIS DB DI21PART
SAMPLE STA DB DI21PART
SAMPLE STO DB DI21PART
/*
//SYSIN DD *
GENERATE MAXFLDS=1
RECORD FIELD=(40)
/*
//DBFKLOAD EXEC PGM=IDCAMS,REGION=1M
//SYSPRINT DD SYSOUT=*
//AMSDUMP DD SYSOUT=*
//SYS01 DD DSN=CICSTS56 .CICS .DBFKINIT,DISP=SHR
//DFHDBFK DD DSN=CICSTS56 .CICS .DFHDBKF,DISP=SHR
//SYSIN DD *
REPRO INFILE (SYS01) -
OUTFILE (DFHDBFK)
/*
//
where dbfkvol is the volume on which the DFHDBFK data
set is to be created and dbfkunit is the unit type for
that volume.
Use this job to load IMS commands or use the maintenance
function within the CDBM transaction.
Job control statements for CICS execution
If you define the DFHDBFK data set using the sample JCL shown in
Figure 1 , the data definition statement for the CICS® execution is as
follows:
//DFHDBFK DD DSN=CICSTS56 .CICS .DFHDBFK,DISP=SHR
Alternatively, if you want to use dynamic file allocation, add the fully-qualified data set name
to the DFHDBFK file resource definition.