VMS Help  —  COBOL  PROCEDURE_DIVISION, USE
  The USE statement specifies Declarative procedures to handle
  input/output errors and database exception conditions.  It can also
  specify procedures to be executed before the program processes a
  specific report group.

  These procedures supplement the standard procedures in the COBOL
  Run-Time System and OpenVMS RMS.

1  –  1format AFTER EXCEPTION

  The USE statement specifies Declarative procedures to handle
  input/output errors and database exception conditions.  It can also
  specify procedures to be executed before the program processes a
  specific report group.

  These procedures supplement the standard procedures in the COBOL
  Run-Time System and OpenVMS RMS.

  Format 1 -

                                                      { {file-name} ...}
                                                      { INPUT          }
  USE [GLOBAL] AFTER STANDARD {EXCEPTION }PROCEDURE ON{ OUTPUT         }.
                              {ERROR     }            { I-O            }
                                                      { EXTEND         }

1.1  –  file-name

  is the name of a file connector described in a file description entry
  in a Data Division.  It cannot refer to a sort or merge file.

2  –  2format BEFORE REPORTING

  The USE statement specifies Declarative procedures to handle
  input/output errors and database exception conditions.  It can also
  specify procedures to be executed before the program processes a
  specific report group.

  These procedures supplement the standard procedures in the COBOL
  Run-Time System and OpenVMS RMS.

  Format 2 -

   USE [GLOBAL] BEFORE REPORTING group-data-name .

2.1  –  group-data-name

  is the name of a report group in a report group description entry in
  a Data Division.  It must not appear in more than one USE statement.

3  –  3format DB-EXCEPTION

  The USE statement specifies Declarative procedures to handle
  input/output errors and database exception conditions.  It can also
  specify procedures to be executed before the program processes a
  specific report group.

  Format 3 -

   USE [GLOBAL] FOR DB-EXCEPTION [ON { {DBM$_exception-condition} ... }].
                                 [   { OTHER                          }]

3.1  –  DBM$ exception-condition

  is a symbolic constant name beginning with the characters "DBM$_".
  It identifies a DBMS exception condition.
Close Help