ConvertCurrency (rtl)

De Wiki1000
Function ConvertCurrency(iCur:Currency; iDeviseOrg:TdbfCurrency; iDate:DateTime; iDeviseRslt:TdbfCurrency):Currency;

Cette fonction convertit une valeur monétaire d'une devise à une autre.

Result Valeur convertie dans la devise de destination.
iCur Valeur monétaire à convertir.
iDeviseOrg Devise d'origine.
iDate Date de conversion.
iDeviseRslt Devise de destination.

Une chaîne de conversion est construite à partir de la date passée en paramètre. Si il n'existe pas de cours à cette date le cours à date immédiatement inférieur est utilisé, à défaut de cours le cours par défaut de la devise est utilisé.

Exemple

begin
end;

Voir aussi:

Développement DSMDéveloppement DSM

Outils personnels