 TYPE
    fdt$record_definitions = record
      active_number: fdt$number_record_variables,
      p_record_definitions: REL (fdt$form_module) ^array [1 .. * ] of
        fdt$variable_record_definition,
      total_number: fdt$number_record_variables,
    recend;

*copyc fdt$number_record_variables
*copyc fdt$form_module
*copyc fdt$variable_record_definition
