     TYPE
        iot$monitor_request_block = RECORD
                 request_code: ALIGNED [0 MOD 8] syt$monitor_request_code,
                 status: syt$monitor_status,
                 CASE subsystem_request_code: iot$request_code OF
                    =ioc$queue_io_request=
                         io_request_p: ^iot$io_request,
                    =ioc$unlock_rma_list=
                         wired_request: ^cmt$max_wired_unit_queue_req,
                 CASEND,
                                        RECEND;

      TYPE
         iot$request_code = (ioc$queue_io_request,
              ioc$request_d2, ioc$request_d3,
              ioc$request_d4, ioc$request_d5,
              ioc$request_d6, ioc$request_d7,
              ioc$unlock_rma_list);

??PUSH (LISTEXT := ON)??
*copyc iot$io_request
*copyc syc$monitor_request_codes
*copyc syt$monitor_status
*copyc iot$wired_unit_queue_request
*copyc ost$global_task_id
??POP??
