
  PROCEDURE [XREF] nlp$al_fragment_data
    (    fragment_size: nat$data_length;
     VAR data_description {INPUT, OUTPUT} : nlt$al_data_description;
     VAR remaining_data_length: nat$data_length;
     VAR message: nat$data_fragments);

?? PUSH (LISTEXT := ON) ??
*copyc nat$data_fragments
*copyc nlt$al_data_description
?? POP ??
