
  TYPE
    jmt$default_attribute_changes = array [1 .. * ] of
          jmt$default_attribute_change;

  TYPE
    jmt$default_attribute_change = record
      case key: jmt$attribute_keys of
      = jmc$cpu_time_limit =
        cpu_time_limit: jmt$cpu_time_limit,
      = jmc$deferred_by_operator =
        deferred_by_operator: boolean,
      = jmc$job_abort_disposition =
        job_abort_disposition: jmt$job_abort_disposition,
      = jmc$job_class =
        job_class: jmt$job_class_name,
      = jmc$job_deferred_by_operator =
        job_deferred_by_operator: boolean,
      = jmc$job_destination_usage =
        job_destination_usage: jmt$destination_usage,
      = jmc$job_qualifier_list =
        job_qualifier_list: ^jmt$job_qualifier_list,
      = jmc$job_recovery_disposition =
        job_recovery_disposition: jmt$job_recovery_disposition,
      = jmc$login_family =
        login_family: ost$name,
      = jmc$magnetic_tape_limit =
        magnetic_tape_limit: jmt$magnetic_tape_limit,
      = jmc$maximum_working_set =
        maximum_working_set: jmt$working_set_size,
      = jmc$null_attribute =
        ,
      = jmc$output_class =
        output_class: jmt$output_class_name,
      = jmc$output_deferred_by_operator =
        output_deferred_by_operator: boolean,
      = jmc$output_destination_usage =
        output_destination_usage: jmt$destination_usage,
      = jmc$purge_delay =
        purge_delay: ^jmt$time_increment,
      = jmc$site_information =
        site_information: ^jmt$site_information,
      = jmc$sru_limit =
        sru_limit: jmt$sru_limit,
      = jmc$station =
        station: jmt$station,
      = jmc$vertical_print_density =
        vertical_print_density: jmt$vertical_print_density,
      casend,
    recend;

*copyc jmt$attribute_keys
*copyc jmt$cpu_time_limit
*copyc jmt$destination_usage
*copyc jmt$job_abort_disposition
*copyc jmt$job_class_name
*copyc jmt$job_qualifier_list
*copyc jmt$job_recovery_disposition
*copyc jmt$magnetic_tape_limit
*copyc jmt$output_class_name
*copyc jmt$site_information
*copyc jmt$sru_limit
*copyc jmt$station
*copyc jmt$time_increment
*copyc jmt$vertical_print_density
*copyc jmt$working_set_size
*copyc ost$name
