purchasing/includes/db/suppliers_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_supplier($supp_name, $supp_ref, $address, $supp_address, $gst_no,
  14         $website, $supp_account_no, $bank_account, $credit_limit, $dimension_id, $dimension2_id,
  15         $curr_code, $payment_terms, $payable_account, $purchase_account, $payment_discount_account,
  16         $notes, $tax_group_id, $tax_included)
  17 {
  18         begin_transaction(__FUNCTION__, func_get_args());
  19         $sql = "INSERT INTO ".TB_PREF."suppliers (supp_name, supp_ref, address, supp_address, gst_no, website,
  20                 supp_account_no, bank_account, credit_limit, dimension_id, dimension2_id, curr_code,
  21                 payment_terms, payable_account, purchase_account, payment_discount_account, notes,
  22                 tax_group_id, tax_included)
  23                 VALUES (".db_escape($supp_name). ", "
  24                 .db_escape($supp_ref). ", "
  25                 .db_escape($address) . ", "
  26                 .db_escape($supp_address) . ", "
  27                 .db_escape($gst_no). ", "
  28                 .db_escape($website). ", "
  29                 .db_escape($supp_account_no). ", "
  30                 .db_escape($bank_account). ", "
  31                 .$credit_limit. ", "
  32                 .db_escape($dimension_id). ", "
  33                 .db_escape($dimension2_id). ", "
  34                 .db_escape($curr_code). ", "
  35                 .db_escape($payment_terms). ", "
  36                 .db_escape($payable_account). ", "
  37                 .db_escape($purchase_account). ", "
  38                 .db_escape($payment_discount_account). ", "
  39                 .db_escape($notes). ", "
  40                 .db_escape($tax_group_id). ", "
  41                 .db_escape($tax_included). ")";
  42
  43         db_query($sql,"The supplier could not be added");
  44         commit_transaction();
  45 }
  46
  47 function update_supplier($supplier_id, $supp_name, $supp_ref, $address, $supp_address, $gst_no,
  48         $website, $supp_account_no, $bank_account, $credit_limit, $dimension_id, $dimension2_id,
  49         $curr_code, $payment_terms, $payable_account, $purchase_account, $payment_discount_account,
  50         $notes, $tax_group_id, $tax_included)
  51 {
  52         begin_transaction(__FUNCTION__, func_get_args());
  53         $sql = "UPDATE ".TB_PREF."suppliers SET supp_name=".db_escape($supp_name) . ",
  54                 supp_ref=".db_escape($supp_ref) . ",
  55                 address=".db_escape($address) . ",
  56                 supp_address=".db_escape($supp_address) . ",
  57                 gst_no=".db_escape($gst_no) . ",
  58                 website=".db_escape($website) . ",
  59                 supp_account_no=".db_escape($supp_account_no) . ",
  60                 bank_account=".db_escape($bank_account) . ",
  61                 credit_limit=".$credit_limit . ",
  62                 dimension_id=".db_escape($dimension_id) . ",
  63                 dimension2_id=".db_escape($dimension2_id) . ",
  64                 curr_code=".db_escape($curr_code).",
  65                 payment_terms=".db_escape($payment_terms) . ",
  66                 payable_account=".db_escape($payable_account) . ",
  67                 purchase_account=".db_escape($purchase_account) . ",
  68                 payment_discount_account=".db_escape($payment_discount_account) . ",
  69                 notes=".db_escape($notes) . ",
  70                 tax_group_id=".db_escape($tax_group_id). ",
  71                 tax_included=".db_escape($tax_included)
  72                 ." WHERE supplier_id = ".db_escape($supplier_id);
  73
  74         db_query($sql,"The supplier could not be updated");
  75         commit_transaction();
  76 }
  77
  78 function delete_supplier($supplier_id)
  79 {
  80         begin_transaction(__FUNCTION__, func_get_args());
  81         $sql="DELETE FROM ".TB_PREF."suppliers WHERE supplier_id=".db_escape($supplier_id);
  82         db_query($sql,"check failed");
  83         commit_transaction();
  84 }
  85
  86 function get_supplier_details($supplier_id, $to=null, $all=true)
  87 {
  88
  89         if ($to == null)
  90                 $todate = date("Y-m-d");
  91         else
  92                 $todate = date2sql($to);
  93         $past1 = get_company_pref('past_due_days');
  94         $past2 = 2 * $past1;
  95         // removed - supp_trans.alloc from all summations
  96
  97         if ($all)
  98         $value = "(trans.ov_amount + trans.ov_gst + trans.ov_discount)";
  99     else
 100         $value = "IF (trans.type=".ST_SUPPINVOICE." OR trans.type=".ST_BANKDEPOSIT."
 101         OR (trans.type=".ST_JOURNAL." AND (trans.ov_amount + trans.ov_gst + trans.ov_discount)>0), 1, -1)*
 102                 ABS(trans.ov_amount + trans.ov_gst + trans.ov_discount) - trans.alloc";
 103
 104         $due = "IF (trans.type=".ST_SUPPINVOICE." OR trans.type=".ST_SUPPCREDIT.",trans.due_date,trans.tran_date)";
 105     $sql = "SELECT supp.supp_name, supp.curr_code, ".TB_PREF."payment_terms.terms,
 106
 107                 Sum(IFNULL($value,0)) AS Balance,
 108
 109                 Sum(IF ((TO_DAYS('$todate') - TO_DAYS($due)) > 0,$value,0)) AS Due,
 110                 Sum(IF ((TO_DAYS('$todate') - TO_DAYS($due)) > $past1,$value,0)) AS Overdue1,
 111                 Sum(IF ((TO_DAYS('$todate') - TO_DAYS($due)) > $past2,$value,0)) AS Overdue2,
 112                 supp.credit_limit - Sum(IFNULL(IF(trans.type=".ST_SUPPCREDIT.", -1, 1)
 113                         * (ov_amount + ov_gst + ov_discount),0)) as cur_credit,
 114                 supp.tax_group_id
 115
 116                 FROM ".TB_PREF."suppliers supp
 117                          LEFT JOIN ".TB_PREF."supp_trans trans ON supp.supplier_id = trans.supplier_id AND trans.tran_date <= '$todate',
 118                          ".TB_PREF."payment_terms
 119
 120                 WHERE
 121                          supp.payment_terms = ".TB_PREF."payment_terms.terms_indicator
 122                          AND supp.supplier_id = $supplier_id ";
 123         if (!$all)
 124                 $sql .= "AND ABS(trans.ov_amount + trans.ov_gst + trans.ov_discount) - trans.alloc > ".FLOAT_COMP_DELTA." ";
 125         $sql .= "GROUP BY
 126                           supp.supp_name,
 127                           ".TB_PREF."payment_terms.terms,
 128                           ".TB_PREF."payment_terms.days_before_due,
 129                           ".TB_PREF."payment_terms.day_in_following_month";
 130     $result = db_query($sql,"The customer details could not be retrieved");
 131     $supp = db_fetch($result);
 132
 133     return $supp;
 134 }
 135
 136 function get_supplier($supplier_id)
 137 {
 138         $sql = "SELECT * FROM ".TB_PREF."suppliers WHERE supplier_id=".db_escape($supplier_id);
 139
 140         $result = db_query($sql, "could not get supplier");
 141
 142         return db_fetch($result);
 143 }
 144
 145 function get_supplier_name($supplier_id)
 146 {
 147         $sql = "SELECT supp_name AS name FROM ".TB_PREF."suppliers WHERE supplier_id=".db_escape($supplier_id);
 148
 149         $result = db_query($sql, "could not get supplier");
 150
 151         $row = db_fetch_row($result);
 152
 153         return $row[0];
 154 }
 155
 156 function get_supplier_accounts($supplier_id)
 157 {
 158         $sql = "SELECT payable_account,purchase_account,payment_discount_account, dimension_id, dimension2_id FROM ".TB_PREF."suppliers WHERE supplier_id=".db_escape($supplier_id);
 159
 160         $result = db_query($sql, "could not get supplier");
 161
 162         return db_fetch($result);
 163 }
 164
 165 function get_supplier_contacts($supplier_id, $action=null)
 166 {
 167         $results = array();
 168         $res = get_crm_persons('supplier', $action, $supplier_id);
 169         while($contact = db_fetch($res))
 170                 $results[] = $contact;
 171
 172         return $results;
 173 }
 174
 175 function get_current_supp_credit($supplier_id)
 176 {
 177         $suppdet = get_supplier_details($supplier_id);
 178         return $suppdet['cur_credit'];
 179
 180 }
 181
 182 function is_new_supplier($id)
 183 {
 184         $tables = array('supp_trans', 'grn_batch', 'purch_orders', 'purch_data');
 185
 186         return !key_in_foreign_table($id, $tables, 'supplier_id');
 187 }
 188
 189 function get_supplier_currency($supplier_id)
 190 {
 191     $sql = "SELECT curr_code FROM ".TB_PREF."suppliers WHERE supplier_id = ".db_escape($supplier_id);
 192
 193         $result = db_query($sql, "Retreive currency of supplier $supplier_id");
 194
 195         $myrow=db_fetch_row($result);
 196         return $myrow[0];
 197 }
 198
 199 function get_suppliers_search($supplier)
 200 {
 201         global $SysPrefs;
 202
 203         if (isset($SysPrefs->max_rows_in_search))
 204                 $limit = $SysPrefs->max_rows_in_search;
 205         else
 206                 $limit = 10;
 207
 208         $sql = "SELECT supplier_id, supp_name, supp_ref, address, gst_no
 209                 FROM ".TB_PREF."suppliers
 210                 WHERE (supp_name LIKE " . db_escape("%" . $supplier. "%") . " OR
 211                         supp_ref LIKE " . db_escape("%" . $supplier. "%") . " OR
 212                         address LIKE " . db_escape("%" . $supplier. "%") . " OR
 213                         gst_no LIKE " . db_escape("%" . $supplier. "%") . ")
 214                 ORDER BY supp_name LIMIT 0,".(int)($limit);
 215
 216         return db_query($sql, "Failed in retreiving supplier list.");
 217 }
 218