5 Rappen Rundung

Rundung auf X.05 | sogenannte 5 Rappen Rundung

Mit untenstehendem Script werden Beträge auf X.00, X.05, X.10 … kaufmännisch gerundet.
Wobei die Variable V[Betrag] an die Routine übergeben wird

Das Script wurde uns durch die Synactive GmbH zur Verfügung gestellt.

// 5 Rappen Rundung
// Runden auf x,00  x,05  x,10 ... 
if V[Betrag]
   Set V[x] "&V[Betrag]" DecimalSeparator="Userdefault"
   Set V[x] "&V[x]" * 100 DecimalSeparator="Userdefault"
   Set V[x] "&V[x]" / 5   decimals=0 DecimalSeparator="Userdefault"
   Set V[x] "&V[x]" / 20  decimals=2   DecimalSeparator="Userdefault"
   Set V[Betrag] "&[x]"
endif