Pathway/iTS SCREEN COBOL Reference Manual (G06.24+, H06.03+, Pathway/iTS 1.0+)

Data Division
Compaq NonStop™ Pathway/iTS SCREEN COBOL Reference Manual426750-001
5-100
RESTART-COUNTER Special Register
RESTART-COUNTER Special Register
The RESTART-COUNTER special register contains the number of times a
transaction has been restarted during transaction mode. The first time the
BEGIN-TRANSACTION statement executes, the register is set to zero. This number is
incremented immediately following each execution of the BEGIN-TRANSACTION
statement.
The register has the following implicit declaration:
STOP-MODE Special Register
The STOP-MODE special register can prevent interruption of multiple step transactions.
A single copy of this register is global to the program units.
The register is set to zero when the terminal is first started, and the value is subsequently
under program control. Most programs will continue with a value of zero.
When the value is nonzero, several PATHCOM commands are affected. The effect of
the STOP TERM, SUSPEND TERM, and FREEZE SERVER commands is delayed
until the register value returns to zero. The SUSPEND and FREEZE commands can be
issued in a form that causes the STOP-MODE value to be disregarded.
The register has the following implicit declaration:
TELL-ALLOWED Special Register
The TELL-ALLOWED special register can be set by the program to control the issuing
of tell messages to a terminal during ACCEPT statement processing. It has no meaning
for programs communicating with intelligent devices.
A copy of this register is available to each program unit. The register is initialized to
YES each time the program unit is called. The program can move NO into the register
to prevent tell messages from being displayed during succeeding accept operations.
When this register is set to YES and a tell message is waiting, the following occurs:
When the TCP is about to complete an accept operation, it displays the tell message
(prefixed by the word MESSAGE:) in the ADVISORY field.
The TCP waits for any function key from the terminal operator, then resets the field
and completes the accept operation.
When this register is set to NO, display of the tell message is postponed.
The register has the following implicit declaration:
01 RESTART-COUNTER PIC 9999 COMP.
01 STOP-MODE PIC 9999 COMP.
01 TELL-ALLOWED PIC AAA.