
  PROCEDURE [XREF] fdp$change_currency_symbols
    (    primary_money_symbol: string (1);
         secondary_money_symbol: string (1);
         thousands_separator_symbol: string (1);
         decimal_symbol: string (1));

?? PUSH (LISTEXT := ON) ??
*copyc fdc$dollar_currency_symbol
*copyc fdc$pound_currency_symbol
*copyc fdc$thousands_currency_symbol
*copyc fdc$decimal_currency_symbol
?? POP ??

