[Noalyss-commit] [noalyss] 20/31: Task #448 : check currency rate > 0 and payment in eur

[Dany De Bontridder]

sparkyx pushed a commit to annotated tag r700-currency-001
in repository noalyss.

commit 35e989af291a302e6cab32d2d78faaafb1f8dbf1
Author: Dany De Bontridder <address@hidden>
Date:   Thu May 10 21:41:59 2018 +0200

    Task #448 : check currency rate > 0 and payment in eur
---
 include/class/acc_ledger_purchase.class.php | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/include/class/acc_ledger_purchase.class.php 
b/include/class/acc_ledger_purchase.class.php
index 6e53be9..2d509f7 100644
--- a/include/class/acc_ledger_purchase.class.php
+++ b/include/class/acc_ledger_purchase.class.php
@@ -276,6 +276,10 @@ class  Acc_Ledger_Purchase extends Acc_Ledger
             throw new Exception(_('Date échéance invalide'),14);
             
         }
+        // Check currency_rate if valid
+        if ( isNumber($p_currency_rate) == 0 || $p_currency_rate <=0 ) {
+            throw new Exception(_('Taux devise invalide'),15);
+        }
     }
     /**
      * Compute the ND amount thanks the attribute of the concerned card. The 
object 
@@ -905,7 +909,12 @@ class  Acc_Ledger_Purchase extends Acc_Ledger
                 }
                 // remove the VAT autoliquidation
                 $cust_amount=bcsub($cust_amount, $tot_tva_reversed);
+
+                // Convert paid amount in EUR
+                $acompte=bcmul($acompte, $p_currency_rate);   
+
                 $famount=bcsub($cust_amount,$acompte);
+                
                 $acc_pay->poste=$poste_val;
                 $acc_pay->qcode=$fqcode;
                 $acc_pay->amount=abs(round($famount,2));