 TYPE
    fdt$table_variable = record
      name: ost$name,
      table_objects: fdt$table_objects,
      variable_exists: boolean,
      variable_index: fdt$variable_index,
    recend;

*copyc fdt$table_objects
*copyc fdt$variable_index
*copyc ost$name
