
  TYPE
    jmt$output_status_updates = array [1 .. * ] of jmt$output_status_update;

  TYPE
    jmt$output_status_update = record
      case key: jmt$attribute_keys of
      = jmc$copies_printed =
        copies_printed: jmt$output_copy_count,
      = jmc$file_position =
        file_position: jmt$output_file_position,
      = jmc$null_attribute =
        ,
      casend,
    recend;

*copyc jmt$attribute_keys
*copyc jmt$output_copy_count
*copyc jmt$output_file_position
