New customer/supplier currency can be changed as long as no transaction is entered.
[fa-stable.git] / sales / includes / db / customers_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 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)
16 {
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) . ")";
27
28         db_query($sql,"The customer could not be added");
29 }
30
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)
34 {
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);
50
51         db_query($sql,"The customer could not be updated");
52 }
53
54 function delete_customer($customer_id)
55 {
56         begin_transaction();
57         delete_entity_contacts('customer', $customer_id);
58
59         $sql = "DELETE FROM ".TB_PREF."debtors_master WHERE debtor_no=".db_escape($customer_id);;
60         db_query($sql,"cannot delete customer");
61         commit_transaction();
62 }
63
64 function get_customer_details($customer_id, $to=null)
65 {
66
67         if ($to == null)
68                 $todate = date("Y-m-d");
69         else
70                 $todate = date2sql($to);
71         $past1 = get_company_pref('past_due_days');
72         $past2 = 2 * $past1;
73         // removed - debtor_trans.alloc from all summations
74
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)";
77
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,
81
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
86
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
90 ,
91                          ".TB_PREF."payment_terms,
92                          ".TB_PREF."credit_status
93
94                 WHERE
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)."
98
99                 GROUP BY
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");
108
109     $customer_record = db_fetch($result);
110
111     return $customer_record;
112
113 }
114
115
116 function get_customer($customer_id)
117 {
118         $sql = "SELECT * FROM ".TB_PREF."debtors_master WHERE debtor_no=".db_escape($customer_id);
119
120         $result = db_query($sql, "could not get customer");
121
122         return db_fetch($result);
123 }
124
125 function get_customer_name($customer_id)
126 {
127         $sql = "SELECT name FROM ".TB_PREF."debtors_master WHERE debtor_no=".db_escape($customer_id);
128
129         $result = db_query($sql, "could not get customer");
130
131         $row = db_fetch_row($result);
132
133         return $row[0];
134 }
135
136 function get_customer_habit($customer_id)
137 {
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);
143
144         $result = db_query($sql, "could not query customers");
145
146         return db_fetch($result);
147 }
148
149 function get_customer_contacts($customer_id, $action=null)
150 {
151         $results = array();
152         $res = get_crm_persons('customer', $action, $customer_id);
153         while($contact = db_fetch($res))
154                 $results[] = $contact;
155
156         return $results;
157 }
158
159 function get_current_cust_credit($customer_id)
160 {
161         $custdet = get_customer_details($customer_id);
162
163         return $custdet['credit_limit']-$custdet['Balance'];
164
165 }
166
167 function is_new_customer($id)
168 {
169         $tables = array('cust_branch', 'debtor_trans', 'recurrent_invoices', 'sales_orders');
170
171         return !key_in_foreign_table($id, $tables, 'debtor_no');
172 }
173 ?>