Titolo: Sconti composti
Categoria: Codice |
|
Ultimo Aggiornamento: 01/03/18 |
Gli sconti composti sono gli sconti commerciali ad esempio 50+20+3 oppure 50+20-3 ( applico lo sconto del 50+20 con un amento del 3% ).
per l'utilizzo :
$importoscontato:=scontocommerciale(126.34,"50+20+3")
--- scontocommerciale ---
// ricava lo sconto in base alla stringa
// $1 importo
// $2 sconto
// ritorno l'importo scontato su $0
If ($2="")
If ($1=0)
$0:=0
Else $0:=$1
End if End if $scontotxt:=$2
$scontotxt:=Replace string($scontotxt;"+";"§+")
$scontotxt:=Replace string($scontotxt;"-";"§-")
C_COLLECTION($sconti)
ARRAY TEXT($ssconti;0)
C_REAL($importoscontato;$scontopercento)
$sconti:=Split string($scontotxt;"§")
COLLECTION TO ARRAY($sconti;$ssconti)
$elementi:=Size of array($ssconti)
$importoscontato:=$1
For ($contatore;1;$elementi)
$scontopercento:=Num($ssconti{$contatore})
$sconto:=$importoscontato*$scontopercento/100
$importoscontato:=$importoscontato-$sconto
End for $0:=$importoscontato
| Inviato da: Massimiliano Chiodi |
|
Visite: 6605 |
Se accedi con utente e password, puoi aggiungere dei commenti.
