
  TYPE
    pft$served_family_locator = record
     server_mainframe_id: pmt$binary_mainframe_id,
     served_family_table_index: dft$served_family_table_index,
     server_location: dft$server_location,
    recend;

*copyc pmt$binary_mainframe_id
*copyc dft$served_family_table_index
*copyc dft$server_location
