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 ***********************************************************************/
13 function add_customer($CustName, $cust_ref, $address, $tax_id, $curr_code,
14 $dimension_id, $dimension2_id, $credit_status, $payment_terms, $discount, $pymt_discount,
15 $credit_limit, $sales_type, $notes)
17 $sql = "INSERT INTO ".TB_PREF."debtors_master (name, debtor_ref, address, tax_id,
18 dimension_id, dimension2_id, curr_code, credit_status, payment_terms, discount,
19 pymt_discount,credit_limit, sales_type, notes) VALUES ("
20 .db_escape($CustName) .", " .db_escape($cust_ref) .", "
21 .db_escape($address) . ", " . db_escape($tax_id) . ","
22 .db_escape($dimension_id) . ", "
23 .db_escape($dimension2_id) . ", ".db_escape($curr_code) . ",
24 " . db_escape($credit_status) . ", ".db_escape($payment_terms) . ", " . $discount . ",
25 " . $pymt_discount . ", " . $credit_limit
26 .", ".db_escape($sales_type).", ".db_escape($notes) . ")";
28 db_query($sql,"The customer could not be added");
31 function update_customer($customer_id, $CustName, $cust_ref, $address, $tax_id, $curr_code,
32 $dimension_id, $dimension2_id, $credit_status, $payment_terms, $discount, $pymt_discount,
33 $credit_limit, $sales_type, $notes)
35 $sql = "UPDATE ".TB_PREF."debtors_master SET name=" . db_escape($CustName) . ",
36 debtor_ref=" . db_escape($cust_ref) . ",
37 address=".db_escape($address) . ",
38 tax_id=".db_escape($tax_id) . ",
39 curr_code=".db_escape($curr_code) . ",
40 dimension_id=".db_escape($dimension_id) . ",
41 dimension2_id=".db_escape($dimension2_id) . ",
42 credit_status=".db_escape($credit_status) . ",
43 payment_terms=".db_escape($payment_terms) . ",
44 discount=" . $discount . ",
45 pymt_discount=" . $pymt_discount . ",
46 credit_limit=" . $credit_limit . ",
47 sales_type = ".db_escape($sales_type) . ",
48 notes=".db_escape($notes) ."
49 WHERE debtor_no = ".db_escape($customer_id);
51 db_query($sql,"The customer could not be updated");
54 function delete_customer($customer_id)
57 delete_entity_contacts('customer', $customer_id);
59 $sql = "DELETE FROM ".TB_PREF."debtors_master WHERE debtor_no=".db_escape($customer_id);;
60 db_query($sql,"cannot delete customer");
64 function get_customer_details($customer_id, $to=null)
68 $todate = date("Y-m-d");
70 $todate = date2sql($to);
71 $past1 = get_company_pref('past_due_days');
73 // removed - debtor_trans.alloc from all summations
75 $value = "IFNULL(IF(trans.type=11 OR trans.type=12 OR trans.type=2, -1, 1)
76 * (trans.ov_amount + trans.ov_gst + trans.ov_freight + trans.ov_freight_tax + trans.ov_discount),0)";
78 $due = "IF (trans.type=10, trans.due_date, trans.tran_date)";
79 $sql = "SELECT ".TB_PREF."debtors_master.name, ".TB_PREF."debtors_master.curr_code, ".TB_PREF."payment_terms.terms,
80 ".TB_PREF."debtors_master.credit_limit, ".TB_PREF."credit_status.dissallow_invoices, ".TB_PREF."credit_status.reason_description,
82 Sum(IFNULL($value,0)) AS Balance,
83 Sum(IF ((TO_DAYS('$todate') - TO_DAYS($due)) >= 0,$value,0)) AS Due,
84 Sum(IF ((TO_DAYS('$todate') - TO_DAYS($due)) >= $past1,$value,0)) AS Overdue1,
85 Sum(IF ((TO_DAYS('$todate') - TO_DAYS($due)) >= $past2,$value,0)) AS Overdue2
87 FROM ".TB_PREF."debtors_master
88 LEFT JOIN ".TB_PREF."debtor_trans trans ON
89 trans.tran_date <= '$todate' AND ".TB_PREF."debtors_master.debtor_no = trans.debtor_no AND trans.type <> 13
91 ".TB_PREF."payment_terms,
92 ".TB_PREF."credit_status
95 ".TB_PREF."debtors_master.payment_terms = ".TB_PREF."payment_terms.terms_indicator
96 AND ".TB_PREF."debtors_master.credit_status = ".TB_PREF."credit_status.id
97 AND ".TB_PREF."debtors_master.debtor_no = ".db_escape($customer_id)."
100 ".TB_PREF."debtors_master.name,
101 ".TB_PREF."payment_terms.terms,
102 ".TB_PREF."payment_terms.days_before_due,
103 ".TB_PREF."payment_terms.day_in_following_month,
104 ".TB_PREF."debtors_master.credit_limit,
105 ".TB_PREF."credit_status.dissallow_invoices,
106 ".TB_PREF."credit_status.reason_description";
107 $result = db_query($sql,"The customer details could not be retrieved");
109 $customer_record = db_fetch($result);
111 return $customer_record;
116 function get_customer($customer_id)
118 $sql = "SELECT * FROM ".TB_PREF."debtors_master WHERE debtor_no=".db_escape($customer_id);
120 $result = db_query($sql, "could not get customer");
122 return db_fetch($result);
125 function get_customer_name($customer_id)
127 $sql = "SELECT name FROM ".TB_PREF."debtors_master WHERE debtor_no=".db_escape($customer_id);
129 $result = db_query($sql, "could not get customer");
131 $row = db_fetch_row($result);
136 function get_customer_habit($customer_id)
138 $sql = "SELECT ".TB_PREF."debtors_master.pymt_discount,
139 ".TB_PREF."credit_status.dissallow_invoices
140 FROM ".TB_PREF."debtors_master, ".TB_PREF."credit_status
141 WHERE ".TB_PREF."debtors_master.credit_status = ".TB_PREF."credit_status.id
142 AND ".TB_PREF."debtors_master.debtor_no = ".db_escape($customer_id);
144 $result = db_query($sql, "could not query customers");
146 return db_fetch($result);
149 function get_customer_contacts($customer_id, $action=null)
152 $res = get_crm_persons('customer', $action, $customer_id);
153 while($contact = db_fetch($res))
154 $results[] = $contact;
159 function get_current_cust_credit($customer_id)
161 $custdet = get_customer_details($customer_id);
163 return $custdet['credit_limit']-$custdet['Balance'];
167 function is_new_customer($id)
169 $tables = array('cust_branch', 'debtor_trans', 'recurrent_invoices', 'sales_orders');
171 return !key_in_foreign_table($id, $tables, 'debtor_no');