
{
{ IJL - (Initiated Job List) An entry exists in this table for each job that
{       has been initiated and has not terminated.
{
{ NOTE: If TYPE declarations or record fields are added/changed/deleted, please
{   make the appropriate changes in the corresponding display procedures in the
{   module(s) for the System Core Debugger: SYM$DEBUG, SYM$DEBUG1
{



  TYPE
    jmt$initiated_job_list_entry = record
      system_supplied_name: ALIGNED [0 MOD 8] jmt$system_supplied_name,
      job_name: ost$name,
      entry_status: jmt$ijl_entry_status,
      ajl_ordinal: jmt$ajl_ordinal,
      kjl_ordinal: jmt$kjl_index,
      swap_status: jmt$ijl_swap_status,
      next_swap_status: jmt$ijl_swap_status,
      last_swap_status: jmt$ijl_swap_status,
      inhibit_swap_count: 0 .. 0ffffff(16),
      active_io_page_count: 0 .. 0ffffff(16),
      active_io_requests: 0 .. 0ffff(16),
      swap_queue_link: jst$ijl_swap_queue_link,
      job_fixed_asid: ost$asid,
      long_wait_aging_complete: boolean,
      notify_swapper_when_io_complete: boolean,
      scheduling_dispatching_priority: jmt$dispatching_priority,
      dispatching_control: jmt$ijl_dispatching_control,
      job_monitor_taskid: ost$global_task_id,
      job_mode: jmt$job_mode,
      executing_task_count: 0 .. 0ff(16),
      multiprocessing_allowed: boolean,
      memory_reserve_request: mmt$memory_reserve_request,
      swapin_candidate_queue: jmt$ijl_ordinal,
      swapin_candidate_queue_dp: jmt$dispatching_priority,
      estimated_ready_time: ost$free_running_clock,
      last_think_time: ost$free_running_clock,
      age_purge_timestamp: ost$free_running_clock,
      sfd_purge_timestamp: ost$free_running_clock,
      job_scheduler_data: jmt$scheduling_data,
      job_page_queue_list: mmt$job_page_queue_list,
      swap_data: jmt$swap_data,
      swap_io_control: jst$io_control_information,
      sfd_p: ^jst$swap_file_descriptor,
      system_breakpoint_selected: boolean,
      delayed_swapin_work: jmt$delayed_swapin_work,
      inhibit_access_work: dft$mainframe_set,
      terminate_access_work: dft$mainframe_set,
      statistics: jmt$ijl_statistics,
      service_class_statistics: jmt$ijl_service_class_stats,
      job_fixed_contiguous_pages: 0 .. 0ff(16),
      hung_task_in_job: boolean,
      job_damaged_during_recovery: boolean,
      maxws_aio_slowdown_display: 0 .. 0ff(16),
      unable_to_swap_idle_flag: boolean,
      queue_file_information: jmt$queue_file_ijl_information,
      display_message: oft$display_message_info,
      relative_priority_enabled: boolean,
      task_created_after_last_swap: boolean,
      interactive_task_gtid: ost$global_task_id,
      cp_time_last_dc_reset: ost$cp_time_value,
      active_cart_tape_write: 0 .. 0ff(16),
      override_job_working_set_max: 0..0ff(16),
      lost_io_count: 0 .. 0ffffff(16),
    RECEND,

    jmt$scheduling_data = RECORD
      ready_task_link: jmt$ijl_ordinal,
      service_accumulator: jmt$service_accumulator,
      service_accumulator_since_swap: jmt$service_accumulator,
      guaranteed_service_remaining: jmt$service_accumulator,
      last_cptime: ost$cp_time_value,
*IF $true(osv$unix)
      last_page_fault_count: 0 .. 7fffffff(16),
*ELSE
      last_page_fault_count: 0 .. 0ffffffffff(16),
*IFEND
      job_swap_counts: jmt$ijl_swap_counts,
      swapout_reason: jmt$swapout_reasons,
      priority: jmt$job_priority,
      unaged_swap_queue_priority: jmt$job_priority,
      swapin_q_priority_timestamp: ost$free_running_clock,
      job_class: jmt$job_class,
      service_class: jmt$service_class_index,
    RECEND,

    jmt$swap_data = record
      swap_file_sfid: gft$system_file_identifier,
      swapping_io_error: iot$io_error,
      swapped_job_page_count: 0 .. osc$max_page_frames,
      swap_file_length_in_pages: 0 .. osc$max_page_frames,
      asid_reassigned_timestamp: ost$free_running_clock,
      timestamp: ost$free_running_clock,
      swapout_timestamp: ost$free_running_clock,
      long_wait_expire_time: ost$free_running_clock,
      reassigned_job_fixed_asti: mmt$ast_index,
      swapped_job_entry: jmt$swapped_job_entry,
    RECEND,

*IF $true(osv$unix)
    jmt$service_counts = 0 .. 7fffffff(16),
*ELSE
    jmt$service_counts = 0 .. 0ffffffffffff(16),
*IFEND

    jst$swap_direction = (jsc$sd_in, jsc$sd_out);

*copyc dft$mainframe_set
*copyc gft$system_file_identifier
*copyc jmt$ajl_ordinal
*copyc jmt$delayed_swapin_work
*copyc jmt$dispatching_priority
*copyc jmt$ijl_dispatching_control
*copyc jmt$ijl_entry_status
*copyc jmt$ijl_swap_status
*copyc jmt$ijl_ordinal
*copyc jmt$ijl_service_class_stats
*copyc jmt$ijl_statistics
*copyc jmt$job_class
*copyc jmt$job_mode
*copyc jmt$job_priority
*copyc jmt$kjl_index
*copyc jmt$queue_file_ijl_information
*copyc jmt$service_accumulator
*copyc jmt$service_class_index
*copyc jmt$swapout_reasons
*copyc jmt$swapped_job_entry
*copyc jmt$system_supplied_name
*copyc jst$ijl_swap_queue_link
*copyc jst$io_control_information
*copyc jst$swap_file_descriptor
*copyc mmt$ast_index
*copyc mmt$memory_reserve_request
*copyc mmt$page_queue_list
*copyc oft$display_message_info
*copyc ost$global_task_id
*copyc ost$cp_time
*copyc ost$hardware_subranges
*copyc ost$name
*copyc jmt$dispatching_control
*copyc iot$io_error
