IBM SC34-6814-04 User Manual
Page 31
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