 TYPE
    cmt$collected_pp_response = record
      pp_number: ALIGNED [0 MOD 8] iot$pp_number,
      response_status: cmt$subsys_io_response_status,
      detailed_status: iot$detailed_status,
      time_request_received_by_mtr: ost$date_time,
      time_request_queued: ost$date_time,
      time_response_received_by_mtr: ost$date_time,
      time_response_sent_to_job: ost$date_time,
      pp_response: ALIGNED [0 MOD 8] iot$pp_response,
    recend;

  TYPE
    cmt$os_subsystem_response = record
      pp_number: iot$pp_number,
      pp_response: iot$pp_response,
    recend,
    cmt$os_subsystem_io_response = record
      io_status: ALIGNED [0 MOD 8] cmt$subsystem_io_comp_status,
      pp_response: cmt$os_subsystem_response,
      detailed_status: iot$detailed_status,
    recend;

  TYPE
    cmt$subsystem_io_comp_status = ost$compare_swap_lock,
    cmt$subsys_io_response_status = (cmc$subsys_io_resp_not_avail,
      cmc$subsys_io_resp_available, cmc$subsys_io_resp_completed,
      cmc$subsys_io_response_d4, cmc$subsys_io_response_d5,
      cmc$subsys_io_response_d6, cmc$subsys_io_response_d7,
      cmc$subsys_io_response_d8);

?? PUSH (LISTEXT := ON) ??
*copyc iot$pp_number
*copyc iot$pp_response
*copyc ost$signature_lock
*copyc ost$date_time
?? POP ??
