
  TYPE
    jmt$qfile_attribute_changes = array [1 .. * ] of
          jmt$qfile_attribute_change;

  TYPE
    jmt$qfile_attribute_change = record
      case key: jmt$attribute_keys of
      = jmc$application_attributes_1, jmc$application_attributes_2,
            jmc$application_attributes_3, jmc$application_attributes_4,
            jmc$application_attributes_5, jmc$application_attributes_6,
            jmc$application_attributes_7, jmc$application_attributes_8,
            jmc$application_attributes_9, jmc$application_attributes_10 =
        application_attributes: jmt$qfile_application_attrs,
      = jmc$application_status =
        application_status: ^ost$status,
      = jmc$deferred_by_application =
        deferred_by_application: boolean,
      = jmc$deferred_by_operator =
        deferred_by_operator: boolean,
      = jmc$deferred_by_user =
        deferred_by_user: boolean,
      = jmc$destination =
        destination: ost$name,
      = jmc$earliest_run_time =
        earliest_run_time: jmt$date_time,
      = jmc$latest_run_time =
        latest_run_time: jmt$date_time,
      = jmc$null_attribute =
        ,
      = jmc$purge_delay =
        purge_delay: ^jmt$time_increment,
      = jmc$remote_host_directive =
        remote_host_directive: ^jmt$remote_host_directive,
      = jmc$rerun_disposition =
        rerun_disposition: jmt$rerun_disposition,
      casend,
    recend;

*copyc jmt$attribute_keys
*copyc jmt$date_time
*copyc jmt$qfile_application_attrs
*copyc jmt$remote_host_directive
*copyc jmt$rerun_disposition
*copyc jmt$time_increment
*copyc ost$name
*copyc ost$status
