
  TYPE
    pft$mainframe_list_locator = record
      mainframe_count: pft$mainframe_count,
      relative_cell_pointer: pft$relative_cell_pointer,
    recend;

*copyc pft$mainframe_count
*copyc pft$relative_cell_pointer
