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 //-------------------------------------------------------------------------------------------------------------
14 function add_supp_trans($type, $supplier_id, $date_, $due_date, $reference, $supp_reference,
15 $amount, $amount_tax, $discount, $err_msg="", $rate=0)
17 $date = date2sql($date_);
19 $due_date = "0000-00-00";
21 $due_date = date2sql($due_date);
23 $trans_no = get_next_trans_no($type);
25 $curr = get_supplier_currency($supplier_id);
28 $rate = get_exchange_rate_from_home_currency($curr, $date_);
31 $sql = "INSERT INTO ".TB_PREF."supp_trans (trans_no, type, supplier_id, tran_date, due_date,
32 reference, supp_reference, ov_amount, ov_gst, rate, ov_discount) ";
33 $sql .= "VALUES ($trans_no, $type, $supplier_id, '$date', '$due_date',
34 ".db_escape($reference).", ".db_escape($supp_reference).", $amount, $amount_tax, $rate, $discount)";
37 $err_msg = "Cannot insert a supplier transaction record";
39 db_query($sql, $err_msg);
40 add_audit_trail($type, $trans_no, $date_);
45 //-------------------------------------------------------------------------------------------------------------
47 function get_supp_trans($trans_no, $trans_type=-1)
49 $sql = "SELECT ".TB_PREF."supp_trans.*, (".TB_PREF."supp_trans.ov_amount+".TB_PREF."supp_trans.ov_gst+".TB_PREF."supp_trans.ov_discount) AS Total,
50 ".TB_PREF."suppliers.supp_name AS supplier_name, ".TB_PREF."suppliers.curr_code AS SupplierCurrCode ";
52 if ($trans_type == 22)
54 // it's a payment so also get the bank account
55 $sql .= ", ".TB_PREF."bank_accounts.bank_name, ".TB_PREF."bank_accounts.bank_account_name, ".TB_PREF."bank_accounts.bank_curr_code,
56 ".TB_PREF."bank_accounts.account_type AS BankTransType, ".TB_PREF."bank_trans.amount AS BankAmount,
57 ".TB_PREF."bank_trans.ref ";
60 $sql .= " FROM ".TB_PREF."supp_trans, ".TB_PREF."suppliers ";
62 if ($trans_type == 22)
64 // it's a payment so also get the bank account
65 $sql .= ", ".TB_PREF."bank_trans, ".TB_PREF."bank_accounts";
68 $sql .= " WHERE ".TB_PREF."supp_trans.trans_no=$trans_no
69 AND ".TB_PREF."supp_trans.supplier_id=".TB_PREF."suppliers.supplier_id";
72 $sql .= " AND ".TB_PREF."supp_trans.type=$trans_type ";
74 if ($trans_type == 22)
76 // it's a payment so also get the bank account
77 $sql .= " AND ".TB_PREF."bank_trans.trans_no =$trans_no
78 AND ".TB_PREF."bank_trans.type=$trans_type
79 AND ".TB_PREF."bank_accounts.id=".TB_PREF."bank_trans.bank_act ";
82 $result = db_query($sql, "Cannot retreive a supplier transaction");
84 if (db_num_rows($result) == 0)
86 // can't return nothing
87 display_db_error("no supplier trans found for given params", $sql, true);
91 if (db_num_rows($result) > 1)
93 // can't return multiple
94 display_db_error("duplicate supplier transactions found for given params", $sql, true);
98 return db_fetch($result);
101 //----------------------------------------------------------------------------------------
103 function exists_supp_trans($type, $type_no)
106 return exists_grn($type_no);
108 $sql = "SELECT trans_no FROM ".TB_PREF."supp_trans WHERE type=$type
109 AND trans_no=$type_no";
110 $result = db_query($sql, "Cannot retreive a supplier transaction");
112 return (db_num_rows($result) > 0);
115 //----------------------------------------------------------------------------------------
117 function void_supp_trans($type, $type_no)
119 $sql = "UPDATE ".TB_PREF."supp_trans SET ov_amount=0, ov_discount=0, ov_gst=0,
120 alloc=0 WHERE type=$type AND trans_no=$type_no";
122 db_query($sql, "could not void supp transactions for type=$type and trans_no=$type_no");
125 //----------------------------------------------------------------------------------------
127 function post_void_supp_trans($type, $type_no)
131 void_supp_payment($type, $type_no);
135 if ($type == 20 || $type == 21)
137 void_supp_invoice($type, $type_no);
143 return void_grn($type_no);
149 //----------------------------------------------------------------------------------------