HELPLIB.HLB  —  COBOL  PROCEDURE_DIVISION, miscellaneous_topics, database_key_identifiers
  Database key identifiers are in Record Selection Expressions.

  If a database exception condition occurs during the execution of a
  FETCH or FIND statement, the Database Control System (DBCS) places a
  database exception condition code in the special register
  DB-CONDITION.  This code identifies the condition.  The DBCS also
  places the record name of database-record in the special register
  DB-CURRENT-RECORD-NAME and its UID in DB-CURRENT-RECORD-ID.

  Format 1 - Currency Indicator Access

            [        { record-name } ]
    CURRENT [ WITHIN { set-name    } ]
            [        { realm-name  } ]

  Format 2 - Keeplist Access

    { OFFSET integer-exp }
    { FIRST              } WITHIN keeplist-name
    { LAST               }
Close Help