Exit xdsawt, Dl/i interface program exits xdlipre and xdlipost – IBM SC34-6814-04 User Manual

Page 70

Advertising
background image

XPI calls

Must not be used.

Exit XDSAWT

When invoked

After an operating system wait issued by the quasireentrant CICS TCB.

Exit-specific parameters

UEPSYSRC

Address of the 4-byte return code from the SYSEVENT request
made before the operating system wait. This return code will be in
one of two different forms:

1. The SYSEVENT OKSWAP return code, or

2. If the SYSEVENT request was rejected by CICS, a special

CICS return code which will take one of the following decimal
values:

17

The SYSEVENT OKSWAP was not issued. The
outstanding count of SYSEVENT OKSWAP requests
exceeds the count of SYSEVENT DONTSWAP
requests. Before a SYSEVENT OKSWAP can be
issued, a SYSEVENT DONTSWAP must be requested.

19

The SYSEVENT OKSWAP was not issued. The
outstanding count of SYSEVENT DONTSWAP requests
still exceeds the count of SYSEVENT OKSWAPs.
Further SYSEVENT OKSWAPs must be requested
before a SYSEVENT OKSWAP is issued by CICS.

Return codes

UERCNORM

Continue processing.

UERCNOSW

Issue SYSEVENT to suppress address-space swapping.

XPI calls

Must not be used.

DL/I interface program exits XDLIPRE and XDLIPOST

The XDLIPRE and XDLIPOST exit points are invoked following the issue of an
EXEC DLI command or DL/I call. Exit XDLIPRE is invoked before the request is
processed and XDLIPOST is invoked after the request is processed.

When the request is function shipped, the exits are invoked from both the
application-owning region and the database-owning region. However, there are
restrictions when they are invoked in a database-owning region, as described
below.

The CICS IMS Database Control Guide contains a sample program for the
XDLIPRE exit.

Note:

48

Customization Guide

Advertising