Removed sparse parameter in write_customer()

[fa-stable.git] / sales / includes / sales_db.inc

diff --git a/sales/includes/sales_db.inc b/sales/includes/sales_db.inc
index 6cad00f183dfdf7fcb5d1e87d44b90a042674f6c..2fd0bb9fa55a38b6d3dd9abe69499a86ea6f7e2a 100644 (file)
--- a/sales/includes/sales_db.inc
+++ b/sales/includes/sales_db.inc
@@ -388,10 +388,15 @@ function write_sales_trans($cart, $policy = 0)
 }
 
 function save_cust_payment($cart, $customer_id, $branch_id,
-               $bank_account, $trans_date, $ref, $amount, $discount, $memo, $charge, $bank_amount)
+               $bank_account, $trans_date, $ref, $amount, $memo, $charge, $bank_amount)
 {
        begin_transaction(__FUNCTION__, func_get_args());
 
+       $discount = 0;
+       foreach($cart->allocs as $alloc)
+               if ($alloc->discount_confirmed)
+                       $discount += $alloc->early_discount*$alloc->amount;
+
        $payment_no = write_customer_payment($cart->trans_no, $customer_id, $branch_id,
                $bank_account, $trans_date, $ref, $amount, $discount, $memo, 0, $charge, $bank_amount);
 
@@ -466,7 +471,7 @@ function write_recurrent_invoice($invoice_id, $description, $order_no, $debtor_n
 
 function write_customer($customer_id, $name, $ref, $address, $tax_id, $curr_code, $dim1, $dim2, $credit_status,
         $payment_terms, $discount, $credit_limit, $sales_type, $notes, $inactive, $salesman, $area, 
-        $tax_group, $location, $address, $ship_via, $notes, $bank_account, $address, $phone, $phone2, $fax, $email)
+        $tax_group, $location, $address, $ship_via, $notes, $bank_account, $phone, $phone2, $fax, $email)
 {
        global $SysPrefs;