{
{                              common deck dmdkey
{

  CONST

    dmk$sfid = dmk$base,
      {D  'sfid.file_entry_index' 'SFID    ' H16 }

    dmk$allocate_file_space = dmk$base + 1,
      {E  'dmp$allocate_file_space' 'FBA     ' I20 }
      {X  'dmp$allocate_file_space' 'STATCOND' I20 }

    dmk$allocate_file_space_r1 = dmk$base + 2,
      {E  'dmp$allocate_file_space_r1' 'SFID    ' H16 }
      {X  'dmp$allocate_file_space_r1' 'STATCOND' I20 }

    dmk$system_initialization = dmk$base + 3,
      {E  'dmp$system_initialization' }
      {X  'dmp$system_initialization' }

    dmk$assign_volume = dmk$base + 4,
      {E  'dmp$assign_volume' }
      {X  'dmp$assign_volume' 'STATCOND' I20 }

    dmk$assign_volume_to_file = dmk$base + 5,
      {E  'dmp$assign_volume_to_file' 'SFID    ' H16 }
      {X  'dmp$assign_volume_to_file' 'STATCOND' I20 }

    dmk$associate_volume_with_job = dmk$base + 6,
      {E  'dmp$associate_volume_with_job' }
      {X  'dmp$associate_volume_with_job' }

    dmk$attach_file = dmk$base + 7,
      {E  'dmp$attach_file' 'GFN     ' I52 }
      {X  'dmp$attach_file' 'STATCOND' I20 }

    dmk$build_fmd_header = dmk$base + 9,
      {E  'dmp$build_fmd_header' }
      {X  'dmp$build_fmd_header' 'STATCOND' I20 }

    dmk$build_fmd_subfile_descript = dmk$base + 10,
      {E  'dmp$build_fmd_subfile_descript' }
      {X  'dmp$build_fmd_subfile_descript' 'STATCOND' I20 }

    dmk$create_fd_entry = dmk$base + 11,
      {E  'dmp$create_fd_entry' }
      {X  'dmp$create_fd_entry' 'STATCOND' I20 }

    dmk$create_file_alloc_units = dmk$base + 12,
      {E  'dmp$create_file_alloc_units' 'SFID    ' H16 }
      {X  'dmp$create_file_alloc_units' 'STATCOND' I20 }

    dmk$create_file_entry = dmk$base + 13,
      {E  'dmp$create_file_entry' 'FTYPE   ' I8 }
      {X  'dmp$create_file_entry' 'STATCOND' I20 }

    dmk$create_file_medium_descript = dmk$base + 14,
      {E  'dmp$create_file_medium_descript' }
      {X  'dmp$create_file_medium_descript' 'STATCOND' I20 }

    dmk$create_mf_allocation_table = dmk$base + 15,
      {E  'dmp$create_mf_allocation_table' 'AVTI    ' I16 }
      {X  'dmp$create_mf_allocation_table' 'STATCOND' I20 }

    dmk$create_mf_device_file_table = dmk$base + 16,
      {E  'dmp$create_mf_device_file_table' 'AVTI    ' I16 }
      {X  'dmp$create_mf_device_file_table' 'STATCOND' I20 }

    dmk$deallocate_file_space = dmk$base + 17,
      {E  'dmp$deallocate_file_space' 'SFID    ' H16 }
      {X  'dmp$deallocate_file_space' 'STATCOND' I20 }

    dmk$delete_file_descriptor = dmk$base + 18,
      {E  'dmp$delete_file_descriptor' }
      {X  'dmp$delete_file_descriptor' }

    dmk$destroy_file = dmk$base + 19,
      {E  'dmp$destroy_file' 'SFID    ' H16 }
      {X  'dmp$destroy_file' 'STATCOND' I20 }

    dmk$destroy_permanent_file = dmk$base + 20,
      {E  'dmp$destroy_permanent_file' 'GFN     ' I52 }
      {X  'dmp$destroy_permanent_file' 'STATCOND' I20 }

    dmk$detach_file = dmk$base + 21,
      {E  'dmp$detach_file' 'SFID    ' I }
      {X  'dmp$detach_file' 'STATCOND' I }

    dmk$disassociate_vol_from_job = dmk$base + 22,
      {E  'dmp$disassociate_vol_from_job' }
      {X  'dmp$disassociate_vol_from_job' }

    dmk$fetch_asid = dmk$base + 23,
      {E  'dmp$fetch_asid' 'SFID    ' H16 }
      {X  'dmp$fetch_asid' 'ASID    ' H16 }

    dmk$fetch_segment_file_info = dmk$base + 25,
      {E  'dmp$fetch_segment_file_info' 'SFID    ' H16 }
      {X  'dmp$fetch_segment_file_info' 'STATCOND' I20 }

    dmk$generate_unique_binary_name = dmk$base + 26,
      {E  'dmp$generate_unique_binary_name' }
      {X  'dmp$generate_unique_binary_name' 'STATCOND' I20 }

    dmk$get_file_info = dmk$base + 28,
      {E  'dmp$get_file_info' 'SFID    ' H16 }
      {X  'dmp$get_file_info' 'STATCOND' I20 }

    dmk$get_unused_job_fd = dmk$base + 29,
      {E  'dmp$get_unused_job_fd' }
      {X  'dmp$get_unused_job_fd' }

    dmk$get_unused_file_descriptor = dmk$base + 30,
      {E  'dmp$get_unused_system_fd' }
      {X  'dmp$get_unused_system_fd' 'STATCOND' I20 }

    dmk$increase_fau_count = dmk$base + 31,
      {E  'dmp$increase_fau_count' 'NFAUSREQ ' I16 }
      {X  'dmp$increase_fau_count' 'STATCOND' I20 }

    dmk$lock_file = dmk$base + 32,
      {E  'dmp$lock_file' 'SFID    ' H16 }
      {X  'dmp$lock_file' 'STATCOND' I20 }

    dmk$read = dmk$base + 33,
      {E  'dmp$read' 'SFID    ' H16 }
      {X  'dmp$read' 'STATCOND' I20 }

    dmk$release_dfl_entry = dmk$base + 34,
      {E  'dmp$release_dfl_entry' }
      {X  'dmp$release_dfl_entry' }

    dmk$release_fau = dmk$base + 35,
      {E  'dmp$release_fau' 'SFID    ' H16 }
      {X  'dmp$release_fau' 'STATCOND' I20 }

    dmk$release_file_descriptor = dmk$base + 36,
      {E  'dmp$release_file_descriptor' }
      {X  'dmp$release_file_descriptor' }

    dmk$release_file_medium_desc = dmk$base + 37,
      {E  'dmp$release_file_medium_desc' 'SFID    ' H16 }
      {X  'dmp$release_file_medium_desc' 'STATCOND' I20 }

    dmk$reserve_mainframe_dfl_entry = dmk$base + 38,
      {E  'dmp$reserve_mainframe_dfl_entry' 'AVTI    ' I16 }
      {X  'dmp$reserve_mainframe_dfl_entry' 'STATCOND' I20 }

    dmk$search_active_volume_table = dmk$base + 39,
      {E  'dmp$search_active_volume_table' }
      {X  'dmp$search_active_volume_table' }

    dmk$get_stored_fmd = dmk$base + 40,
      {E  'dmp$get_stored_fmd' 'SFID    ' I }
      {X  'dmp$get_stored_fmd' 'STATCOND' I }

    dmk$search_mat_for_position = dmk$base + 41,
      {E  'dmp$search_mat_for_position' }
      {X  'dmp$search_mat_for_position' 'POSNF   ' I8 }

    dmk$store_asid = dmk$base + 42,
      {E  'dmp$store_asid' 'SFID    ' H16 }
      {X  'dmp$store_asid' 'ASID    ' H16 }

    dmk$update_existing_fmds = dmk$base + 43,
      {E  'dmp$update_existing_fmds' }
      {X  'dmp$update_existing_fmds' }

    dmk$transfer_unit_written = dmk$base + 44,
      {E  'dmp$transfer_unit_written' 'SFID    ' H16 }
      {X  'dmp$transfer_unit_written' 'STATCOND' I20 }

    dmk$update_volume_committment = dmk$base + 45,
      {E  'dmp$update_volume_committment' }
      {X  'dmp$update_volume_committment' }

    dmk$volume_online = dmk$base + 46,
      {E  'dmp$volume_online' 'LUN     ' I }
      {X  'dmp$volume_online' }

    dmk$write = dmk$base + 47,
      {E  'dmp$write' 'SFID    ' H16 }
      {X  'dmp$write' 'STATCOND' I20 }

    dmk$seq_num = dmk$base + 48,
      {D  'global_file_name.sequence_number' 'GFN     ' I52 }

    dmk$init_volume = dmk$base + 49,
      {E  'dmp$initialize_volume' 'NULL    ' I20 }
      {X  'dmp$initialize_volume' 'STATCOND' I20 }

    dmk$validate_lab = dmk$base + 50,
      {E  'dmp$validate_label' 'NULL    ' I16 }
      {X  'dmp$validate_label' 'STATCOND' I20 }

    dmk$create_label = dmk$base + 51,
      {E  'dmp$create_label' 'NULL    ' I16 }
      {X  'dmp$create_label' 'STATCOND' I20 }

    dmk$build_dat = dmk$base + 52,
      {E  'dmp$build_dat' 'NULL    ' I16 }
      {X  'dmp$build_dat' 'STATCOND' I20 }

    dmk$build_dflt = dmk$base + 53,
      {E  'dmp$build_dflt' 'NULL    ' I16 }
      {X  'dmp$build_dflt' 'STATCOND' I20 }

    dmk$build_dir = dmk$base + 54,
      {E  'dmp$build_volume_directory' 'NULL    ' I16 }
      {X  'dmp$build_volume_directory' 'STATCOND' I20 }

    dmk$build_login = dmk$base + 55,
      {E  'dmp$build_login_table' 'NULL    ' I16 }
      {X  'dmp$build_login_table' 'STATCOND' I20 }

    dmk$open_dflt = dmk$base + 56,
      {E  'dmp$open_dflt' 'SFID    ' H16 }
      {X  'dmp$open_dflt' 'STATCOND' I20 }

    dmk$open_dat = dmk$base + 57,
      {E  'dmp$open_dat' 'SFID    ' H16 }
      {X  'dmp$open_dat' 'STATCOND' I20 }

    dmk$open_dir = dmk$base + 58,
      {E  'dmp$open_volume_directory' 'SFID    ' H16 }
      {X  'dmp$open_volume_directory' 'STATCOND' I20 }

    dmk$open_login = dmk$base + 59,
      {E  'dmp$open_login_table' 'NULL    ' I16 }
      {X  'dmp$open_login_table' 'STATCOND' I20 }

    dmk$open_file_segment = dmk$base + 60,
      {E  'dmp$open_file_segment' 'SFID    ' H16 }
      {X  'dmp$open_file_segment' 'STATCOND' I20 }

    dmk$locate_vol_label = dmk$base + 61,
      {E  'dmp$locate_volume_label' 'NULL    ' I16 }
      {X  'dmp$locate_volume_label' 'STATCOND' I20 }

    dmk$close_seg_acc_file = dmk$base + 62,
      {E  'dmp$close_segment_access_file' 'NULL    ' I16 }
      {X  'dmp$close_segment_access_file' 'STATCOND' I20 }

    dmk$attach_directory_from_label = dmk$base + 63,
      {E  'dmp$attach_directory_from_label' 'NULL    ' I16 }
      {X  'dmp$attach_directory_from_label' 'STATCOND' I20 }

    dmk$attach_dat_from_label = dmk$base + 64,
      {E  'dmp$attach_dat_from_label' 'NULL    ' I16 }
      {X  'dmp$attach_dat_from_label' 'STATCOND' I20 }

    dmk$attach_dflt_from_label = dmk$base + 65,
      {E  'dmp$attach_dflt_from_label' 'NULL    ' I16 }
      {X  'dmp$attach_dflt_from_label' 'STATCOND' I20 }

    dmk$open_label = dmk$base + 66,
      {E  'dmp$open_label' 'SFID    ' H16 }
      {X  'dmp$open_label' 'STATCOND' I20 }

    dmk$attach_device_file = dmk$base + 67,
      {E  'dmp$attach_device_file' 'NULL    ' I16 }
      {X  'dmp$attach_device_file' 'STATCOND' I20 }

    dmk$attach_volume_device_file = dmk$base + 68,
      {E  'dmp$attach_volume_device_file' 'NULL    ' I16 }
      {X  'dmp$attach_volume_device_file' 'STATCOND' I20 }

    dmk$attach_device_file_by_fmd = dmk$base + 69,
      {E  'dmp$attach_device_file_by_fmd' 'NULL    ' I16 }
      {X  'dmp$attach_device_file_by_fmd' 'STATCOND' I20 }

    dmk$activate_volume_for_sets = dmk$base + 70,
      {D  'activate volume to sets' 'RECVSN  ' A48 }

    dmk$process_device_log_entry = dmk$base + 71,
      {E  'dmp$process_device_log_entry' 'AVT INDX' I8 }
      {X  'dmp$process_device_log_entry' 'STATCOND' I20}

    dmk$update_volume_tables = dmk$base + 72,
      {E 'dmp$update_volume_tables' 'AVT INDX' I8 }
      {X 'dmp$update_volume_tables' 'STATCOND' I20 }

    dmk$bring_volume_online = dmk$base + 73,
      {E  'dmp$bring_volume_online' 'LUN     ' I16 }
      {X  'dmp$bring_volume_online' 'STATCOND' I20 }

    dmk$take_volume_offline = dmk$base + 74,
      {E  'dmp$take_volume_offline' 'LUN     ' I16 }
      {X  'dmp$take_volume_offline' 'STATCOND' I20 }

    dmk$detach_device_file = dmk$base + 75,
      {E  'dmp$detach_device_file' 'SFID    ' H16 }
      {X  'dmp$detach_device_file' 'STATCOND' I20 }

    dmk$mdfl_entries = dmk$base + 76,
      {D  'number of cm dfl entries' 'CMDFLS  ' I16 }

    dmk$get_exclu_access_to_lgt = dmk$base + 77,
      {E  'dmp$get_exclu_access_to_login_tabl' 'NULL    ' I16 }
      {X  'dmp$get_exclu_access_to_login_table' 'STATCOND' I20 }

    dmk$write_data_to_disk = dmk$base + 78,
      {E  'dmp$write_data_to_disk' 'numbytes' I16 }
      {X  'dmp$write_data_to_disk' 'STATCOND' I20 }

    dmk$store_existing_df_fat = dmk$base + 79,
      {E  'dmp$store_existing_df_fat' 'SFID    ' H16 }
      {X  'dmp$store_existing_df_fat' 'STATCOND' I20 }

    dmk$build_faus_from_dfl_entry = dmk$base + 80,
      {E  'dmp$build_faus_from_dfl_entry' 'SFID    ' H16 }
      {X  'dmp$build_faus_from_dfl_entry' 'STATCOND' I20 }

    dmk$build_fmd_for_existing_file = dmk$base + 81,
      {E  'dmp$build_fmd_for_existing_file' 'SFID    ' H16 }
      {X  'dmp$build_fmd_for_existing_file' 'STATCOND' I20 }

    dmk$create_device_file = dmk$base + 82,
      {E  'dmp$create_device_file' 'SFID    ' H16 }
      {X  'dmp$create_device_file' 'STATCOND' I20 }

    dmk$allocation_overflow_volume = dmk$base + 83,
      {E  'dmp$allocation_overflow_volume' 'FILEINDX' I16 }
      {X  'dmp$allocation_overflow_volume' 'STATCOND' I20 }

    dmk$recover_mainframe = dmk$base + 84,
      {E  'dmp$recover_mainframe' 'NULL    ' I16 }
      {X  'dmp$recover_mainframe' 'STATCOND' I20 }

    dmk$recover_set = dmk$base + 85,
      {E  'dmp$recover_set' 'NULL    ' I16 }
      {X  'dmp$recover_set' 'STATCOND' I20 }

    dmk$recover_volume = dmk$base + 86,
      {E  'dmp$recover_volume' 'NULL    ' I16 }
      {X  'dmp$recover_volume' 'STATCOND' I20 }

    dmk$recover_file = dmk$base + 87,
      {E  'dmp$recover_file' 'NULL    ' I16 }
      {X  'dmp$recover_file' 'STATCOND' I20 }

    dmk$activate_volume = dmk$base + 88,
      {E  'dmp$activate_volume' 'LUN     ' I16 }
      {X  'dmp$activate_volume' 'STATCOND' I20 }

    dmk$store_avt_set_ordinal = dmk$base + 89,
      {E  'dmp$store_avt_set_ordinal' 'AVTINDEX' I16 }
      {X  'dmp$store_avt_set_ordinal' 'STATUS  ' I16 }

    dmk$open_file_for_segment_acces = dmk$base + 90,
      {E  'dmp$open_file_for_segment_acces' 'SFID    ' H16 }
      {X  'dmp$open_file_for_segment_acces' 'STATCOND' I20 }

     dmk$free_file_tables = dmk$base + 91,
      {E  'dmp$free_file_tables' 'SFID    ' H16 }
      {X  'dmp$free_file_tables' 'STATCOND' I20 }

    dmk$monitor_log = dmk$base + 92,
      {E 'dmp$monitor_log' 'KIND    ' I8 }
      {X 'dmp$monitor_log' 'ABLE    ' I8 }

    dmk$utility_monitor_request = dmk$base + 93,
      {E  'dmp$utility_monitor_request' 'KIND    ' I8 }
      {X  'dmp$utility_monitor_request' 'STATCOND' I20 }

    dmk$get_device_flaws = dmk$base + 94,
      {E  'get_device_flaws' 'LUN     ' I16 }
      {X  'get_device_flaws' 'STATCOND' I20 }

    dmk$deactivate_volume = dmk$base + 95,
      {E  'dmp$deactivate_volume' 'AVT INDX' I16 }
      {X  'dmp$deactivate_volume' 'STATCOND' I20 }

    dmk$set_eoi = dmk$base + 96,
      {E  'dmp$set_eoi' 'SFID    ' H16 }
      {X  'dmp$set_eoi' 'STATCOND' I20 }

    dmk$fetch_eoi = dmk$base + 97,
      {E 'dmp$fetch_eoi' 'SFID    ' H16 }
      {X 'dmp$fetch_eoi' 'STATCOND' I20 }

    dmk$unlock_file = dmk$base + 98,
      {E  'dmp$unlock_file' 'SFID    ' H16 }
      {X  'dmp$unlock_file' 'STATCOND' I20 }

    dmk$get_initialized_addresses = dmk$base + 99,
      {E  'dmp$get_initialized_addresses' 'FBA     ' I20 }
      {X  'dmp$get_initialized_addresses' 'STATCOND' I20 }

    dmk$create_client_sft = dmk$base + 100,
       {E ' dmp$create_client_sft ' 'GFN     ' I52 }
       {X ' dmp$create_client_sft ' }

    dmk$fetch_server_sft_info = dmk$base + 101,
       {E ' dmp$fetch_server_sft_info ' }
       {X ' dmp$fetch_server_sft_info ' }

    dmk$df_client_set_eoi = dmk$base + 102,
       {E ' dmp$df_client_set_eoi ' }
       {X ' dmp$df_client_set_eoi ' }

    dmk$detach_server_file = dmk$base + 103,
       {E ' dmp$detach_server_file ' }
       {X ' dmp$detach_server_file ' }

    dmk$create_fmds = dmk$base + 104;
       {E ' dmp$create_fmds ' }
       {X ' dmp$create_fmds ' }

?? PUSH (LISTEXT := ON) ??
*copyc DMK$TAPE_KEYPOINTS
*copyc AMK$BASE_KEYPOINT_VALUES
?? POP ??
