Filter
Top Products
Apart from register 15, which contains the return code value from the exit
program, the values in this save area are used by CICS to reload the registers
when returning to the calling CICS module. They should not be corrupted.
This address is not passed to global user exit programs invoked from exit
points in CICS domains.
UEPGIND
points to a 3-byte field containing indicators for use in AP domain user exits.
For non-AP domain user exits, the indicators are always zero.
The first indicator byte can take one of two symbolic values, UEPGANY and
UEPGCICS, which you can test to determine whether data locations can be
above or below 16MB, and whether the application’s storage is in CICS-key or
user-key storage:
UEPGANY
The application can accept addresses above 16MB. If the symbolic
value is not UEPGANY, the application must be returned an address
below 16MB.
UEPGCICS
The application’s working storage and the task’s life-time storage are in
CICS-key storage (TASKDATAKEY=CICS). If the symbolic value is not
UEPGCICS, the application’s working storage and the task’s life-time
storage are in user-key storage (TASKDATAKEY=USER).
The second and third bytes contain a value indicating the TCB mode of the
global user exit program's caller. This is represented in DFHUEPAR as both a
two-character code and a symbolic value, as follows:
Table 1. TCB indicators in DFHUEPAR. Description
Symbolic
value
2-byte
code
Description
UEPTQR QR The quasi-reentrant mode TCB
UEPTRO RO The resource-owning mode TCB
UEPTCO CO The concurrent mode TCB
UEPTSZ SZ The FEPI mode TCB
UEPTRP RP The ONC/RPC mode TCB
UEPTFO FO The file-owning mode TCB
UEPTSL SL The sockets listener mode TCB
UEPTSO SO The sockets mode TCB
UEPTS8 S8 The secure sockets layer mode TCB
UEPTD2 D2 The CICS–DB2 housekeeping mode TCB
UEPTJ8 J8 The J8 open TCB, used for JVMs that are in CICS key
UEPTJ9 J9 The J9 open TCB, used for JVMs that are in user key
UEPTJM JM The JM open TCB, used with the IBM SDK for z/OS, V1.4.2 for
the master JVM that initializes the shared class cache
UEPTL8 L8 An L8 open TCB, used for OPENAPI TRUEs, or OPENAPI
programs that are in CICS key
UEPTL9 L9 An L9 open TCB, used for OPENAPI programs that are in user
key
UEPTX8 X8 An X8 open TCB, used for C and C++ programs, compiled with
the XPLINK option, that are in CICS key
Chapter 1. Global user exit programs 9