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 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_)
20 $void_entry = get_voided_entry($type, $type_no);
22 if ($void_entry != null)
23 return _('This transaction was already voided before.');
26 case ST_JOURNAL : // it's a journal entry
27 if (!exists_gl_trans($type, $type_no))
28 return _('Selected transaction does not exists.');
29 if ($wo = check_wo_costing($type, $type_no))
30 return sprintf(_('This transaction cannot be voided because it is part of Work Order %s costs.'), $wo);
31 void_journal_trans($type, $type_no);
34 case ST_BANKDEPOSIT : // it's a deposit
35 case ST_BANKTRANSFER : // it's a transfer
36 if (!check_void_bank_trans($type, $type_no))
37 return _('This transaction cannot be voided because the operation would decrease account balance below allowed limit in some point of account history.');
38 case ST_BANKPAYMENT : // it's a payment
39 if (!exists_bank_trans($type, $type_no))
40 return _('Selected transaction does not exists.');
41 void_bank_trans($type, $type_no);
44 case ST_CUSTPAYMENT : // it's a customer payment
45 if (!check_void_bank_trans($type, $type_no))
46 return _('This transaction cannot be voided because the operation would decrease account balance below allowed limit in some point of account history.');
47 case ST_SALESINVOICE : // it's a customer invoice
48 if (is_cust_invoice_credited($type_no))
49 return _('This invoice cannot be voided because it was already credited.');
50 case ST_CUSTCREDIT : // it's a customer credit note
51 case ST_CUSTDELIVERY : // it's a customer dispatch
52 if (!exists_customer_trans($type, $type_no))
53 return _('Selected transaction does not exists.');
54 if ($type == ST_CUSTDELIVERY) // added 04 Oct 2008 by Joe Hunt. If delivery note has a not voided invoice, then NO.
56 $childs = get_sales_child_lines($type, $type_no, false); // 2011-03-17 This had been changed. Joe
57 if ($childs && db_num_rows($childs))
58 return _('This delivery cannot be voided because it was already invoiced.');
60 post_void_customer_trans($type, $type_no);
63 case ST_LOCTRANSFER : // it's a stock transfer
64 if (get_stock_transfer_items($type_no) == null)
65 return _('Selected transaction does not exists.');
66 void_stock_transfer($type_no);
69 case ST_INVADJUST : // it's a stock adjustment
70 if (get_stock_adjustment_items($type_no) == null)
71 return _('Selected transaction does not exists.');
72 void_stock_adjustment($type_no);
75 case ST_PURCHORDER : // it's a PO
76 return _('This transaction type cannot be voided.');
79 case ST_SUPPRECEIVE : // it's a GRN
80 if (exists_grn_on_invoices($type_no))
81 return _('This GRN cannot be voided because it was already invoiced.');
82 if (!post_void_supp_trans($type, $type_no))
83 return _('Error encountered when voiding transaction.');
86 case ST_SUPPINVOICE : // it's a suppler invoice
87 case ST_SUPPCREDIT : // it's a supplier credit note
88 case ST_SUPPAYMENT : // it's a supplier payment
89 if (!exists_supp_trans($type, $type_no))
90 return _('Selected transaction does not exists.');
91 if (!post_void_supp_trans($type, $type_no))
92 return _('Error encountered when voiding transaction.');
95 case ST_WORKORDER : // it's a work order
96 if (!get_work_order($type_no, true))
97 return _('Selected transaction does not exists.');
98 void_work_order($type_no);
101 case ST_MANUISSUE : // it's a work order issue
102 if (!exists_work_order_issue($type_no))
103 return _('Selected transaction does not exists.');
104 if ($wo = check_void_wo_issue($type_no))
105 return sprintf(_('Selected document cannot be voided because related Work Order %s is already closed.'), $wo);
106 void_work_order_issue($type_no);
109 case ST_MANURECEIVE : // it's a work order production
110 if (!exists_work_order_produce($type_no))
111 return _('Selected transaction does not exists.');
112 if ($wo = check_void_wo_production($type_no))
113 return sprintf(_('Selected document cannot be voided because related Work Order %s is already closed.'), $wo);
114 void_work_order_produce($type_no);
117 case ST_SALESORDER: // it's a sales order
118 case ST_SALESQUOTE: // it's a sales quotation
119 return _('This transaction type cannot be voided.');
121 case ST_COSTUPDATE : // it's a stock cost update
122 return _('This transaction type cannot be voided.');
126 // only add an entry if it's actually been voided
127 add_audit_trail($type, $type_no, $date_, _("Voided.")."\n".$memo_);
128 $Refs->restore_last($type, $type_no);
129 add_voided_entry($type, $type_no, $date_, $memo_);
133 //--------------------------------------------------------------------------------------------------
135 function get_voided_entry($type, $type_no)
137 $sql = "SELECT * FROM ".TB_PREF."voided WHERE type=".db_escape($type)
138 ." AND id=".db_escape($type_no);
140 $result = db_query($sql, "could not query voided transaction table");
142 return db_fetch($result);
145 //--------------------------------------------------------------------------------------------------
147 function add_voided_entry($type, $type_no, $date_, $memo_)
149 $date = date2sql($date_);
150 $sql = "INSERT INTO ".TB_PREF."voided (type, id, date_, memo_)
151 VALUES (".db_escape($type).", ".db_escape($type_no).", "
152 .db_escape($date).", ".db_escape($memo_).")";
154 db_query($sql, "could not add voided transaction entry");
157 //--------------------------------------------------------------------------------------------------