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-8
ACCEPT Statement
terminal operator can use. At least one of these two clauses must be present with a
completion condition. If both clauses are present, any one completion condition can
appear in only one of the two clauses.
comp-condition-1
specifies the completion conditions under which the statement is to terminate with
input of data.
comp-condition-2
specifies the completion conditions under which the statement is to terminate
without input of data.
Language elements that can appear as completion conditions (comp-condition-
1 or comp-condition-2) are:
ABORT
indicates that the abort input-control characters were entered to terminate the
ACCEPT statement. This phrase is effective only for terminals in
conversational mode. Refer to the ABORT-INPUT clause described in
Section 5.
ABORT is allowed only in the ESCAPE clause. If this phrase is executed, the
data items in Working-Storage are not changed.
If the Break key is enabled by Pathway system configuration commands (either
the PATHCOM SET PROGRAM TYPE or SET TERM command) for the
program unit or for the terminals at which the program unit runs, the ABORT
clause must be specified for the Break key to work.
If the terminal is in block mode, ABORT is treated as a comment.
INPUT
indicates that the ACCEPT statement terminates with valid screen input. This
phrase is effective only for terminals in conversational mode.
If the terminal is in block mode, INPUT is treated as a comment.
TIMEOUT timeout-value
specifies a time limit in seconds that the terminal operator has to complete the
data entry. The timeout-value can be a numeric literal or a numeric data
item; valid values are 0 through 32,767 seconds. If the operator does not
respond in the specified number of seconds, TERMINATION-SUBSTATUS is
set to 40, and the ACCEPT operation is cancelled. TIMEOUT can appear only
in the ESCAPE clause. The maximum timeout value is the largest value that will
fit in a 32-bit field.
If this phrase is not specified, there is no time limit.