CX_CURRENCY_RATE::PercentDiffOfDivideRate
Beschreibung:
Diese Funktion berechnet die prozentuale Abweichung des aktuellen Divisors.
Ist dieser gleich '0', so liefert die Funktion NULL, da die prozentuale Abweichung in diesem Fall unendlich groß ist.
Code-Beispiel:
In dem Beispiel-Programm wird die prozentuale Differenz der Währungsparität
"1 USD = 1,62 DEM" mit dem explizit gesetzten Divisor von
"0,6" mit einer Genauigkeit von 2 Nachkommastellen berechnet.
Var(currencyRate, valuePer, divider)
CreateTransObject(CX_CURRENCY_RATE) -> currencyRate
CreateTransObject(CX_VALUE_PER) -> valuePer
"1 USD / 1,62 DEM" valuePer Put
valuePer currencyRate SetReference(amount)
CreateTransObject(CX_NUMERIC) -> divider
"0,6" divider Put
divider currencyRate Put(divideRate)
2 currencyRate Call(PercentDiffOfDivideRate)
Das Ausführen dieses Skriptes errechnet eine Abweichung von -2,88%.
Stack | Position | Objekttyp | Kurzbeschreibung |
---|---|---|---|
Stack(In) | Top | CX_CURRENCY_RATE | die Währungsparität |
Top-1 | INTEGER | die Anzahl an Nachkommastellen der Abweichung | |
Stack(Out) | Top | CX_PERCENT | die prozentuale Abweichung |