 TYPE
    fdt$table_objects = record
      active_number: fdt$number_objects,
      p_table_objects: REL (fdt$form_module) ^array [1 .. * ] of
        fdt$table_object,
      total_number: fdt$number_objects,
    recend;

*copyc fdt$form_module
*copyc fdt$number_objects
*copyc fdt$table_object
