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

Procedure Division
Compaq NonStop™ Pathway/iTS SCREEN COBOL Reference Manual—426750-001
6-6
ABORT-TRANSACTION Statement
ABORT-TRANSACTION Statement
The ABORT-TRANSACTION statement aborts the transaction of a terminal operating
in transaction mode. Transaction mode is an operating mode in which Pathway servers
that are configured to run under the Compaq Transaction Management Facility (TMF)
can lock and update audited files. When this statement executes, all database updates
that were made to audited files during the transaction are backed out and no attempt is
made to restart the transaction.
Execution of this statement causes the terminal to leave transaction mode, and the
special register TRANSACTION-ID to be set to SPACES.
If the terminal is not in transaction mode when this statement is executed, the terminal is
suspended for pending abort.
If a fatal error occurs while the transaction is being aborted, and the current
BEGIN-TRANSACTION statement does not have an ON ERROR phrase, the terminal
is suspended for pending abort; the current transaction is backed out. If the current
BEGIN-TRANSACTION statement includes an ON ERROR phrase, the ON ERROR
branch is executed, and the terminal is not suspended.
For additional information about programming for TMF, see the Compaq NonStop™
Pathway/iTS TCP and Terminal Programming Guide.
ACCEPT Statement
The ACCEPT statement operates differently for terminals in block mode from terminals
in conversational mode. It cannot be used to communicate with intelligent devices.
If the terminal associated with the SCREEN COBOL program is operating in block
mode, ACCEPT performs the following:
•
Waits for response from the terminal
•
Receives data from the terminal
•
Returns only valid data to the program, determining the validity of the data from the
definitions in the Screen Section of the Data Division
•
If invalid data is entered and an ADVISORY field is defined for the base screen,
displays an error message and enhances the field in error so the data can be
corrected or reentered.
If the terminal associated with the SCREEN COBOL program is operating in
conversational mode, ACCEPT performs the following:
•
Displays the prompt value defined for the first screen field described with a
PROMPT clause. The prompt value is always displayed in the first column of the
screen line.
•
Waits for response from the terminal. If the TIMEOUT phrase is used, ACCEPT
waits the time limit specified in this phrase.
ABORT-TRANSACTION