Audit trail added.

[fa-stable.git] / sales / includes / db / payment_db.inc

diff --git a/sales/includes/db/payment_db.inc b/sales/includes/db/payment_db.inc
index 15ec358461e68cf139c0df01b10c7750a7969b1e..12e7cc0fab833df3b19219c4fc50284a0092df10 100644 (file)
--- a/sales/includes/db/payment_db.inc
+++ b/sales/includes/db/payment_db.inc
@@ -1,4 +1,14 @@
 <?php
+/**********************************************************************
+    Copyright (C) FrontAccounting, LLC.
+       Released under the terms of the GNU General Public License, GPL, 
+       as published by the Free Software Foundation, either version 3 
+       of the License, or (at your option) any later version.
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  
+    See the License here <http://www.gnu.org/licenses/gpl-3.0.html>.
+***********************************************************************/
 /*
   Write/update customer payment.
 */
@@ -20,9 +30,9 @@ function write_customer_payment($trans_no, $customer_id, $branch_id, $bank_accou
          void_gl_trans(12, $trans_no, true);
          void_cust_allocations(12, $trans_no, $date_);
        }
-
+       $total = 0;
        /* Bank account entry first */
-       add_gl_trans_customer(12, $payment_no, $date_,
+       $total += add_gl_trans_customer(12, $payment_no, $date_,
                $bank_gl_account, 0, 0, $amount,  $customer_id,
                "Cannot insert a GL transaction for the bank account debit", $rate);
 
@@ -39,19 +49,21 @@ function write_customer_payment($trans_no, $customer_id, $branch_id, $bank_accou
        }
 
        if (($discount + $amount) != 0) {
-               /* Now Credit Debtors account with receipts + discounts */
-               add_gl_trans_customer(12, $payment_no, $date_,
-                       $debtors_account, 0, 0, -($discount + $amount), $customer_id,
-                       "Cannot insert a GL transaction for the debtors account credit", $rate);
+       /* Now Credit Debtors account with receipts + discounts */
+       $total += add_gl_trans_customer(12, $payment_no, $date_,
+               $debtors_account, 0, 0, -($discount + $amount), $customer_id,
+               "Cannot insert a GL transaction for the debtors account credit", $rate);
        }
-
        if ($discount != 0)     {
                /* Now Debit discount account with discounts allowed*/
-               add_gl_trans_customer(12, $payment_no, $date_,
+               $total += add_gl_trans_customer(12, $payment_no, $date_,
                        $discount_account, 0, 0, $discount, $customer_id,
                        "Cannot insert a GL transaction for the payment discount debit", $rate);
        }
 
+       /*Post a balance post if $total != 0 */
+       add_gl_balance(12, $payment_no, $date_, -$total, payment_person_types::customer(), $customer_id);       
+
        /*now enter the bank_trans entry */
        add_bank_trans(12, $payment_no, $bank_account, $ref,
                $date_, $amount, payment_person_types::customer(), $customer_id,