
  CONST
    pfc$archive_amd_record = pfc$reserved_info_archive_4,
    pfc$archive_array_entry_record = pfc$reserved_info_archive_3,
    pfc$archive_entry_record = pfc$reserved_info_archive_2,
    pfc$archive_info_record = pfc$reserved_info_archive_1,
    pfc$cycle_array_version_2_rec = pfc$reserved_info_record1;

  TYPE
    pft$info_record_type = (pfc$family_info_record,
          pfc$master_catalog_info_record, pfc$item_info_record,
          pfc$multi_item_info_record, pfc$directory_array_record,
          pfc$catalog_group_record, pfc$catalog_description_record,
          pfc$file_group_record, pfc$file_description_record,
          pfc$cycle_array_record, pfc$log_array_record,
          pfc$permit_array_record, pfc$catalog_media_record,
          pfc$cycle_array_extended_record, pfc$cycle_directory_record,
          pfc$cycle_info_record, pfc$cycle_media_record,
          pfc$cycle_label_record, pfc$archive_entry, { Obsolete }
          pfc$archive_media, { Obsolete }
          pfc$archive_processor, { Obsolete }
          pfc$archive_list, { Obsolete }
          pfc$archive_group, { Obsolete }
          pfc$archive_label, { Obsolete }
          pfc$reserved_info_archive_1, {Renamed pfc$archive_info_record }
          pfc$reserved_info_archive_2, {Renamed pfc$archive_entry_record }
          pfc$reserved_info_archive_3, {Renamed pfc$archive_array_entry_record}
          pfc$reserved_info_archive_4, {Renamed pfc$archive_amd_record }

{ Reserved for archiving

    pfc$reserved_info_archive_5, pfc$reserved_info_archive_6,
          pfc$reserved_info_archive_7, pfc$reserved_info_archive_8,
          pfc$reserved_info_archive_9, pfc$reserved_info_archive_10,
          pfc$reserved_info_archive_11, pfc$reserved_info_record1,
    { Renamed pfc$cycle_array_version_2_rec }

{ Reserved for future use

    pfc$reserved_info_record2, pfc$reserved_info_record3,
          pfc$reserved_info_record4, pfc$reserved_info_record5,
          pfc$reserved_info_record6, pfc$reserved_info_record7,
          pfc$reserved_info_record8, pfc$reserved_info_record9,
          pfc$reserved_info_record10, pfc$reserved_info_record11,
          pfc$reserved_info_record12, pfc$reserved_info_record13,
          pfc$reserved_info_record14, pfc$reserved_info_record15,
          pfc$reserved_info_record16, pfc$reserved_info_record17,
          pfc$reserved_info_record18, pfc$reserved_info_record19,
          pfc$reserved_info_record20, pfc$reserved_info_record21,
          pfc$reserved_info_record22, pfc$reserved_info_record23,
          pfc$reserved_info_record24, pfc$reserved_info_record25,
          pfc$reserved_info_record26, pfc$reserved_info_record28,
          pfc$reserved_info_record29, pfc$reserved_info_record30,
          pfc$reserved_info_record31, pfc$reserved_info_record32,
          pfc$reserved_info_record33, pfc$reserved_info_record34,
          pfc$reserved_info_record35, pfc$reserved_info_record36,
          pfc$reserved_info_record38, pfc$reserved_info_record39,
          pfc$reserved_info_record40, pfc$reserved_info_record41,
          pfc$reserved_info_record42, pfc$reserved_info_record43,
          pfc$reserved_info_record44, pfc$reserved_info_record45,
          pfc$reserved_info_record46, pfc$reserved_info_record48,
          pfc$reserved_info_record49, pfc$reserved_info_record50,
          pfc$reserved_info_record51, pfc$reserved_info_record52,
          pfc$reserved_info_record53, pfc$reserved_info_record54,
          pfc$reserved_info_record55, pfc$reserved_info_record56,
          pfc$reserved_info_record58, pfc$reserved_info_record59,
          pfc$reserved_info_record60, pfc$reserved_info_record61,
          pfc$reserved_info_record62, pfc$reserved_info_record63,
          pfc$reserved_info_record64, pfc$reserved_info_record65,
          pfc$reserved_info_record66, pfc$reserved_info_record68,
          pfc$reserved_info_record69, pfc$reserved_info_record70,
          pfc$reserved_info_record71, pfc$reserved_info_record72,
          pfc$reserved_info_record73, pfc$reserved_info_record74,
          pfc$reserved_info_record75, pfc$reserved_info_record76,
          pfc$reserved_info_record78, pfc$reserved_info_record79,
          pfc$reserved_info_record80, pfc$reserved_info_record81,
          pfc$reserved_info_record82, pfc$reserved_info_record83,
          pfc$reserved_info_record84, pfc$reserved_info_record85,
          pfc$reserved_info_record86, pfc$reserved_info_record88,
          pfc$reserved_info_record89, pfc$reserved_info_record90,
          pfc$reserved_info_record91, pfc$reserved_info_record92,
          pfc$reserved_info_record93, pfc$reserved_info_record94,
          pfc$reserved_info_record95, pfc$reserved_info_record96,
          pfc$reserved_info_record98, pfc$reserved_info_record99);

{ In order to support binary compatability of users of this type,
{ Aliases may be added. For example
{   CONST
{     pfc$shoe_size_info_record = pfc$reserved_info_record98;
{ All users would reference pfc$shoe_size_info_record not
{ pfc$reserved_info_record98.
