2 /**********************************************************************
3 Copyright (C) FrontAccounting, LLC.
4 Released under the terms of the GNU Affero General Public License,
5 AGPL, as published by the Free Software Foundation, either version
6 3 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/agpl-3.0.html>.
11 ***********************************************************************/
12 include_once($path_to_root . "/sales/includes/sales_db.inc");
13 include_once($path_to_root . "/purchasing/includes/purchasing_db.inc");
14 include_once($path_to_root . "/inventory/includes/inventory_db.inc");
15 include_once($path_to_root . "/manufacturing/includes/manufacturing_db.inc");
17 function void_transaction($type, $type_no, $date_, $memo_)
19 $void_entry = get_voided_entry($type, $type_no);
21 if ($void_entry != null)
25 case 0 : // it's a journal entry
26 if (!exists_gl_trans($type, $type_no))
28 void_gl_trans($type, $type_no);
29 if (exists_bank_trans($type, $type_no))
30 void_bank_trans($type, $type_no);
33 case 1 : // it's a payment
34 case 2 : // it's a deposit
35 case 4 : // it's a transfer
36 if (!exists_bank_trans($type, $type_no))
38 void_bank_trans($type, $type_no);
41 case 10 : // it's a customer invoice
42 case 11 : // it's a customer credit note
43 case 12 : // it's a customer payment
44 case 13 : // it's a customer dispatch
45 if (!exists_customer_trans($type, $type_no))
47 if ($type == 13) // added 04 Oct 2008 by Joe Hunt. If delivery note has a not voided invoice, then NO.
49 $delivery = get_customer_trans($type_no, $type);
50 if ($delivery['trans_link'] != 0)
52 if (get_voided_entry(10, $delivery['trans_link']) === false)
56 post_void_customer_trans($type, $type_no);
59 case systypes::location_transfer() : // it's a stock transfer
60 if (get_stock_transfer_items($type_no) == null)
62 void_stock_transfer($type_no);
65 case systypes::inventory_adjustment() : // it's a stock adjustment
66 if (get_stock_adjustment_items($type_no) == null)
68 void_stock_adjustment($type_no);
71 case 25 : // it's a GRN
73 case 20 : // it's a suppler invoice
74 case 21 : // it's a supplier credit note
75 case 22 : // it's a supplier payment
76 if (!exists_supp_trans($type, $type_no))
78 if (!post_void_supp_trans($type, $type_no))
82 case systypes::work_order() : // it's a work order
83 if (!get_work_order($type_no, true))
85 void_work_order($type_no);
88 case 28 : // it's a work order issue
89 if (!exists_work_order_issue($type_no))
91 void_work_order_issue($type_no);
94 case 29 : // it's a work order production
95 if (!exists_work_order_produce($type_no))
97 void_work_order_produce($type_no);
100 case systypes::cost_update() : // it's a stock cost update
105 // only add an entry if it's actually been voided
106 add_voided_entry($type, $type_no, $date_, $memo_);
111 //--------------------------------------------------------------------------------------------------
113 function get_voided_entry($type, $type_no)
115 $sql = "SELECT * FROM ".TB_PREF."voided WHERE type=$type AND id=$type_no";
117 $result = db_query($sql, "could not query voided transaction table");
119 return db_fetch($result);
122 //--------------------------------------------------------------------------------------------------
124 function add_voided_entry($type, $type_no, $date_, $memo_)
126 $date = date2sql($date_);
127 $sql = "INSERT INTO ".TB_PREF."voided (type, id, date_, memo_)
128 VALUES ($type, $type_no, ".db_escape($date).", ".db_escape($memo_).")";
130 db_query($sql, "could not add voided transaction entry");
133 //--------------------------------------------------------------------------------------------------