X-Git-Url: https://delta.frontaccounting.com/gitweb/?a=blobdiff_plain;f=gl%2Fincludes%2Fdb%2Fgl_db_accounts.inc;h=25bc84fce7e6b058e500eb450c2d97c1d0c2cd57;hb=3b431d909abc53e4a4d712cbafa39ca556409d0e;hp=a4004d81339ee7b47571d6f47d1d2777caeb96b0;hpb=279d7962a249da9cbc3074360e3a68a23a31145e;p=fa-stable.git diff --git a/gl/includes/db/gl_db_accounts.inc b/gl/includes/db/gl_db_accounts.inc index a4004d81..25bc84fc 100644 --- a/gl/includes/db/gl_db_accounts.inc +++ b/gl/includes/db/gl_db_accounts.inc @@ -88,22 +88,23 @@ function get_gl_account_name($code) function gl_account_in_company_defaults($acc) { - $sql= "SELECT COUNT(*) FROM ".TB_PREF."company WHERE debtors_act=$acc - OR pyt_discount_act=$acc - OR creditors_act=$acc - OR bank_charge_act=$acc - OR exchange_diff_act=$acc - OR profit_loss_year_act=$acc - OR retained_earnings_act=$acc - OR freight_act=$acc - OR default_sales_act=$acc - OR default_sales_discount_act=$acc - OR default_prompt_payment_act=$acc - OR default_inventory_act=$acc - OR default_cogs_act=$acc - OR default_adj_act=$acc - OR default_inv_sales_act=$acc - OR default_assembly_act=$acc"; + $sql= "SELECT COUNT(*) FROM ".TB_PREF."sys_prefs WHERE (name='debtors_act' + OR name='pyt_discount_act' + OR name='creditors_act' + OR name='bank_charge_act' + OR name='exchange_diff_act' + OR name='profit_loss_year_act' + OR name='retained_earnings_act' + OR name='freight_act' + OR name='deferred_income_act' + OR name='default_sales_act' + OR name='default_sales_discount_act' + OR name='default_prompt_payment_act' + OR name='default_inventory_act' + OR name='default_cogs_act' + OR name='default_adj_act' + OR name='default_inv_sales_act' + OR name='default_assembly_act') AND value=".db_escape($acc); $result = db_query($sql,"Couldn't test for default company GL codes"); $myrow = db_fetch_row($result); @@ -112,6 +113,8 @@ function gl_account_in_company_defaults($acc) function gl_account_in_stock_category($acc) { + $acc = db_escape($acc); + $sql= "SELECT COUNT(*) FROM ".TB_PREF."stock_category WHERE dflt_inventory_act=$acc OR dflt_cogs_act=$acc @@ -125,6 +128,8 @@ function gl_account_in_stock_category($acc) function gl_account_in_stock_master($acc) { + $acc = db_escape($acc); + $sql= "SELECT COUNT(*) FROM ".TB_PREF."stock_master WHERE inventory_account=$acc OR cogs_account=$acc @@ -138,6 +143,8 @@ function gl_account_in_stock_master($acc) function gl_account_in_tax_types($acc) { + $acc = db_escape($acc); + $sql= "SELECT COUNT(*) FROM ".TB_PREF."tax_types WHERE sales_gl_code=$acc OR purchasing_gl_code=$acc"; $result = db_query($sql,"Couldn't test for existing tax GL codes"); @@ -147,6 +154,8 @@ function gl_account_in_tax_types($acc) function gl_account_in_cust_branch($acc) { + $acc = db_escape($acc); + $sql= "SELECT COUNT(*) FROM ".TB_PREF."cust_branch WHERE sales_account=$acc OR sales_discount_account=$acc @@ -160,6 +169,8 @@ function gl_account_in_cust_branch($acc) function gl_account_in_suppliers($acc) { + $acc = db_escape($acc); + $sql= "SELECT COUNT(*) FROM ".TB_PREF."suppliers WHERE purchase_account=$acc OR payment_discount_account=$acc @@ -172,6 +183,8 @@ function gl_account_in_suppliers($acc) function gl_account_in_quick_entry_lines($acc) { + $acc = db_escape($acc); + $sql= "SELECT COUNT(*) FROM ".TB_PREF."quick_entry_lines WHERE dest_id=$acc AND UPPER(LEFT(action, 1)) <> 'T'"; $result = db_query($sql,"Couldn't test for existing Quick Entry Line GL codes"); @@ -179,4 +192,69 @@ function gl_account_in_quick_entry_lines($acc) $myrow = db_fetch_row($result); return ($myrow[0] > 0); } -?> \ No newline at end of file +// +// Returns n>0 when account is AR, n<0 when account is AP +// (priority for AR accounts) +// +function is_subledger_account($account) +{ + $sql = "SELECT 1 FROM ".TB_PREF."cust_branch WHERE receivables_account=".db_escape($account) + ." UNION SELECT -1 FROM ".TB_PREF."suppliers WHERE payable_account=".db_escape($account); + + $result = db_query($sql,"Couldn't test AR/AP account"); + $myrow = db_fetch_row($result); + return $myrow[0]; +} + +function get_subaccount_data($code_id, $person_id) +{ + $sql = "SELECT debtor_ref as name, branch_code as id + FROM ".TB_PREF."cust_branch branch LEFT JOIN ".TB_PREF."debtors_master d ON branch.debtor_no = d.debtor_no + WHERE branch.receivables_account=".db_escape($code_id)." AND d.debtor_no=".db_escape($person_id) + ." UNION SELECT supp_ref as name, '' as id FROM ".TB_PREF."suppliers supp + WHERE supplier_id=".db_escape($person_id)." AND payable_account=".db_escape($code_id); + $result = db_query($sql, 'cannot retrieve counterparty name'); + + return db_fetch($result); +} + +function get_subaccount_name($code_id, $person_id) +{ + $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 + WHERE branch.receivables_account=".db_escape($code_id)." AND d.debtor_no=".db_escape($person_id) + ." UNION SELECT supp_ref as ref FROM ".TB_PREF."suppliers supp + WHERE payable_account=".db_escape($code_id)." AND supplier_id=".db_escape($person_id); + $result = db_query($sql, 'cannot retrieve counterparty name'); + $row = db_fetch($result); + + return $row ? $row['ref'] : ''; +} + +function gl_account_in_bank_accounts($acc) +{ + $sql= "SELECT COUNT(*) FROM ".TB_PREF."bank_accounts WHERE + account_code=".db_escape($acc); + $result = db_query($sql,"Couldn't test bank account GL codes"); + + $myrow = db_fetch_row($result); + return ($myrow[0] > 0); +} + +//---------------------------------------------------------------------------------- +// Check if given account is used by any bank_account. +// Returns id of first bank_account using account_code, null otherwise. +// +// Keep in mind that direct posting to bank account is depreciated +// because we have no way to select right bank account if +// there is more than one using given gl account. +// +function is_bank_account($account_code) +{ + $sql= "SELECT id FROM ".TB_PREF."bank_accounts WHERE account_code=".db_escape($account_code); + $result = db_query($sql, "checking account is bank account"); + if (db_num_rows($result) > 0) { + $acct = db_fetch($result); + return $acct['id']; + } else + return false; +}