  PROCEDURE [XREF] nfp$convert_p31_to_ordinal
    (    received_value: string ( * <= nfc$max_param_size);
     VAR data_declaration: nft$parameter_31_type;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc nfc$parameter_definitions
*copyc nft$parameter_31_type
*copyc ost$status
?? POP ??
