Merged changes up to version 2.3.4 into unstable.
[fa-stable.git] / admin / db / voiding_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 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");
16
17 function void_transaction($type, $type_no, $date_, $memo_)
18 {
19         global $Refs;
20         $void_entry = get_voided_entry($type, $type_no);
21
22         if ($void_entry != null)
23                 return false;
24
25         switch ($type) {
26                 case ST_JOURNAL : // it's a journal entry
27                         if (!exists_gl_trans($type, $type_no))
28                                 return false;
29                         void_journal_trans($type, $type_no);
30                         break;
31
32                 case ST_BANKPAYMENT : // it's a payment
33                 case ST_BANKDEPOSIT : // it's a deposit
34                 case ST_BANKTRANSFER : // it's a transfer
35                         if (!exists_bank_trans($type, $type_no))
36                                 return false;
37                         void_bank_trans($type, $type_no);
38                         break;
39
40                 case ST_SALESINVOICE : // it's a customer invoice
41                 case ST_CUSTCREDIT : // it's a customer credit note
42                 case ST_CUSTPAYMENT : // it's a customer payment
43                 case ST_CUSTDELIVERY : // it's a customer dispatch
44                         if (!exists_customer_trans($type, $type_no))
45                                 return false;
46                         if ($type == ST_CUSTDELIVERY)   // added 04 Oct 2008 by Joe Hunt. If delivery note has a not voided invoice, then NO.
47                         {
48                                 $childs = get_sales_child_lines($type, $type_no, false);
49
50                                 if ($childs && db_num_rows($childs))
51                                                 return false;
52                         }
53                         post_void_customer_trans($type, $type_no);
54                         break;
55
56                 case ST_LOCTRANSFER : // it's a stock transfer
57                         if (get_stock_transfer_items($type_no) == null)
58                                 return false;
59                         void_stock_transfer($type_no);
60                         break;
61
62                 case ST_INVADJUST : // it's a stock adjustment
63                         if (get_stock_adjustment_items($type_no) == null)
64                                 return false;
65                         void_stock_adjustment($type_no);
66                         break;
67
68                 case ST_PURCHORDER : // it's a PO
69                 case ST_SUPPRECEIVE : // it's a GRN
70                         return false;
71                 case ST_SUPPINVOICE : // it's a suppler invoice
72                 case ST_SUPPCREDIT : // it's a supplier credit note
73                 case ST_SUPPAYMENT : // it's a supplier payment
74                         if (!exists_supp_trans($type, $type_no))
75                                 return false;
76                         if (!post_void_supp_trans($type, $type_no))
77                                 return false;
78                         break;
79
80                 case ST_WORKORDER : // it's a work order
81                         if (!get_work_order($type_no, true))
82                                 return false;
83                         void_work_order($type_no);
84                         break;
85
86                 case ST_MANUISSUE : // it's a work order issue
87                         if (!exists_work_order_issue($type_no))
88                                 return false;
89                         void_work_order_issue($type_no);
90                         break;
91
92                 case ST_MANURECEIVE : // it's a work order production
93                         if (!exists_work_order_produce($type_no))
94                                 return false;
95                         void_work_order_produce($type_no);
96                         break;
97
98                 case ST_SALESORDER: // it's a sales order
99                 case ST_SALESQUOTE: // it's a sales quotation
100                         return false;
101
102                 case ST_COSTUPDATE : // it's a stock cost update
103                         return false;
104                         break;
105         }
106
107         // only add an entry if it's actually been voided
108         add_audit_trail($type, $type_no, $date_, _("Voided.")."\n".$memo_);
109         add_voided_entry($type, $type_no, $date_, $memo_);
110         $Refs->restore_last($type, $type_no);
111         return true;
112 }
113
114 //--------------------------------------------------------------------------------------------------
115
116 function get_voided_entry($type, $type_no)
117 {
118         $sql = "SELECT * FROM ".TB_PREF."voided WHERE type=".db_escape($type)
119                 ." AND id=".db_escape($type_no);
120
121         $result = db_query($sql, "could not query voided transaction table");
122
123         return db_fetch($result);
124 }
125
126 //--------------------------------------------------------------------------------------------------
127
128 function add_voided_entry($type, $type_no, $date_, $memo_)
129 {
130         $date = date2sql($date_);
131         $sql = "INSERT INTO ".TB_PREF."voided (type, id, date_, memo_)
132                 VALUES (".db_escape($type).", ".db_escape($type_no).", "
133                 .db_escape($date).", ".db_escape($memo_).")";
134
135         db_query($sql, "could not add voided transaction entry");
136 }
137
138 //--------------------------------------------------------------------------------------------------
139
140 ?>