VMS Help  —  COBOL  PROCEDURE_DIVISION, ACCEPT  4format screen extensions CONTROL KEY
  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 4 -

   ACCEPT CONTROL KEY IN key-dest-item

      {|                  { line-num                      }      |}
      {| FROM LINE NUMBER { line-id [ PLUS [ plus-num ] ] }      |}
      {|                  { PLUS [ plus-num ]             }      |}
      {|                    { column-num                       } |}
      {| FROM COLUMN NUMBER { column-id [ PLUS [ plus-num ] ]  } |}
      {|                    { PLUS [ plus-num ]                } |}
      {| ERASE [TO END OF] { SCREEN }                            |}
      {|                   { LINE   }                            |}
      {| WITH BELL                                               |}

      { [ ON EXCEPTION stment ] [ NOT ON EXCEPTION stment  ] }
      { [ AT END stment ] [ NOT AT END stment  ]             }

      [ END-ACCEPT ]
Additional Information: explode extract

line-num line-id
column-num column-id
plus-num
key-dest-item
stment
Close Help