A Language Environment version

The sample job in Figure 1 shows the link-edit statements you need for a DFHCSDUP user program written in a Language Environment-conforming high-level language.

Figure 1. Link-edit control statements for a DFHCSDUP user program (Language Environment)

//DFHCRFA  JOB (accounting information),CLASS=A,MSGCLASS=A,NOTIFY=userid
//*  .
//* Compile job step here
//*  .
//LINK EXEC PGM=IEWL,PARM='XREF,LIST,LET'
//SYSLIB   DD DSN=PP.ADLE370.OS39025.SCEELKED
//CICSLIB  DD DSN=CICSTS54.CICS.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
//SYSLIN   DD *
 ENTRY     DFHEXTRA                                               1
 CHANGE    EXITEP(prof-id)                                        2
 INCLUDE   CICSLIB(DFHEXLE)                                       3
 INCLUDE   OBJLIB(obj-prog)                                       4
 NAME      progname(R)                                            5

Notes for the Language Environment® job:

1 Specify the entry name as DFHEXTRA, which is the entry name in the CICS-supplied stub, DFHEXLE (see 3).

2 The CICS-supplied stub, DFHEXLE, 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 PROC statement in the user program.

3 Include DFHEXLE in any LE-conforming user program that you write for use with the DFHCSDUP EXTRACT command. DFHEXLE is the interface stub between DFHCULIS, a module in DFHCSDUP, and the Language Environment user program.

4 obj-prog is the name of the object program.

5 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.