IBM SC33-1683-02 - Manual (Page 781)

A VS COBOL II version
The sample job in Figure 108 shows the link-edit statements you need for a VS
COBOL II version of a DFHCSDUP user program.
Notes for the VS COBOL II job:
1
Specify the entry name as DFHEXTRA, which is the entry name in the
CICS-supplied stub, DFHEXCI. (See
3
.)
2
The CICS-supplied stub, DFHEXCI, is generated with a link to the user program
using a dummy CSECT name (EXITEP). Use the link-edit CHANGE statement to
change the CSECT name from EXITEP to the name specified on the PROGRAM-ID
statement in the user program. In the three CICS-supplied COBOL sample
programs, these names are:
CREFCSD
The PROGRAM-ID in DFH0CRFC, the cross-reference listing user program.
FORMCSD
The PROGRAM-ID in DFH0FORC, the DB2-formatting user program.
BDEFCSD
The PROGRAM-ID in DFH0CBDC, the CSD backup definitions user
program.
3
Include DFHEXCI in any COBOL language user program that you write for use
with the DFHCSDUP EXTRACT command. DFHEXCI is the interface stub between
DFHCULIS, a module in DFHCSDUP, and the COBOL user program.
4
Specify the COBOL routines on the INCLUDE statements as shown.
5 obj-prog
is the name of the object program.
6 progname
is the name you want for the load module; this is the name that you
specify on the USERPROGRAM parameter of the EXTRACT command.
//DFHCRFC JOB (accounting information),CLASS=A,MSGCLASS=A,NOTIFY=userid
// .
// COBOL compile job step here
// .
//LINK EXEC PGM=IEWL,PARM='XREF,LIST,LET'
//SYSLIB DD DSN=SYS1.COBOL2.COB2LIB,DISP=SHR
//CICSLIB DD DSN=CICSTS13.CICS.SDFHLOAD,DISP=SHR
//OBJLIB DD DSN=object.module.library,DISP=SHR
//SYSLMOD DD DSN=user.library,DISP=SHR
//SYSUT1 DD UNIT=SYSDA,SPACE=(1024,(100,10))
//SYSPRINT DD SYSOUT=A
//COBLIB DD DSN=SYS1.COBOL2.COB2LIB,DISP=SHR
//SYSLIN DD *
ENTRY DFHEXTRA 1
CHANGE EXITEP(prog-id) 2
INCLUDE CICSLIB(DFHEXCI) 3
INCLUDE SYSLIB(ILBOSRV) 4
INCLUDE SYSLIB(ILBOCMM) 4
INCLUDE SYSLIB(ILBOBEG) 4
INCLUDE OBJLIB(obj-prog) 5
NAME progname(R) 6
//
Figure 108. Link-edit control statements for a DFHCSDUP user program (COBOL)
DFHCSDUP as a batch program
Chapter 30. User programs for the system definition utility program (DFHCSDUP) 749