VMS Help
COBOL, PROCEDURE_DIVISION, ACCEPT, 5format_screen_section_extensions
*Conan The Librarian
|
The ACCEPT statement makes low-volume data available to the program.
The HP extensions to the ACCEPT statement (formats 3, 4 and 5) are
COBOL language additions that facilitate video forms design and data
handling.
Format 5 -
ACCEPT screen-name
[ {| LINE NUMBER { line-num } |} ]
[ {| { line-id } |} ]
[ AT {| |} ]
[ {| COLUMN NUMBER { column-num } |} ]
[ {| { column-id } |} ]
[ ON EXCEPTION stment ]
[ NOT ON EXCEPTION stment2 ]
[ END-ACCEPT ]
is the name of a screen item defined in the SCREEN SECTION of the
program.
is a numeric literal that specifies a line position on the terminal
screen. Line-num must be a positive integer. It cannot be zero.
is the identifier of a data item that provides a line position on
the terminal screen.
is a numeric literal that specifies a column position on the
terminal screen. Column-num must be a positive integer. It cannot
be zero.
is the identifier of a data item that provides a column position on
the terminal screen.
is an imperative statement executed for an AT END, NOT AT END,
ON EXCEPTION or NOT ON EXCEPTION condition.