VMS Help — COBOL miscellaneous_topics, special_registers, 3 DB-CURRENT-RECORD-NAME
A database special register containing the name of the record type of
the current record of the run unit. It contains spaces if there is no
current record of the run unit.