
  PROCEDURE [XREF] cmp$store_one_word_response_ptr
    (    pp_index: iot$pp_number;
         one_word_response_processor: dft$one_word_response_handler;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc dft$one_word_response_handler
*copyc iot$pp_number
*copyc ost$status
?? POP ??

