Removed obsolete add_journal_entries().
[fa-stable.git] / gl / includes / db / gl_db_trans.inc
index 21fa114a999bd1a6032729c0b068483ba144411c..c956a5e25db678932fdd93f8b97663cbcb2eefc7 100644 (file)
@@ -1,13 +1,13 @@
 <?php
 /**********************************************************************
     Copyright (C) FrontAccounting, LLC.
-       Released under the terms of the GNU Affero General Public License,
-       AGPL, as published by the Free Software Foundation, either version 
-       of the License, or (at your option) any later version.
+       Released under the terms of the GNU General Public License, GPL, 
+       as published by the Free Software Foundation, either version 3 
+       of the License, or (at your option) any later version.
     This program is distributed in the hope that it will be useful,
     but WITHOUT ANY WARRANTY; without even the implied warranty of
     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  
-    See the License here <http://www.gnu.org/licenses/agpl-3.0.html>.
+    See the License here <http://www.gnu.org/licenses/gpl-3.0.html>.
 ***********************************************************************/
 //--------------------------------------------------------------------------------
 
@@ -209,32 +209,127 @@ function get_budget_trans_from_to($from_date, $to_date, $account, $dimension=0,
 }
 
 //--------------------------------------------------------------------------------
-//     Stores GL journal/bank transaction on tax account for tax report
+//     Stores journal/bank transaction tax details if applicable
 //
-function add_gl_tax_details($gl_code, $trans_type, $trans_id, $amount)
+function add_gl_tax_details($gl_code, $trans_type, $trans_no, $amount, $ex_rate, $date, $memo)
 {
        $tax_type = is_tax_account($gl_code);
        if(!$tax_type) return;  // $gl_code is not tax account
-
+       
        $tax = get_tax_type($tax_type);
-       if ($gl_code == $tax['sales_gl_code'])
-               add_customer_trans_tax_detail_item($trans_type, $trans_id, 
-                       $tax['id'], $tax['rate'], 0, -$amount);
-       else
-               add_supp_invoice_tax_item($trans_type, $trans_id, 
-                       $tax['id'], $tax['rate'], 0, $amount);
+       if ($gl_code == $tax['sales_gl_code']) 
+               $amount = -$amount;
+       // we have to restore net amount as we cannot know the base amount
+       if ($tax['rate'] == 0) {
+//             display_warning(_("You should not post gl transactions  
+//                     to tax account with     zero tax rate."));
+               $net_amount = 0;
+       } else { 
+               // calculate net amount
+               $net_amount = $amount/$tax['rate']*100; 
+       }
+               
+       add_trans_tax_details($trans_type, $trans_no, $tax['id'], $tax['rate'], 0, 
+               $amount, $net_amount, $ex_rate, $date, $memo);
                        
 }
 
 //--------------------------------------------------------------------------------
