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_account($code)
  54 {
  55         $sql = "SELECT * FROM ".TB_PREF."chart_master WHERE account_code=".db_escape($code);
  56
  57         $result = db_query($sql, "could not get gl account");
  58         return db_fetch($result);
  59 }
  60
  61 function is_account_balancesheet($code)
  62 {
  63         $sql = "SELECT ".TB_PREF."chart_class.ctype FROM ".TB_PREF."chart_class, "
  64                 .TB_PREF."chart_types, ".TB_PREF."chart_master
  65                 WHERE ".TB_PREF."chart_master.account_type=".TB_PREF."chart_types.id AND
  66                 ".TB_PREF."chart_types.class_id=".TB_PREF."chart_class.cid
  67                 AND ".TB_PREF."chart_master.account_code=".db_escape($code);
  68
  69         $result = db_query($sql,"could not retreive the account class for $code");
  70         $row = db_fetch_row($result);
  71         return $row[0] > 0 && $row[0] < CL_INCOME;
  72 }
  73
  74 function get_gl_account_name($code)
  75 {
  76         $sql = "SELECT account_name from ".TB_PREF."chart_master WHERE account_code=".db_escape($code);
  77
  78         $result = db_query($sql,"could not retreive the account name for $code");
  79
  80         if (db_num_rows($result) == 1)
  81         {
  82                 $row = db_fetch_row($result);
  83                 return $row[0];
  84         }
  85
  86         display_db_error("could not retreive the account name for $code", $sql, true);
  87 }
  88
  89 function gl_account_in_company_defaults($acc)
  90 {
  91         $sql= "SELECT COUNT(*) FROM ".TB_PREF."sys_prefs WHERE (name='debtors_act'
  92                 OR name='pyt_discount_act'
  93                 OR name='creditors_act'
  94                 OR name='bank_charge_act'
  95                 OR name='exchange_diff_act'
  96                 OR name='profit_loss_year_act'
  97                 OR name='retained_earnings_act'
  98                 OR name='freight_act'
  99                 OR name='default_sales_act'
 100                 OR name='default_sales_discount_act'
 101                 OR name='default_prompt_payment_act'
 102                 OR name='default_inventory_act'
 103                 OR name='default_cogs_act'
 104                 OR name='default_adj_act'
 105                 OR name='default_inv_sales_act'
 106                 OR name='default_assembly_act') AND value=".db_escape($acc);
 107         $result = db_query($sql,"Couldn't test for default company GL codes");
 108
 109         $myrow = db_fetch_row($result);
 110         return ($myrow[0] > 0);
 111 }
 112
 113 function gl_account_in_stock_category($acc)
 114 {
 115         $sql= "SELECT COUNT(*) FROM ".TB_PREF."stock_category WHERE
 116                 dflt_inventory_act=$acc
 117                 OR dflt_cogs_act=$acc
 118                 OR dflt_adjustment_act=$acc
 119                 OR dflt_sales_act=$acc";
 120         $result = db_query($sql,"Couldn't test for existing stock category GL codes");
 121
 122         $myrow = db_fetch_row($result);
 123         return ($myrow[0] > 0);
 124 }
 125
 126 function gl_account_in_stock_master($acc)
 127 {
 128         $sql= "SELECT COUNT(*) FROM ".TB_PREF."stock_master WHERE
 129                 inventory_account=$acc
 130                 OR cogs_account=$acc
 131                 OR adjustment_account=$acc
 132                 OR sales_account=$acc";
 133         $result = db_query($sql,"Couldn't test for existing stock GL codes");
 134
 135         $myrow = db_fetch_row($result);
 136         return ($myrow[0] > 0);
 137 }
 138
 139 function gl_account_in_tax_types($acc)
 140 {
 141         $sql= "SELECT COUNT(*) FROM ".TB_PREF."tax_types WHERE sales_gl_code=$acc OR purchasing_gl_code=$acc";
 142         $result = db_query($sql,"Couldn't test for existing tax GL codes");
 143
 144         $myrow = db_fetch_row($result);
 145         return ($myrow[0] > 0);
 146 }
 147
 148 function gl_account_in_cust_branch($acc)
 149 {
 150         $sql= "SELECT COUNT(*) FROM ".TB_PREF."cust_branch WHERE
 151                 sales_account=$acc
 152                 OR sales_discount_account=$acc
 153                 OR receivables_account=$acc
 154                 OR payment_discount_account=$acc";
 155         $result = db_query($sql,"Couldn't test for existing cust branch GL codes");
 156
 157         $myrow = db_fetch_row($result);
 158         return ($myrow[0] > 0);
 159 }
 160
 161 function gl_account_in_suppliers($acc)
 162 {
 163         $sql= "SELECT COUNT(*) FROM ".TB_PREF."suppliers WHERE
 164                 purchase_account=$acc
 165                 OR payment_discount_account=$acc
 166                 OR payable_account=$acc";
 167         $result = db_query($sql,"Couldn't test for existing suppliers GL codes");
 168
 169         $myrow = db_fetch_row($result);
 170         return ($myrow[0] > 0);
 171 }
 172
 173 function gl_account_in_quick_entry_lines($acc)
 174 {
 175         $sql= "SELECT COUNT(*) FROM ".TB_PREF."quick_entry_lines WHERE
 176                 dest_id=$acc AND UPPER(LEFT(action, 1)) <> 'T'";
 177         $result = db_query($sql,"Couldn't test for existing Quick Entry Line GL codes");
 178
 179         $myrow = db_fetch_row($result);
 180         return ($myrow[0] > 0);
 181 }
 182 //
 183 //      Returns n>0 when account is AR, n<0 when account is AP
 184 //  (priority for AR accounts)
 185 //
 186  function is_subledger_account($account)
 187  {
 188         $sql = "SELECT 1 FROM ".TB_PREF."cust_branch WHERE receivables_account=".db_escape($account)
 189         ." UNION SELECT -1 FROM ".TB_PREF."suppliers WHERE payable_account=".db_escape($account);
 190
 191         $result = db_query($sql,"Couldn't test AR/AP account");
 192         $myrow = db_fetch_row($result);
 193         return $myrow[0];
 194  }
 195
 196 function get_subaccount_name($code_id, $person_id)
 197 {
 198         $sql = "SELECT debtor_ref as ref FROM ".TB_PREF."cust_branch branch LEFT JOIN ".TB_PREF."debtors_master d ON branch.debtor_no = d.debtor_no
 199                 WHERE branch.receivables_account=".db_escape($code_id)." AND d.debtor_no=".db_escape($person_id)
 200                 ." UNION SELECT supp_ref as ref FROM ".TB_PREF."suppliers supp
 201                 WHERE payable_account=".db_escape($code_id)." AND supplier_id=".db_escape($person_id);
 202         $result = db_query($sql, 'cannot retrieve counterparty name');
 203         $row = db_fetch($result);
 204
 205         return  $row ? $row['ref'] : '';
 206 }
 207
 208         $myrow = db_fetch_row($result);
 209         return ($myrow[0] > 0);
 210 }
 211
 212 function gl_account_in_stock_category($acc)
 213 {
 214         $acc = db_escape($acc);
 215
 216         $sql= "SELECT COUNT(*) FROM ".TB_PREF."stock_category WHERE
 217                 dflt_inventory_act=$acc
 218                 OR dflt_cogs_act=$acc
 219                 OR dflt_adjustment_act=$acc
 220                 OR dflt_sales_act=$acc";
 221         $result = db_query($sql,"Couldn't test for existing stock category GL codes");
 222
 223         $myrow = db_fetch_row($result);
 224         return ($myrow[0] > 0);
 225 }
 226
 227 function gl_account_in_stock_master($acc)
 228 {
 229         $acc = db_escape($acc);
 230
 231         $sql= "SELECT COUNT(*) FROM ".TB_PREF."stock_master WHERE
 232                 inventory_account=$acc
 233                 OR cogs_account=$acc
 234                 OR adjustment_account=$acc
 235                 OR sales_account=$acc";
 236         $result = db_query($sql,"Couldn't test for existing stock GL codes");
 237
 238         $myrow = db_fetch_row($result);
 239         return ($myrow[0] > 0);
 240 }
 241
 242 function gl_account_in_tax_types($acc)
 243 {
 244         $acc = db_escape($acc);
 245
 246         $sql= "SELECT COUNT(*) FROM ".TB_PREF."tax_types WHERE sales_gl_code=$acc OR purchasing_gl_code=$acc";
 247         $result = db_query($sql,"Couldn't test for existing tax GL codes");
 248
 249         $myrow = db_fetch_row($result);
 250         return ($myrow[0] > 0);
 251 }
 252
 253 function gl_account_in_cust_branch($acc)
 254 {
 255         $acc = db_escape($acc);
 256
 257         $sql= "SELECT COUNT(*) FROM ".TB_PREF."cust_branch WHERE
 258                 sales_account=$acc
 259                 OR sales_discount_account=$acc
 260                 OR receivables_account=$acc
 261                 OR payment_discount_account=$acc";
 262         $result = db_query($sql,"Couldn't test for existing cust branch GL codes");
 263
 264         $myrow = db_fetch_row($result);
 265         return ($myrow[0] > 0);
 266 }
 267
 268 function gl_account_in_suppliers($acc)
 269 {
 270         $acc = db_escape($acc);
 271
 272         $sql= "SELECT COUNT(*) FROM ".TB_PREF."suppliers WHERE
 273                 purchase_account=$acc
 274                 OR payment_discount_account=$acc
 275                 OR payable_account=$acc";
 276         $result = db_query($sql,"Couldn't test for existing suppliers GL codes");
 277
 278         $myrow = db_fetch_row($result);
 279         return ($myrow[0] > 0);
 280 }
 281
 282 function gl_account_in_quick_entry_lines($acc)
 283 {
 284         $acc = db_escape($acc);
 285
 286         $sql= "SELECT COUNT(*) FROM ".TB_PREF."quick_entry_lines WHERE
 287                 dest_id=$acc AND UPPER(LEFT(action, 1)) <> 'T'";
 288         $result = db_query($sql,"Couldn't test for existing Quick Entry Line GL codes");
 289
 290         $myrow = db_fetch_row($result);
 291         return ($myrow[0] > 0);
 292 }
 293
 294 function gl_account_in_bank_accounts($acc)
 295 {
 296         $sql= "SELECT COUNT(*) FROM ".TB_PREF."bank_accounts WHERE
 297                 account_code=".db_escape($acc);
 298         $result = db_query($sql,"Couldn't test bank account GL codes");
 299
 300         $myrow = db_fetch_row($result);
 301         return ($myrow[0] > 0);
 302 }
 303 ?>