XDTLC user exit

The XDTLC user exit is invoked when the loading of the data table is complete, whether successful or not. The user exit is not invoked if the data table is closed for any reason before loading is complete.

The exit program is informed if the loading did not complete successfully; see field UEPDTORC. This could occur, for example, if the maximum number of records was reached or there was insufficient virtual storage. In this case, the exit program can request that the file is closed immediately, by setting the return code.

Depending on the return code value, the following action is taken by CICS®:

Table 1. Return codes for XDTLC user exit. A value of UERCPURG should be returned if the exit program has received a PURGED response to a call that it has issued.
Return code Action
UERCDTOK No action; the file remains open. This is the default if the exit is not activated.
UERCDTCL Close the file.

Sample XDTLC exit program: DFH$DTLC

DFH$DTLC is a sample XDTLC global user exit program. It demonstrates the use of the XDTLC user exit for shared data tables. The sample program is provided in the SDFHSAMP library.