
  TYPE
    dst$rdf_type = (dsc$rdf_production, dsc$rdf_system_message_buffer,
          dsc$rdf_recovery, dsc$rdf_unused);
