
  PROCEDURE [XREF] mmp$remove_pages_from_jws
    (    modified_queue_id: mmt$page_frame_queue_id;
         ijle_p: ^jmt$initiated_job_list_entry;
         reject_avail_mod_q_max_reached: boolean;
     VAR flood_or_reject_page_count: integer;
     VAR modified_page_count: integer;
     VAR total_page_count: integer);

?? PUSH (LISTEXT := ON) ??
*copyc jmt$initiated_job_list_entry
*copyc mmt$page_frame_queue_id
?? POP ??
