eChangeCurrency (Function)

ONLINE HELP
WINDEV, WEBDEV AND WINDEV MOBILE

Version:

Home | Sign in | English

This content has been translated automatically. Click here to view the French version.

Help / WLanguage / WLanguage functions / Standard functions / Euro functions

Exchange table
Rounding difference

WINDEV

WEBDEV

WINDEV Mobile

Others

See also

eChangeCurrency (Function)

In french: eChangeDevise

Converts a currency into another currency.

Remark: Converted currencies may differ from the Euro. For the conversions into Euros, use eToCurrency and eToEuro.

Example

// Conversion de francs en marks
ResConversion = eChangeCurrency(150, eFRF, eDEM)

// Conversion de Pesetas en Francs Belge avec gestion de l'écart d'arrondi
// Deux décimales sont utilisées pour la conversion
ResConversion = eChangeCurrency(10000, eESP, eBEF, 2, ResEcart)

Syntax

<Result> = eChangeCurrency(<Value to convert> , <Source currency> , <Destination currency> [, <Number of decimals> [, <Rounding difference>]])

<Result>: Currency

Value converted into the specified currency.

<Value to convert>: Currency

Amount to convert. This value is converted:
from the <Source Currency> to the currency whose identifier is "0" (the Euro by default),
from the currency whose identifier is "0" (the Euro by default) to the <Destination Currency>.

<Source currency>: Integer or constant

Identifier of the source currency or constant associated with the source currency (see the Notes).

<Destination currency>: Integer or constant

Identifier of the destination currency or constant associated with the destination currency (see the Notes).

<Number of decimals>: Optional integer

Number of decimal places used for the result of the conversion (2 by default).

<Rounding difference>: Optional currency

Variable retrieving the rounding difference caused by the conversion. This difference is expressed in the source currency.

Remarks

Exchange table

An exchange table is stored in memory. Each currency is associated with:

A currency number used to identify the currency programmatically.
A constant used to identify the currency programmatically.
A label (7 characters maximum): this label is displayed in the "Currency + Euro" field if the edit control allows it (the $ sign is indicated).
An exchange rate. This exchange rate corresponds to the exchange rate of the currency in relation to the Euro.

This exchange table is as follows:

Currency number	Constant	Country	Exchange rate	Default caption

0	eEUR	Euro zone	1	EURO
1	eFRF	France	6.55957	F
2	eITL	Italy	1936.27	ITL
3	eBEF	Belgium	40.3399	BEF
4	eLUF	Luxembourg	40.3399	LUF
5	eDEM	Germany	1.95583	DEM
6	eATS	Austria	13.7603	ATS
8	eESP	Spain	166.386	ESP
9	eIEP	Ireland	0.787564	IEP
10	eNLG	Netherlands	2.20371	NLG
11	ePTE	Portugal	200.482	PTE
14	eGRD	Greece	340.750	GRD
15	eFIM	Finland	5.94573	FIM
Currencies not taking part in the Euro

7	eDKK	Denmark	0	DKK
12	eGBP	Great Britain	0	GBP
13	eSEK	Sweden	0	SEK
16 - 25			0	Free1 to Free10
26	eCYP	Cyprus	0	CYP
27	eCZK	Czech Republic	0	CZK
28	eEEK	Estonia	0	EEK
29	eHUF	Hungary	0	HUF
30	eLTL	Lithuania	0	LTL
31	eLVL	Latvia	0	LVL
32	eMTL	Malta	0	MTL
33	ePLN	Poland	0	SCH
34	eSIT	Slovenia	0	SIT
35	eSKK	Slovakia	0	SKK

The first currency (whose identifier is set to 0) is the currency used as reference for the conversions.

In this exchange table, you have the ability to:

add new currencies by modifying the custom currencies if necessary ("user-defined currencies" from 16 to 25) with eInitCurrency,
specify the exchange rate of each currency with eInitCurrency.

Warning Currencies with an exchange rate of zero will not appear in the context menu of the "Monetary + Euro" field. To define the exchange rate of these currencies, you must redefine them in the initialization code of the project with eInitCurrency.

Rounding difference

The <Rounding difference> is calculated by the following formula:

Round(<Value to convert>, <Result in source currency>, <Number of decimals>)

For example:

Écart is currency
ResConversion is currency
ResConversion = eChangeCurrency(1.52, eFRF, eDEM, 2, Écart)

ResConversion is set to 0.45 and Difference is set to 0.01.

The following line of code allows you to retrieve the initial amount:

MontantInit = eChangeCurrency(ResConversion, eDEM, eFRF, 2) + Écart

Component: wd300std.dll