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***********************************************************************/ 12include_once($path_to_root . "/sales/includes/sales_db.inc"); 13include_once($path_to_root . "/purchasing/includes/purchasing_db.inc"); 14include_once($path_to_root . "/inventory/includes/inventory_db.inc"); 15include_once($path_to_root . "/manufacturing/includes/manufacturing_db.inc"); 16 17function 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_BANKDEPOSIT : // it's a deposit 33 case ST_BANKTRANSFER : // it's a transfer 34 if (!check_void_bank_trans($type, $type_no)) 35 return false; 36 case ST_BANKPAYMENT : // it's a payment 37 if (!exists_bank_trans($type, $type_no)) 38 return false; 39 void_bank_trans($type, $type_no); 40 break; 41 42 case ST_CUSTPAYMENT : // it's a customer payment 43 if (!check_void_bank_trans($type, $type_no)) 44 return false; 45 case ST_SALESINVOICE : // it's a customer invoice 46 case ST_CUSTCREDIT : // it's a customer credit note 47 case ST_CUSTDELIVERY : // it's a customer dispatch 48 if (!exists_customer_trans($type, $type_no)) 49 return false; 50 if ($type == ST_CUSTDELIVERY) // added 04 Oct 2008 by Joe Hunt. If delivery note has a not voided invoice, then NO. 51 { 52 $childs = get_sales_child_lines($type, $type_no, false); // 2011-03-17 This had been changed. Joe 53 if ($childs && db_num_rows($childs)) 54 return false; 55 } 56 post_void_customer_trans($type, $type_no); 57 break; 58 59 case ST_LOCTRANSFER : // it's a stock transfer 60 if (get_stock_transfer_items($type_no) == null) 61 return false; 62 void_stock_transfer($type_no); 63 break; 64 65 case ST_INVADJUST : // it's a stock adjustment 66 if (get_stock_adjustment_items($type_no) == null) 67 return false; 68 void_stock_adjustment($type_no); 69 break; 70 71 case ST_PURCHORDER : // it's a PO 72 return false; 73 74 case ST_SUPPRECEIVE : // it's a GRN 75 if (exists_grn_on_invoices($type_no)) 76 return false; 77 case ST_SUPPINVOICE : // it's a suppler invoice 78 case ST_SUPPCREDIT : // it's a supplier credit note 79 case ST_SUPPAYMENT : // it's a supplier payment 80 if (!exists_supp_trans($type, $type_no)) 81 return false; 82 if (!post_void_supp_trans($type, $type_no)) 83 return false; 84 break; 85 86 case ST_WORKORDER : // it's a work order 87 if (!get_work_order($type_no, true)) 88 return false; 89 void_work_order($type_no); 90 break; 91 92 case ST_MANUISSUE : // it's a work order issue 93 if (!exists_work_order_issue($type_no)) 94 return false; 95 void_work_order_issue($type_no); 96 break; 97 98 case ST_MANURECEIVE : // it's a work order production 99 if (!exists_work_order_produce($type_no)) 100 return false; 101 void_work_order_produce($type_no); 102 break; 103 104 case ST_SALESORDER: // it's a sales order 105 case ST_SALESQUOTE: // it's a sales quotation 106 return false; 107 108 case ST_COSTUPDATE : // it's a stock cost update 109 return false; 110 break; 111 } 112 113 // only add an entry if it's actually been voided 114 add_audit_trail($type, $type_no, $date_, _("Voided.")."\n".$memo_); 115 $Refs->restore_last($type, $type_no); 116 add_voided_entry($type, $type_no, $date_, $memo_); 117 return true; 118} 119 120//-------------------------------------------------------------------------------------------------- 121 122function get_voided_entry($type, $type_no) 123{ 124 $sql = "SELECT * FROM ".TB_PREF."voided WHERE type=".db_escape($type) 125 ." AND id=".db_escape($type_no); 126 127 $result = db_query($sql, "could not query voided transaction table"); 128 129 return db_fetch($result); 130} 131 132//-------------------------------------------------------------------------------------------------- 133 134function add_voided_entry($type, $type_no, $date_, $memo_) 135{ 136 $date = date2sql($date_); 137 $sql = "INSERT INTO ".TB_PREF."voided (type, id, date_, memo_) 138 VALUES (".db_escape($type).", ".db_escape($type_no).", " 139 .db_escape($date).", ".db_escape($memo_).")"; 140 141 db_query($sql, "could not add voided transaction entry"); 142} 143 144//-------------------------------------------------------------------------------------------------- 145 146?>