sales/includes/db/payment_db.inc

   1 <?php
   2 /**********************************************************************
   3     Copyright (C) FrontAccounting, LLC.
   4         Released under the terms of the GNU General Public License, GPL,
   5         as published by the Free Software Foundation, either version 3
   6         of the License, or (at your option) any later version.
   7     This program is distributed in the hope that it will be useful,
   8     but WITHOUT ANY WARRANTY; without even the implied warranty of
   9     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  10     See the License here <http://www.gnu.org/licenses/gpl-3.0.html>.
  11 ***********************************************************************/
  12 /*
  13   Write/update customer payment.
  14 */
  15 function write_customer_payment($trans_no, $customer_id, $branch_id, $bank_account,
  16         $date_, $ref, $amount, $discount, $memo_, $rate=0, $charge=0)
  17 {
  18         begin_transaction();
  19
  20         $company_record = get_company_prefs();
  21
  22         $payment_no = write_customer_trans(12, $trans_no, $customer_id, $branch_id,
  23                 $date_, $ref, $amount, $discount, 0, 0, 0, 0, 0, 0, 0, "", 0, $rate);
  24
  25         $bank_gl_account = get_bank_gl_account($bank_account);
  26
  27         if ($trans_no != 0) {
  28           delete_comments(12, $trans_no);
  29           void_bank_trans(12, $trans_no, true);
  30           void_gl_trans(12, $trans_no, true);
  31           void_cust_allocations(12, $trans_no, $date_);
  32         }
  33         $total = 0;
  34         /* Bank account entry first */
  35         $total += add_gl_trans_customer(12, $payment_no, $date_,
  36                 $bank_gl_account, 0, 0, $amount - $charge,  $customer_id,
  37                 "Cannot insert a GL transaction for the bank account debit", $rate);
  38
  39         if ($branch_id != reserved_words::get_any_numeric()) {
  40
  41                 $branch_data = get_branch_accounts($branch_id);
  42
  43                 $debtors_account = $branch_data["receivables_account"];
  44                 $discount_account = $branch_data["payment_discount_account"];
  45
  46         } else {
  47                 $debtors_account = $company_record["debtors_act"];
  48                 $discount_account = $company_record["default_prompt_payment_act"];
  49         }
  50
  51         if (($discount + $amount) != 0) {
  52         /* Now Credit Debtors account with receipts + discounts */
  53         $total += add_gl_trans_customer(12, $payment_no, $date_,
  54                 $debtors_account, 0, 0, -($discount + $amount), $customer_id,
  55                 "Cannot insert a GL transaction for the debtors account credit", $rate);
  56         }
  57         if ($discount != 0)     {
  58                 /* Now Debit discount account with discounts allowed*/
  59                 $total += add_gl_trans_customer(12, $payment_no, $date_,
  60                         $discount_account, 0, 0, $discount, $customer_id,
  61                         "Cannot insert a GL transaction for the payment discount debit", $rate);
  62         }
  63
  64         if ($charge != 0)       {
  65                 /* Now Debit bank charge account with charges */
  66                 $charge_act = get_company_pref('bank_charge_act');
  67                 $total += add_gl_trans_customer(12, $payment_no, $date_,
  68                         $charge_act, 0, 0, $charge, $customer_id,
  69                         "Cannot insert a GL transaction for the payment bank charge debit", $rate);
  70         }
  71         /*Post a balance post if $total != 0 */
  72         add_gl_balance(12, $payment_no, $date_, -$total, payment_person_types::customer(), $customer_id);
  73
  74         /*now enter the bank_trans entry */
  75         add_bank_trans(12, $payment_no, $bank_account, $ref,
  76                 $date_, $amount - $charge, payment_person_types::customer(), $customer_id,
  77                 get_customer_currency($customer_id), "", $rate);
  78
  79         add_comments(12, $payment_no, $date_, $memo_);
  80
  81         references::save(12, $payment_no, $ref);
  82
  83         commit_transaction();
  84
  85         return $payment_no;
  86 }
  87
  88 //-------------------------------------------------------------------------------------------------
  89
  90 function void_customer_payment($type, $type_no)
  91 {
  92         begin_transaction();
  93
  94         void_bank_trans($type, $type_no, true);
  95         void_gl_trans($type, $type_no, true);
  96         void_cust_allocations($type, $type_no);
  97         void_customer_trans($type, $type_no);
  98
  99         commit_transaction();
 100 }
 101
 102
 103 ?>