
  TYPE
    pft$p_physical_catalog_header = ^pft$physical_catalog_header,

*copyc pft$physical_catalog_header
