 TYPE
    fdt$get_table_attribute = record
      get_value_status: {output} fdt$get_value_status,
      case key: {input} fdt$get_table_key of

      = fdc$get_next_table_variable =
        variable_name: {output} ost$name,

      = fdc$get_number_table_variables =
        number_table_variables: {output} fdt$number_table_variables,

      = fdc$get_stored_occurrence =
        stored_occurrence: {output} fdt$occurrence,

      = fdc$get_unused_table_entry =
        ,

      = fdc$get_visible_occurrence =
        visible_occurrence: {output} fdt$occurrence,

      casend
    recend;

?? PUSH (LISTEXT := ON) ??
*copyc fdt$get_value_status
*copyc fdt$get_table_key
*copyc ost$name
*copyc fdt$number_table_variables
*copyc fdt$occurrence
?? POP ??
