Source position: db.pas line 827
protected procedure TFMTBCDField.SetAsCurrency(
AValue: Currency
); override;