
  PROCEDURE [XREF] nlp$bm_flush_message
    (    data_area: nat$data_fragments;
     VAR message_id: nlt$bm_message_id;
     VAR message_length: integer;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc nae$namve_conditions
*copyc nat$data_fragments
*copyc nlt$bm_message_id
*copyc ost$status
?? POP ??
