
  PROCEDURE [XREF] jmp$copy_seq_to_result_array
    (    number_of_keys: ost$positive_integers;
         number_of_packets_in_sequence: ost$non_negative_integers,
         results_keys_p: ^jmt$results_keys;
     VAR jm_work_area_p: ^jmt$work_area;
     VAR user_work_area_p: ^jmt$work_area;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc jme$work_area_too_small
*copyc jmt$results_keys
*copyc jmt$work_area
*copyc osd$integer_limits
*copyc ost$status
?? POP ??
