
  TYPE
    pft$catalog_file = record
      physical_catalog_header: pft$physical_catalog_header,
      catalog_heap: ALIGNED [0 MOD 32] pft$catalog_heap,
    recend;

*copyc pfc$cycle_contraction_count
*copyc pft$catalog_heap
*copyc pft$physical_catalog_header
*copyc pft$p_cycle_list
*copyc pft$p_stored_file_label
*copyc pft$p_physical_fmd
*copyc pft$p_log_list
*copyc pft$p_permit_list
