
  TYPE
    jmt$jl_leveler_server_request = record
      case request_kind: jmt$jl_request_kind of
      = jmc$jl_signon_request =
        signon_request: jmt$jl_signon_request,
      = jmc$jl_normal_request =
        normal_request: jmt$jl_normal_request,
      = jmc$jl_unassign_jobs_request =
        unassign_jobs_request: jmt$jl_unassign_jobs_request,
      = jmc$jl_signoff_request =
        signoff_request: jmt$jl_signoff_request,
      = jmc$jl_ready_levelers_request =
        ,
      casend,
    recend;

  TYPE
    jmt$jl_signon_request = record
      server_job_list_p: ^jmt$jl_server_job_list,
      restart_job_list_p: ^jmt$jl_restart_job_list,
    recend;

  TYPE
    jmt$jl_normal_request = record
      active_profile_id: ost$name,
      initiation_required_categories: jmt$job_category_set,
      initiation_excluded_categories: jmt$job_category_set,
      leveler_job_class_data: jmt$jl_job_class_data,
      job_class_priorities: jmt$jl_job_class_priorities,
      unassigned_job_list_p: ^jmt$jl_unassigned_job_list,
      assigned_job_list_p: ^jmt$jl_assigned_job_list,
      assigned_job_count: jmt$job_count_range,
      server_job_priorities: jmt$jl_server_job_priorities,
      profile_mismatch: boolean,
      job_leveling_enabled: boolean,
    recend;

  TYPE
    jmt$jl_unassign_jobs_request = record
      unassigned_job_list_p: ^jmt$jl_unassigned_job_list,
    recend;

  TYPE
    jmt$jl_signoff_request = record
      unassigned_job_list_p: ^jmt$jl_unassigned_job_list,
    recend;

*copyc jmt$jl_assigned_job_list
*copyc jmt$jl_job_class_data
*copyc jmt$jl_job_class_priorities
*copyc jmt$jl_request_kind
*copyc jmt$jl_restart_job_list
*copyc jmt$jl_server_job_list
*copyc jmt$jl_server_job_priorities
*copyc jmt$jl_unassigned_job_list
*copyc jmt$job_category_set
*copyc jmt$job_count_range
*copyc ost$name
