purchasing/includes/db/supp_trans_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
  14 function add_supp_trans($type, $supplier_id, $date_, $due_date, $reference, $supp_reference,
  15         $amount, $amount_tax, $discount, $err_msg="", $rate=0)
  16 {
  17         $date = date2sql($date_);
  18         if ($due_date == "")
  19                 $due_date = "0000-00-00";
  20         else
  21                 $due_date = date2sql($due_date);
  22
  23         $trans_no = get_next_trans_no($type);
  24
  25         $curr = get_supplier_currency($supplier_id);
  26
  27         if ($rate == 0)
  28                 $rate = get_exchange_rate_from_home_currency($curr, $date_);
  29
  30
  31         $sql = "INSERT INTO ".TB_PREF."supp_trans (trans_no, type, supplier_id, tran_date, due_date,
  32                 reference, supp_reference, ov_amount, ov_gst, rate, ov_discount) ";
  33         $sql .= "VALUES (".db_escape($trans_no).", ".db_escape($type)
  34         .", ".db_escape($supplier_id).", '$date', '$due_date',
  35                 ".db_escape($reference).", ".db_escape($supp_reference).", ".db_escape($amount)
  36                 .", ".db_escape($amount_tax).", ".db_escape($rate).", ".db_escape($discount).")";
  37
  38         if ($err_msg == "")
  39                 $err_msg = "Cannot insert a supplier transaction record";
  40 error_log($sql);
  41
  42         db_query($sql, $err_msg);
  43         add_audit_trail($type, $trans_no, $date_);
  44
  45         return $trans_no;
  46 }
  47
  48 //-------------------------------------------------------------------------------------------------------------
  49
  50 function get_supp_trans($trans_no, $trans_type=-1)
  51 {
  52         $sql = "SELECT ".TB_PREF."supp_trans.*, (".TB_PREF."supp_trans.ov_amount+".TB_PREF."supp_trans.ov_gst+".TB_PREF."supp_trans.ov_discount) AS Total,
  53                 ".TB_PREF."suppliers.supp_name AS supplier_name, ".TB_PREF."suppliers.curr_code AS SupplierCurrCode ";
  54
  55         if ($trans_type == ST_SUPPAYMENT)
  56         {
  57                 // it's a payment so also get the bank account
  58                 $sql .= ", ".TB_PREF."bank_accounts.bank_name, ".TB_PREF."bank_accounts.bank_account_name, ".TB_PREF."bank_accounts.bank_curr_code,
  59                         ".TB_PREF."bank_accounts.account_type AS BankTransType, ".TB_PREF."bank_trans.amount AS BankAmount,
  60                         ".TB_PREF."bank_trans.ref ";
  61         }
  62
  63         $sql .= " FROM ".TB_PREF."supp_trans, ".TB_PREF."suppliers ";
  64
  65         if ($trans_type == ST_SUPPAYMENT)
  66         {
  67                 // it's a payment so also get the bank account
  68                 $sql .= ", ".TB_PREF."bank_trans, ".TB_PREF."bank_accounts";
  69         }
  70
  71         $sql .= " WHERE ".TB_PREF."supp_trans.trans_no=".db_escape($trans_no)."
  72                 AND ".TB_PREF."supp_trans.supplier_id=".TB_PREF."suppliers.supplier_id";
  73
  74         if ($trans_type > 0)
  75                 $sql .= " AND ".TB_PREF."supp_trans.type=".db_escape($trans_type);
  76
  77         if ($trans_type == ST_SUPPAYMENT)
  78         {
  79                 // it's a payment so also get the bank account
  80                 $sql .= " AND ".TB_PREF."bank_trans.trans_no =".db_escape($trans_no)."
  81                         AND ".TB_PREF."bank_trans.type=".db_escape($trans_type)."
  82                         AND ".TB_PREF."bank_accounts.id=".TB_PREF."bank_trans.bank_act ";
  83         }
  84
  85         $result = db_query($sql, "Cannot retreive a supplier transaction");
  86
  87     if (db_num_rows($result) == 0)
  88     {
  89        // can't return nothing
  90        display_db_error("no supplier trans found for given params", $sql, true);
  91        exit;
  92     }
  93
  94     if (db_num_rows($result) > 1)
  95     {
  96        // can't return multiple
  97        display_db_error("duplicate supplier transactions found for given params", $sql, true);
  98        exit;
  99     }
 100
 101     return db_fetch($result);
 102 }
 103
 104 //----------------------------------------------------------------------------------------
 105
 106 function exists_supp_trans($type, $type_no)
 107 {
 108         if ($type == ST_SUPPRECEIVE)
 109                 return exists_grn($type_no);
 110
 111         $sql = "SELECT trans_no FROM ".TB_PREF."supp_trans WHERE type=".db_escape($type)."
 112                 AND trans_no=".db_escape($type_no);
 113         $result = db_query($sql, "Cannot retreive a supplier transaction");
 114
 115     return (db_num_rows($result) > 0);
 116 }
 117
 118 //----------------------------------------------------------------------------------------
 119
 120 function void_supp_trans($type, $type_no)
 121 {
 122         $sql = "UPDATE ".TB_PREF."supp_trans SET ov_amount=0, ov_discount=0, ov_gst=0,
 123                 alloc=0 WHERE type=".db_escape($type)." AND trans_no=".db_escape($type_no);
 124
 125         db_query($sql, "could not void supp transactions for type=$type and trans_no=$type_no");
 126 }
 127
 128 //----------------------------------------------------------------------------------------
 129
 130 function post_void_supp_trans($type, $type_no)
 131 {
 132         if ($type == ST_SUPPAYMENT)
 133         {
 134                 void_supp_payment($type, $type_no);
 135                 return true;
 136         }
 137
 138         if ($type == ST_SUPPINVOICE || $type == ST_SUPPCREDIT)
 139         {
 140                 void_supp_invoice($type, $type_no);
 141                 return true;
 142         }
 143
 144         if ($type == SUPPRECEIVE)
 145         {
 146                 return void_grn($type_no);
 147         }
 148
 149         return false;
 150 }
 151
 152 //----------------------------------------------------------------------------------------
 153
 154 ?>