IBM Extension
IBM Extension

DB-FORMAT-NAME Special Register

After the execution of an input/output statement, for a FORMATFILE or DATABASE file, the DB-FORMAT-NAME special register is modified according to the following rules:
  • After completion of a successful READ, WRITE, REWRITE, START, or DELETE operation, the record format name used in the I-O operation is implicitly moved to the special register.
  • After an unsuccessful input/output operation, DB-FORMAT-NAME contains the record format name used in the last successful input/output operation.
  • DB-FORMAT-NAME is implicitly defined as PICTURE X(10) and GLOBAL in the outermost program.

You may specify the DB-FORMAT-NAME special register in a function whenever an alphanumeric argument is allowed.

End of IBM Extension
End of IBM Extension