
  TYPE
    clt$field_value = record
      name: clt$field_name,
      value: ^clt$data_value,
    recend;

*copyc clt$data_value
*copyc clt$field_name
