
  TYPE
    pft$file_label_locator = record
      file_label_size: pft$file_label_size,
      relative_cell_pointer: pft$relative_cell_pointer,
    recend;

*copyc pft$file_label_size
*copyc pft$relative_cell_pointer
