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 ]

  1 - screen-name

  is the name of a screen item defined in the SCREEN SECTION of the
  program.

  2 - line-num

  is a numeric literal that specifies a line position on the terminal
  screen.  Line-num must be a positive integer.  It cannot be zero.

  3 - line-id

  is the identifier of a data item that provides a line position on
  the  terminal screen.

  4 - column-num

  is a numeric literal that specifies a column position on the
  terminal screen.  Column-num must be a positive integer.  It cannot
  be zero.

  5 - column-id

  is the identifier of a data item that provides a column position on
  the terminal screen.

  6 - stment

  is an imperative statement executed for an AT END, NOT AT END,
  ON EXCEPTION or NOT ON EXCEPTION condition.
  Close     Help