  PROCEDURE [XREF] nfp$receive_parameter_00
    (    received_command: nft$protocol_commands;
         received_value: string ( * <= nfc$max_param_size);
         qualifier: nft$parameter_qualifiers;
         current_value: nft$parameter_00_values;
     VAR new_value: nft$parameter_00_values;
     VAR negotiate_down: boolean;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc nfc$parameter_definitions
*copyc nft$protocol_commands
*copyc nft$parameter_qualifiers
*copyc nft$parameter_00_values
*copyc nft$parameter_set
*copyc ost$status
?? POP ??
