
{ This deck contains all of the permanent file manager keypoint constants.

  CONST

    { ENTRY/EXIT CLASS KEYPOINTS }

    pfk$attach = pfk$base,
    {E 'pfp$attach'}
    {X 'pfp$attach'}

    pfk$change = pfk$base + 1,
    {E 'pfp$change' 'callring' I20}
    {X 'pfp$change'}

    pfk$change_family_name = pfk$base + 2,
    {E 'pfp$change_family_name'}
    {X 'pfp$change_family_name'}

    pfk$clear_catalog_alarm = pfk$base + 3,
    {E 'pfp$clear_catalog_alarm'}
    {X 'pfp$clear_catalog_alarm'}

    pfk$collect_file_information = pfk$base + 4,
    {E 'pfp$collect_file_information' 'callring' I20}
    {X 'pfp$collect_file_information'}

    pfk$define = pfk$base + 5,
    {E 'pfp$define' 'callring' I20}
    {X 'pfp$define'}

    pfk$define_catalog = pfk$base + 6,
    {E 'pfp$define_catalog' 'callring' I20}
    {X 'pfp$define_catalog'}

    pfk$define_data = pfk$base + 7,
    {E 'pfp$define_data' 'callring' I20}
    {X 'pfp$define_data'}

    pfk$define_mass_storage_catalog = pfk$base + 8,
    {E 'pfp$define_mass_storage_catalog'}
    {X 'pfp$define_mass_storage_catalog'}

    pfk$define_master_catalog = pfk$base + 9,
    {E 'pfp$define_master_catalog' 'callring' I20}
    {X 'pfp$define_master_catalog'}

    pfk$delete_all_archive_entries = pfk$base + 10,
    {E 'pfp$delete_all_archive_entries' 'callring' I20}
    {X 'pfp$delete_all_archive_entries'}

    pfk$delete_archive_entry = pfk$base + 11,
    {E 'pfp$delete_archive_entry' 'callring' I20}
    {X 'pfp$delete_archive_entry'}

    pfk$delete_catalog_permit = pfk$base + 12,
    {E 'pfp$delete_catalog_permit' 'callring' I20}
    {X 'pfp$delete_catalog_permit'}

    pfk$delete_permit = pfk$base + 13,
    {E 'pfp$delete_permit' 'callring' I20}
    {X 'pfp$delete_permit'}

    pfk$find_archive_info = pfk$base + 14,
    {E 'pfp$find_archive_info'}
    {X 'pfp$find_archive_info'}

    pfk$find_catalog_description = pfk$base + 15,
    {E 'pfp$find_catalog_description'}
    {X 'pfp$find_catalog_description'}

    pfk$find_cycle_array = pfk$base + 16,
    {E 'pfp$find_cycle_array'}
    {X 'pfp$find_cycle_array'}

    pfk$find_cycle_array_version_2 = pfk$base + 17,
    {E 'pfp$find_cycle_array_version_2'}
    {X 'pfp$find_cycle_array_version_2'}

    pfk$find_cycle_entry = pfk$base + 18,
    {E 'pfp$find_cycle_entry'}
    {X 'pfp$find_cycle_entry'}

    pfk$find_cycle_entry_version_2 = pfk$base + 19,
    {E 'pfp$find_cycle_entry_version_2'}
    {X 'pfp$find_cycle_entry_version_2'}

    pfk$find_cycle_label = pfk$base + 20,
    {E 'pfp$find_cycle_label'}
    {X 'pfp$find_cycle_label'}

    pfk$find_direct_info_record = pfk$base + 21,
    {E 'pfp$find_direct_info_record'}
    {X 'pfp$find_direct_info_record'}

    pfk$find_directory_array = pfk$base + 22,
    {E 'pfp$find_directory_array'}
    {X 'pfp$find_directory_array'}

    pfk$find_file_description = pfk$base + 23,
    {E 'pfp$find_file_description'}
    {X 'pfp$find_file_description'}

    pfk$find_log_array = pfk$base + 24,
    {E 'pfp$find_log_array'}
    {X 'pfp$find_log_array'}

    pfk$find_media = pfk$base + 25,
    {E 'pfp$find_catalog/cycle_media'}
    {X 'pfp$find_catalog/cycle_media'}

    pfk$find_next_archive_entry = pfk$base + 26,
    {E 'pfp$find_next_archive_entry'}
    {X 'pfp$find_next_archive_entry'}

    pfk$find_next_info_record = pfk$base + 27,
    {E 'pfp$find_next_info_record'}
    {X 'pfp$find_next_info_record'}

    pfk$find_permit_array = pfk$base + 28,
    {E 'pfp$find_permit_array'}
    {X 'pfp$find_permit_array'}

    pfk$get_attached_pf_table = pfk$base + 29,
    {E 'pfp$get_attached_pf_table'}
    {X 'pfp$get_attached_pf_table'}

    pfk$get_catalog = pfk$base + 30,
    {E 'pfp$get_catalog' 'pathleng' I20}
    {X 'pfp$get_catalog'}

    pfk$get_catalog_alarm_table = pfk$base + 31,
    {E 'pfp$get_catalog_alarm_table'}
    {X 'pfp$get_catalog_alarm_table'}

    pfk$get_catalog_segment = pfk$base + 32,
    {E 'pfp$get_catalog_segment' 'callring' I20}
    {X 'pfp$get_catalog_segment'}

    pfk$get_family_info = pfk$base + 33,
    {E 'pfp$get_family_info' 'callring' I20}
    {X 'pfp$get_family_info'}

    pfk$get_family_set = pfk$base + 34,
    {E 'pfp$get_family_set' 'callring' I20}
    {X 'pfp$get_family_set'}

    pfk$get_item_info = pfk$base + 35,
    {E 'pfp$get_item_info' 'callring' I20}
    {X 'pfp$get_item_info'}

    pfk$get_master_catalog_info = pfk$base + 36,
    {E 'pfp$get_master_catalog_info' 'callring' I20}
    {X 'pfp$get_master_catalog_info'}

    pfk$get_multi_item_info = pfk$base + 37,
    {E 'pfp$get_multi_item_info' 'callring' I20}
    {X 'pfp$get_multi_item_info'}

    pfk$get_next_file_selection = pfk$base + 38,
    {E 'pfp$get_next_file_selection' 'callring' I20}
    {X 'pfp$get_next_file_selection'}

    pfk$get_object_information = pfk$base + 39,
    {E 'pfp$get_object_information'}
    {X 'pfp$get_object_information'}

    pfk$get_queued_catalog_table = pfk$base + 40,
    {E 'pfp$get_queued_catalog_table'}
    {X 'pfp$get_queued_catalog_table'}

    pfk$get_stored_fmd = pfk$base + 41,
    {E 'pfk$get_stored_fmd' 'callring' I20}
    {X 'pfk$get_stored_fmd'}

    pfk$get_stored_fmd_size = pfk$base + 42,
    {E 'pfk$get_stored_fmd_size' 'callring' I20}
    {X 'pfk$get_stored_fmd_size'}

    pfk$internal_locate_object = pfk$base + 43,
    {E 'pfp$internal_locate_object'}
    {X 'pfp$internal_locate_object' 'index' I20}

    pfk$locate_object = pfk$base + 44,
    {E 'pfp$locate_object'}
    {X 'pfp$locate_object' 'index' I20}

    pfk$mark_release_candidate = pfk$base + 45,
    {E 'pfp$mark_release_candidate' 'callring' I20}
    {X 'pfp$mark_release_candidate'}

    pfk$overhaul_catalog = pfk$base + 46,
    {E 'pfp$overhaul_catalog' 'callring' I20}
    {X 'pfp$overhaul_catalog'}

    pfk$overhaul_set = pfk$base + 47,
    {E 'pfp$overhaul_set' 'callring' I20}
    {X 'pfp$overhaul_set'}

    pfk$permit = pfk$base + 48,
    {E 'pfp$permit' 'callring' I20}
    {X 'pfp$permit'}

    pfk$permit_catalog = pfk$base + 49,
    {E 'pfp$permit_catalog' 'callring' I20}
    {X 'pfp$permit_catalog'}

    pfk$purge = pfk$base + 50,
    {E 'pfp$purge' 'callring' I20}
    {X 'pfp$purge'}

    pfk$purge_catalog = pfk$base + 51,
    {E 'pfp$purge_catalog' 'callring' I20}
    {X 'pfp$purge_catalog'}

    pfk$purge_master_catalog = pfk$base + 52,
    {E 'pfp$purge_master_catalog' 'callring' I20}
    {X 'pfp$purge_master_catalog'}

    pfk$put_archive_entry = pfk$base + 53,
    {E 'pfp$put_archive_entry' 'callring' I20}
    {X 'pfp$put_archive_entry'}

    pfk$put_archive_info = pfk$base + 54,
    {E 'pfp$put_archive_info' 'callring' I20}
    {X 'pfp$put_archive_info'}

    pfk$put_catalog_media_info = pfk$base + 55,
    {E 'pfp$put_catalog_media_info'}
    {X 'pfp$put_catalog_media_info'}

    pfk$put_cycle_info = pfk$base + 56,
    {E 'pfp$put_cycle_info' 'callring' I20}
    {X 'pfp$put_cycle_info'}

    pfk$put_family_info = pfk$base + 57,
    {E 'pfp$put_family_info' 'callring' I20}
    {X 'pfp$put_family_info'}

    pfk$put_file_media_info = pfk$base + 58,
    {E 'pfp$put_file_media_info'}
    {X 'pfp$put_file_media_info'}

    pfk$put_item_info = pfk$base + 59,
    {E 'pfp$put_item_info' 'callring' I20}
    {X 'pfp$put_item_info'}

    pfk$put_master_catalog_info = pfk$base + 60,
    {E 'pfp$put_master_catalog_info' 'callring' I20}
    {X 'pfp$put_master_catalog_info'}

    pfk$r3_attach_or_create_file = pfk$base + 61,
    {E 'pfp$r3_attach_or_create_file' 'callring' I20}
    {X 'pfp$r3_attach_or_create_file'}

    pfk$reattach_permanent_file = pfk$base + 62,
    {E 'pfp$reattach_permanent_file' 'apfid' I20}
    {X 'pfp$reattach_permanent_file'}

    pfk$release_data = pfk$base + 63,
    {E 'pfp$release_data' 'callring' I20}
    {X 'pfp$release_data'}

    pfk$replace_archive_entry = pfk$base + 64,
    {E 'pfp$replace_archive_entry' 'callring' I20}
    {X 'pfp$replace_archive_entry'}

    pfk$restricted_attach = pfk$base + 65,
    {E 'pfp$restricted_attach' 'callring' I20}
    {X 'pfp$restricted_attach'}

    pfk$return_file_information = pfk$base + 66,
    {E 'pfp$return_file_information' 'callring' I20}
    {X 'pfp$return_file_information'}

    pfk$return_permanent_file = pfk$base + 67,
    {E 'pfp$return_permanent_file' 'apfid' I20}
    {X 'pfp$return_permanent_file'}

    pfk$save_file_label = pfk$base + 68,
    {E 'pfp$save_file_label' 'apfid' I20}
    {X 'pfp$save_file_label'}

    pfk$save_released_file_label = pfk$base + 69,
    {E 'pfp$save_released_file_label' 'callring' I20}
    {X 'pfp$save_released_file_label'}

    pfk$set_catalog_alarm = pfk$base + 70,
    {E 'pfp$set_catalog_alarm'}
    {X 'pfp$set_catalog_alarm' 'index' I20}

    pfk$start_retrieve = pfk$base + 71,
    {E 'pfp$retrieve_archived_file'}
    {X 'pfp$retrieve_archived_file'}

    pfk$utility_attach = pfk$base + 72,
    {E 'pfp$utility_attach'}
    {X 'pfp$utility_attach'}

    pfk$verify_pva = pfk$base + 73,
    {E 'pfp$verify_pva' 'callring' I20}
    {X 'pfp$verify_pva'}


    { UNUSUAL CLASS KEYPOINTS }

    pfk$invalid_amd = pfk$base + 28,
    {U 'invalid archive media descriptor'}

    pfk$invalid_archive_entry = pfk$base + 29,
    {U 'invalid archive entry'}

    pfk$invalid_catalog_header = pfk$base + 30,
    {U 'invalid catalog header'}

    pfk$invalid_cycle_entry = pfk$base + 31,
    {U 'invalid cycle_entry'}

    pfk$invalid_file_label_entry = pfk$base + 32,
    {U 'invalid file label entry'}

    pfk$invalid_fmd_entry = pfk$base + 33,
    {U 'invalid fmd entry'}

    pfk$invalid_log_entry = pfk$base + 34,
    {U 'invalid log entry'}

    pfk$invalid_object_entry = pfk$base + 35,
    {U 'invalid object entry'}

    pfk$invalid_permit_entry = pfk$base + 36,
    {U 'invalid permit entry'}

    pfk$job_pageable_full = pfk$base + 38,
    {U 'job pageable heap full'}

    pfk$unknown_internal_cycle = pfk$base + 78,
    {U 'unknown internal cycle'}

    pfk$unknown_internal_path = pfk$base + 79,
    {U 'unknown internal path'}


    { DEBUG CLASS KEYPOINTS }

    pfk$apfid_assigned = pfk$base + 1,
    {D 'apfid assigned' 'apfid' I20}

    pfk$attach_last_queued_catalog = pfk$base + 2,
    {D 'pfp$attach_last_queued_catalog' 'pathindx' I20}

    pfk$file_server_request = pfk$base + 20,
    {D 'PF file server request' 'sfti' I20}

    pfk$invalid_apfid = pfk$base + 32,
    {D 'invalid apfid' 'apfid' I20}

    pfk$queued_catalog_found = pfk$base + 62,
    {D 'catalog found queued'}

    pfk$record_dm_file_parameters = pfk$base + 66;
    {D 'pfp$record_dm_file_parameters'}

?? PUSH (LISTEXT := ON) ??
*copyc amk$base_keypoint_values
?? POP ??
