Merging changes form main trunk 2.2.5-2.2.6
[fa-stable.git] / gl / includes / db / gl_db_accounts.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 function add_gl_account($account_code, $account_name, $account_type, $account_code2)
13 {
14         $sql = "INSERT INTO ".TB_PREF."chart_master (account_code, account_code2, account_name, account_type)
15                 VALUES (".db_escape($account_code).", ".db_escape($account_code2).", "
16                         .db_escape($account_name).", ".db_escape($account_type).")";
17
18         return db_query($sql);
19 }
20
21 function update_gl_account($account_code, $account_name, $account_type, $account_code2)
22 {
23     $sql = "UPDATE ".TB_PREF."chart_master SET account_name=".db_escape($account_name)
24     .",account_type=".db_escape($account_type).", account_code2=".db_escape($account_code2)
25                 ." WHERE account_code = ".db_escape($account_code);
26
27         return db_query($sql);
28 }
29
30 function delete_gl_account($code)
31 {
32         $sql = "DELETE FROM ".TB_PREF."chart_master WHERE account_code=".db_escape($code);
33
34         db_query($sql, "could not delete gl account");
35 }
36
37 function get_gl_accounts($from=null, $to=null, $type=null)
38 {
39         $sql = "SELECT ".TB_PREF."chart_master.*,".TB_PREF."chart_types.name AS AccountTypeName
40                 FROM ".TB_PREF."chart_master,".TB_PREF."chart_types
41                 WHERE ".TB_PREF."chart_master.account_type=".TB_PREF."chart_types.id";
42         if ($from != null)
43                 $sql .= " AND ".TB_PREF."chart_master.account_code >= ".db_escape($from);
44         if ($to != null)
45                 $sql .= " AND ".TB_PREF."chart_master.account_code <= ".db_escape($to);
46         if ($type != null)
47                 $sql .= " AND account_type=".db_escape($type);
48         $sql .= " ORDER BY account_code";
49
50         return db_query($sql, "could not get gl accounts");
51 }
52
53 function get_gl_accounts_all($balance=-1)
54 {
55         global $use_new_account_types;
56         
57         if ($balance == 1)
58                 $where ="WHERE ctype>0 AND ctype<".CL_INCOME;
59         elseif ($balance == 0)  
60                 $where ="WHERE ctype>".CL_EQUITY." OR ctype=0"; // backwards compatibility
61         $sql = "SELECT ".TB_PREF."chart_master.account_code, ".TB_PREF."chart_master.account_name, ".TB_PREF."chart_master.account_code2,
62                 ".TB_PREF."chart_types.name AS AccountTypeName,".TB_PREF."chart_types.id AS AccountType,
63                 ".TB_PREF."chart_types.parent, ".TB_PREF."chart_class.class_name AS AccountClassName, ".TB_PREF."chart_class.cid AS ClassID, 
64                 ".TB_PREF."chart_class.ctype AS ClassType
65                 FROM ".TB_PREF."chart_types INNER JOIN ".TB_PREF."chart_class ON ".TB_PREF."chart_types.class_id=".TB_PREF."chart_class.cid
66                 LEFT JOIN ".TB_PREF."chart_master ON ".TB_PREF."chart_master.account_type=".TB_PREF."chart_types.id ";
67         if ($balance != -1)
68                 $sql .= $where;                                 
69         if (isset($use_new_account_types) && $use_new_account_types == 1)
70                 $sql .= " ORDER BY ".TB_PREF."chart_class.cid, ".TB_PREF."chart_types.id, parent, ".TB_PREF."chart_master.account_code";
71         else
72                 $sql .= " ORDER BY ".TB_PREF."chart_class.cid, IF(parent > 0,parent,".TB_PREF."chart_types.id), 
73                         IF(parent > 0,".TB_PREF."chart_types.id, parent), ".TB_PREF."chart_master.account_code";
74
75         return db_query($sql, "could not get gl accounts");
76 }
77
78 function get_gl_account($code)
79 {
80         $sql = "SELECT * FROM ".TB_PREF."chart_master WHERE account_code=".db_escape($code);
81
82         $result = db_query($sql, "could not get gl account");
83         return db_fetch($result);
84 }
85
86 function is_account_balancesheet($code)
87 {
88         $sql = "SELECT ".TB_PREF."chart_class.ctype FROM ".TB_PREF."chart_class, "
89                 .TB_PREF."chart_types, ".TB_PREF."chart_master
90                 WHERE ".TB_PREF."chart_master.account_type=".TB_PREF."chart_types.id AND
91                 ".TB_PREF."chart_types.class_id=".TB_PREF."chart_class.cid
92                 AND ".TB_PREF."chart_master.account_code=".db_escape($code);
93
94         $result = db_query($sql,"could not retreive the account class for $code");
95         $row = db_fetch_row($result);
96         return $row[0] > 0 && $row[0] < CL_INCOME;
97 }
98
99 function get_gl_account_name($code)
100 {
101         $sql = "SELECT account_name from ".TB_PREF."chart_master WHERE account_code=".db_escape($code);
102
103         $result = db_query($sql,"could not retreive the account name for $code");
104
105         if (db_num_rows($result) == 1)
106         {
107                 $row = db_fetch_row($result);
108                 return $row[0];
109         }
110
111         display_db_error("could not retreive the account name for $code", $sql, true);
112 }
113
114 function gl_account_in_company_defaults($acc)
115 {
116         $sql= "SELECT COUNT(*) FROM ".TB_PREF."company WHERE debtors_act=$acc 
117                 OR pyt_discount_act=$acc
118                 OR creditors_act=$acc 
119                 OR bank_charge_act=$acc 
120                 OR exchange_diff_act=$acc
121                 OR profit_loss_year_act=$acc
122                 OR retained_earnings_act=$acc
123                 OR freight_act=$acc
124                 OR default_sales_act=$acc 
125                 OR default_sales_discount_act=$acc
126                 OR default_prompt_payment_act=$acc
127                 OR default_inventory_act=$acc
128                 OR default_cogs_act=$acc
129                 OR default_adj_act=$acc
130                 OR default_inv_sales_act=$acc
131                 OR default_assembly_act=$acc";
132         $result = db_query($sql,"Couldn't test for default company GL codes");
133
134         $myrow = db_fetch_row($result);
135         return ($myrow[0] > 0); 
136 }
137
138 function gl_account_in_stock_category($acc)
139 {
140         $sql= "SELECT COUNT(*) FROM ".TB_PREF."stock_category WHERE 
141                 dflt_inventory_act=$acc 
142                 OR dflt_cogs_act=$acc
143                 OR dflt_adjustment_act=$acc 
144                 OR dflt_sales_act=$acc";
145         $result = db_query($sql,"Couldn't test for existing stock category GL codes");
146
147         $myrow = db_fetch_row($result);
148         return ($myrow[0] > 0); 
149 }
150
151 function gl_account_in_stock_master($acc)
152 {
153         $sql= "SELECT COUNT(*) FROM ".TB_PREF."stock_master WHERE 
154                 inventory_account=$acc 
155                 OR cogs_account=$acc
156                 OR adjustment_account=$acc 
157                 OR sales_account=$acc";
158         $result = db_query($sql,"Couldn't test for existing stock GL codes");
159
160         $myrow = db_fetch_row($result);
161         return ($myrow[0] > 0); 
162 }
163
164 function gl_account_in_tax_types($acc)
165 {
166         $sql= "SELECT COUNT(*) FROM ".TB_PREF."tax_types WHERE sales_gl_code=$acc OR purchasing_gl_code=$acc";
167         $result = db_query($sql,"Couldn't test for existing tax GL codes");
168
169         $myrow = db_fetch_row($result);
170         return ($myrow[0] > 0); 
171 }
172
173 function gl_account_in_cust_branch($acc)
174 {
175         $sql= "SELECT COUNT(*) FROM ".TB_PREF."cust_branch WHERE 
176                 sales_account=$acc 
177                 OR sales_discount_account=$acc
178                 OR receivables_account=$acc
179                 OR payment_discount_account=$acc";
180         $result = db_query($sql,"Couldn't test for existing cust branch GL codes");
181
182         $myrow = db_fetch_row($result);
183         return ($myrow[0] > 0); 
184 }
185
186 function gl_account_in_suppliers($acc)
187 {
188         $sql= "SELECT COUNT(*) FROM ".TB_PREF."suppliers WHERE 
189                 purchase_account=$acc
190                 OR payment_discount_account=$acc
191                 OR payable_account=$acc";
192         $result = db_query($sql,"Couldn't test for existing suppliers GL codes");
193
194         $myrow = db_fetch_row($result);
195         return ($myrow[0] > 0); 
196 }
197
198 function gl_account_in_quick_entry_lines($acc)
199 {
200         $sql= "SELECT COUNT(*) FROM ".TB_PREF."quick_entry_lines WHERE 
201                 dest_id=$acc AND UPPER(LEFT(action, 1)) <> 'T'";
202         $result = db_query($sql,"Couldn't test for existing Quick Entry Line GL codes");
203
204         $myrow = db_fetch_row($result);
205         return ($myrow[0] > 0); 
206 }
207 ?>