The sample EXTRACT programs

Three CICS-supplied sample programs can be invoked during DFHCSDUP EXTRACT processing.

Two of these are provided in COBOL, PL/I, and assembler language, and the third is provided in COBOL only.

Table 1. Sample EXTRACT user programs for the DFHCSDUP utility program
Program names	Languages	Description
DFH$CRFA DFH0CRFC DFH$CRFP	Assembler COBOL PL/I	Produces a cross-reference listing of the resource definitions defined in the group or list you specify on the EXTRACT command.
DFH$FORA DFH0FORC DFH$FORP	Assembler COBOL PL/I	Formats the group or list of resource definitions you specify on the EXTRACT command into a form suitable for the DB2® table load utility.
DFH0CBDC	COBOL	Writes the list or group of resource definitions you specify on the EXTRACT command in the form of DEFINE commands, suitable for use as a backup copy of the resources extracted.

You can use the sample programs as supplied, or as models on which to base your own programs.

The assembler-language and COBOL versions of the CSD cross-referencing program, DFH$CRFA and DFH0CRFC respectively, are supplied in executable form in CICSTS53.CICS.SDFHLOAD. The PL/I version, DFH$CRFP, is supplied in source form only.

The assembler-language and COBOL versions of the DB2 formatting program, DFH$FORA and DFH0FORC respectively, are supplied in executable form in CICSTS53.CICS.SDFHLOAD. The PL/I version, DFH$FORP, is supplied in source form only.

The CSD backup utility program, DFH0CBDC, is supplied in executable form in CICSTS53.CICS.SDFHLOAD.

The source statements of all versions of all the sample programs are supplied in CICSTS53.CICS.SDFHSAMP.

The CICS-supplied sample DB2 formatting programs (DFH$FORx) cannot be used when the CSD compatibility option (COMPAT) is specified on the DFHCSDUP utility program. The output from the CSD cross-reference listing and CSD backup utility programs depends on whether the compatibility option is specified. If the compatibility option is specified, the output includes obsolete keywords from releases before CICS® Transaction Server for z/OS®, Version 5 Release 3; if the option is not specified, only keywords from CICS Transaction Server for z/OS, Version 5 Release 3 are output.

All of the sample extract user programs support the definition signature fields.

Note that the sample programs require you to specify the OBJECTS keyword on the DFHCSDUP EXTRACT command.

The output data definition names (ddnames) for the sample programs are as follows:

CRFOUT: CSD cross-referencing program
FOROUT: DB2 formatting program
CBDOUT: CSD backup utility program.

The sample programs are discussed in the next three sections.