iTS 1.0+)

Data Division

Compaq NonStop™ Pathway/iTS SCREEN COBOL Reference Manual—426750-001

5-102

TERMINATION-SUBSTATUS Special Register

The TERMINATION-SUBSTATUS special register communicates an error number

further describing the error communicated in TERMINATION-STATUS when the ON

ERROR branch of one of the following statements is taken: CALL, RECEIVE

UNSOLICITED MESSAGE, REPLY TO UNSOLICITED MESSAGE, SEND, SEND

MESSAGE, or TRANSFORM. A copy of this register is local to each program unit.

The register has the following implicit declaration:

TRANSACTION-ID Special Register

The TRANSACTION-ID special register contains the value of the transaction identifier

that the Compaq Transaction Management Facility (TMF) assigns when the BEGIN-

TRANSACTION statement executes. TMF assigns a unique identifier to this register

for each new or restarted transaction. The register is set to SPACES after either the

END-TRANSACTION or the ABORT-TRANSACTION statement executes.

Generally, the contents of this special register should not be displayed on a terminal

screen because the associated data item contains binary data. You use this register to

locate uniquely identified transactions.

The register has the following implicit declaration:

01 TERMINATION-SUBSTATUS PIC 9(5) COMP.

01 TRANSACTION-ID PIC X(8).