
  PROCEDURE [XREF] nfp$get_parameter_value_length
    (VAR message {input} : ^nft$message_sequence;
     VAR message_length {input, output} : integer;
     VAR parameter_value_length: integer;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc nft$message_sequence
*copyc nft$parameter_value_length
*copyc ost$status
?? POP ??

