VMS Help  —  COBOL  miscellaneous_topics, special_registers, 2 DB-CURRENT-RECORD-ID
  A database special register containing the subschema user ID number
  (UID) of the record type of the current record of the run unit.  It
  contains zero if there is no current record of the run unit.
Close Help