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-9
ACCEPT Statement
Use of the PW-QUEUE-FKEY-TIMEOUT special register allows locking the
keyboard before processing the TIMEOUT logic. For further information see
Special Registers on page 5-93..
UNSOLICITED [ MESSAGE ]
indicates that the ACCEPT statement is to be aborted on the arrival of an
unsolicited message. You detect the receipt of an unsolicited message by
checking for the appropriate condition code value in TERMINATION-STATUS
following completion of the ACCEPT statement. UNSOLICITED MESSAGE
can appear only in the ESCAPE clause.
Use of the PW-QUEUE-FKEY-UMP special register allows locking the
keyboard before processing the unsolicited message logic. For further
information see Special Registers
on page 5-93.
mnemonic-name
indicates the ACCEPT operation completes when the terminal operator presses the
associated function key. This assumes mnemonic-name has been associated with
a terminal function key; the association is specified by an IS phrase in the
SPECIAL-NAMES paragraph of the Environment Division. Because of terminal
characteristics, certain keys can be used only in the ESCAPE clause. Table 4-1 lists
the system names of function keys that can be used only in the ESCAPE clause.
mnemonic-name-1 THROUGH mnemonic-name-2
indicates a set of function keys as a single condition. The mnemonic-names must
be associated with the keys from the same range (shifted or unshifted) of function
keys; for example, F2 THROUGH F15.
Use of this option can produce unexpected results if you change function key
mapping in the SPECIAL-NAMES paragraph. With function-key remapping, you
should list the individual mnemonic names of all keys to be included in the UNTIL
and ESCAPE clauses without using the THROUGH or THRU option.
Block Mode Accept Operation
The ACCEPT statement enables the terminal keyboard and waits for input from the
terminal. When a valid control key code is received from the terminal, the keyboard is
disabled and a RESET TEMP is executed automatically; this causes the removal of any
temporary field attributes or data from the display regardless of whether they were
originally displayed explicitly by the program or implicitly through the ACCEPT
statement. If termination is caused by the completion condition specified in the
ESCAPE clause, the ACCEPT statement terminates at this point.
Note. Do not use enclosing parentheses for a function key range following a TIMEOUT clause
if a Working-Storage item is used for the TIMEOUT value and the item is not indexed; if you
include the parentheses, a SCREEN COBOL compiler error occurs.
Note. In conversational mode, all comp-condition phrases except ABORT, INPUT, TIMEOUT,
and UNSOLICITED MESSAGE are ignored.