function OldCurrToBCD(const Curr: Currency; var BCD: TBcd; Precision: Integer = 32; Decimals: Integer = 4): Boolean;
Boolean OldCurrToBCD(const Currency Curr, TBcd BCD, int Precision = 32, int Decimals = 4);
FMTBcd
This is function FMTBcd.OldCurrToBCD.