
  PROCEDURE [XREF] iop$tape_process_pp_response ALIAS 'iomtptr' (
        pp_response: ^iot$pp_response;
        detailed_status_p: ^iot$detailed_status;
        pp_no: 1..ioc$pp_count;
        VAR mon_status: syt$monitor_status);

?? PUSH (LISTEXT := ON) ??
*copyc IOT$PP_NUMBER
*copyc IOT$PP_RESPONSE
*copyc SYT$MONITOR_REQUEST_CODE
?? POP ??