-function add_journal_entries($items, $date_, $ref, $reverse, $memo_=null)
+//
+//     Store transaction tax details for fiscal purposes with 'freezed' 
+//     actual tax type rate.
+//
+function add_trans_tax_details($trans_type, $trans_no, $tax_id, $rate, $included,
+       $amount, $net_amount, $ex_rate, $tran_date, $memo)
 {
-       begin_transaction();
 
-       $trans_type = systypes::journal_entry();
-       $trans_id = get_next_trans_no($trans_type);
+       $sql = "INSERT INTO ".TB_PREF."trans_tax_details 
+               (trans_type, trans_no, tran_date, tax_type_id, rate, ex_rate,
+                       included_in_price, net_amount, amount, memo)
+               VALUES (".db_escape($trans_type)."," . db_escape($trans_no).",'"
+                               .date2sql($tran_date)."',".db_escape($tax_id).","
+                               .$rate.",".$ex_rate.",".($included ? 1:0).","
+                               .db_escape($net_amount).","
+                               .db_escape($amount).",".db_escape($memo).")";
+
+       db_query($sql, "Cannot save trans tax details");
+
+}
+//----------------------------------------------------------------------------------------
+
+function get_trans_tax_details($trans_type, $trans_no)
+{
+       $sql = "SELECT ".TB_PREF."trans_tax_details.*, ".TB_PREF."tax_types.name AS tax_type_name
+               FROM ".TB_PREF."trans_tax_details,".TB_PREF."tax_types
+               WHERE trans_type = $trans_type
+               AND trans_no = $trans_no
+               AND (net_amount != 0 OR amount != 0)
+               AND ".TB_PREF."tax_types.id = ".TB_PREF."trans_tax_details.tax_type_id";
+
+       return db_query($sql, "The transaction tax details could not be retrieved");
+}
+
+//----------------------------------------------------------------------------------------
+
+function void_trans_tax_details($type, $type_no)
+{
+       $sql = "UPDATE ".TB_PREF."trans_tax_details SET amount=0, net_amount=0
+               WHERE trans_no=$type_no
+               AND trans_type=$type";
+
+       db_query($sql, "The transaction tax details could not be voided");
+}
+
+function get_tax_summary($from, $to)
+{
+       $fromdate = date2sql($from);
+       $todate = date2sql($to);
+
+       $sql = "SELECT 
+                               SUM(IF( trans_type=1 || trans_type=11 || trans_type=20,-1,1)*
+                               IF(trans_type=0 || trans_type=2 || trans_type=10 || trans_type=11, net_amount*ex_rate,0)) net_output,
+                               SUM(IF( trans_type=1 || trans_type=11 || trans_type=20,-1,1)*
+                               IF(trans_type=0 || trans_type=2 || trans_type=10 || trans_type=11, amount*ex_rate,0)) payable,
+                               SUM(IF( trans_type=1 || trans_type=11 || trans_type=20,-1,1)*
+                               IF(trans_type=0 || trans_type=2 || trans_type=10 || trans_type=11, 0, net_amount*ex_rate)) net_input,
+                               SUM(IF( trans_type=1 || trans_type=11 || trans_type=20,-1,1)*
+                               IF(trans_type=0 || trans_type=2 || trans_type=10 || trans_type=11, 0, amount*ex_rate)) collectible,
+                               taxrec.rate,
+                               ttype.id,
+                               ttype.name
+               FROM ".TB_PREF."tax_types ttype,
+                        ".TB_PREF."trans_tax_details taxrec
+               WHERE taxrec.tax_type_id=ttype.id
+                       AND taxrec.trans_type != 13
+                       AND taxrec.tran_date >= '$fromdate'
+                       AND taxrec.tran_date <= '$todate'
+               GROUP BY ttype.id";
+//display_error($sql);
+    return db_query($sql,"Cannot retrieve tax summary");
+}
+
+//--------------------------------------------------------------------------------
+// Write/update journal entries.
+//
+function write_journal_entries(&$cart, $reverse)
+{
+       $date_ = $cart->tran_date;
+       $ref   = $cart->reference;
+       $memo_ = $cart->memo_;
+       $new = $cart->order_id == 0;
+       $trans_type = $cart->trans_type;
+       $trans_id = $new ? get_next_trans_no($trans_type) : $cart->order_id;
+
+       begin_transaction();
+       
+       if($new) {
+               $cart->order_id = $trans_id;
+       } else {
+               void_journal_trans($trans_type, $trans_id, true);
+               delete_comments($trans_type, $trans_id);
+       }
 
-       foreach ($items as $journal_item)
+       foreach ($cart->gl_items as $journal_item)
        {
                // post to first found bank account using given gl acount code.
                $is_bank_to = is_bank_account($journal_item->code_id);
@@ -245,29 +340,33 @@ function add_journal_entries($items, $date_, $ref, $reverse, $memo_=null)
        if ($is_bank_to)
        {
                add_bank_trans($trans_type, $trans_id, $is_bank_to, $ref,
-                       $date_, $journal_item->amount,
-                       0, "", get_company_currency(),
+                       $date_, $journal_item->amount,  0, "", get_company_currency(),
                        "Cannot insert a destination bank transaction");
        }
                // store tax details if the gl account is a tax account
                add_gl_tax_details($journal_item->code_id, 
-                       $trans_type, $trans_id, $journal_item->amount);
+                       $trans_type, $trans_id, -$journal_item->amount, 1, $date_, $memo_);
        }
        
-       add_comments($trans_type, $trans_id, $date_, $memo_);
+       if ($new) {
+               add_comments($trans_type, $trans_id, $date_, $memo_);
+               references::save($trans_type, $trans_id, $ref);
+       } else
+               update_comments($trans_type, $trans_id, null, $memo_);
 
-       references::save($trans_type, $trans_id, $ref);
+       add_audit_trail($trans_type, $trans_id, $date_);
+
+       commit_transaction();
 
        if ($reverse)
        {
-
        //$reversingDate = date(user_date_display(),
        //      Mktime(0,0,0,get_month($date_)+1,1,get_year($date_)));
        $reversingDate = begin_month(add_months($date_, 1));
 
        $trans_id_reverse = get_next_trans_no($trans_type);
 
-       foreach ($items as $journal_item)
+       foreach ($cart->gl_items as $journal_item)
        {
                        $is_bank_to = is_bank_account($journal_item->code_id);
 
@@ -283,16 +382,15 @@ function add_journal_entries($items, $date_, $ref, $reverse, $memo_=null)
                }
                        // store tax details if the gl account is a tax account
                        add_gl_tax_details($journal_item->code_id, 
-                               $trans_type, $trans_id, -$journal_item->amount);
+                               $trans_type, $trans_id, $journal_item->amount, 1, $reversingDate, $memo_);
        }
 
        add_comments($trans_type, $trans_id_reverse, $reversingDate, $memo_);
 
        references::save($trans_type, $trans_id_reverse, $ref);
+               add_audit_trail($trans_type, $trans_id_reverse, $reversingDate);
        }
 
-       commit_transaction();
-
        return $trans_id;
 }
 
@@ -327,10 +425,9 @@ function void_journal_trans($type, $type_no)
 {
        begin_transaction();
 
-       void_gl_trans($type, $type_no, true);
-       void_bank_trans($type, $type_no,true);
-       void_customer_trans_tax_details($type, $type_no);
-       void_supp_invoice_tax_items($type, $type_no);
+       void_bank_trans($type, $type_no, true);
+//     void_gl_trans($type, $type_no, true);    // this is done above
+//     void_trans_tax_details($type, $type_no); // ditto
 
        commit_transaction();
 }