ORIGINAL_TRANSACTION_ID(name4)
returns the transaction id that was used to attach the transaction. For example,
if an alias was used at a terminal, this field returns the alias.
name4
The name of a 4-byte location to receive the name of the original
transaction identifier.
OUT_TRANSACTION_TOKEN(name8)
returns the token that represents the task.
name8
The name of an 8-byte location to receive the transaction token for the
task.
RE_ATTACHED_TRANSACTION(name1)
returns, in a 1-byte location (
name1
), a value indicating whether the transaction
has been re-attached.
NO The transaction has not been re-attached and the global user exit
program is invoked in the same environment as the original
transaction-attach.
YES The transaction has been re-attached and the global user exit program
is invoked in a different environment from the original
transaction-attach.
RESOURCE_NAME(name8)
returns the name of a resource that the (suspended) transaction waiting for.
name8
The name of an 8-byte location to receive the name of the resource on
which the transaction is waiting.
RESOURCE_TYPE(name8)
returns the type of resource that the (suspended) transaction waiting for.
name8
The name of an 8-byte location to receive the type of resource on
which the transaction is waiting.
RESTART_COUNT(name2 | (Rn))
returns the number of times this instance of the transaction has been restarted.
name2
The name of a 2-byte location to receive the number of times the
transaction has been restarted, expressed as a half-word binary value.
(Rn) A register to receive the number of times the transaction has been
restarted, expressed as a half-word binary value.
START_CODE(name1)
returns, in a 1-byte location (
name1
), a value indicating how the task was
started:
C A CICS internal attach.
DF The start code isn’t yet known—to be set later.
QD A transient data trigger level attach.
S A START command without any data.
SD A START command with data.
SZ A front end programming interface (FEPI) attach.
transaction management functions
Chapter 3. The user exit programming interface (XPI) 385