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 $page_security = 'SA_GRN';
14 include_once($path_to_root . "/purchasing/includes/po_class.inc");
16 include_once($path_to_root . "/includes/session.inc");
17 include_once($path_to_root . "/purchasing/includes/purchasing_db.inc");
18 include_once($path_to_root . "/purchasing/includes/purchasing_ui.inc");
21 if ($use_popup_windows)
22 $js .= get_js_open_window(900, 500);
24 $js .= get_js_date_picker();
25 page(_($help_context = "Receive Purchase Order Items"), false, false, "", $js);
27 //---------------------------------------------------------------------------------------------------------------
29 if (isset($_GET['AddedID']))
31 $grn = $_GET['AddedID'];
32 $trans_type = ST_SUPPRECEIVE;
34 display_notification_centered(_("Purchase Order Delivery has been processed"));
36 display_note(get_trans_view_str($trans_type, $grn, _("&View this Delivery")));
38 $clearing_act = get_company_pref('grn_clearing_act');
40 display_note(get_gl_view_str($trans_type, $grn, _("View the GL Journal Entries for this Delivery")), 1);
42 hyperlink_params("$path_to_root/purchasing/supplier_invoice.php", _("Entry purchase &invoice for this receival"), "New=1");
44 hyperlink_no_params("$path_to_root/purchasing/inquiry/po_search.php", _("Select a different &purchase order for receiving items against"));
46 display_footer_exit();
49 //--------------------------------------------------------------------------------------------------
51 if ((!isset($_GET['PONumber']) || $_GET['PONumber'] == 0) && !isset($_SESSION['PO']))
53 die (_("This page can only be opened if a purchase order has been selected. Please select a purchase order first."));
56 //--------------------------------------------------------------------------------------------------
58 function display_po_receive_items()
60 div_start('grn_items');
61 start_table(TABLESTYLE, "colspan=7 width=90%");
62 $th = array(_("Item Code"), _("Description"), _("Ordered"), _("Units"), _("Received"),
63 _("Outstanding"), _("This Delivery"), _("Price"), _("Total"));
66 /*show the line items on the order with the quantity being received for modification */
69 $k = 0; //row colour counter
71 if (count($_SESSION['PO']->line_items)> 0 )
73 foreach ($_SESSION['PO']->line_items as $ln_itm)
76 alt_table_row_color($k);
78 $qty_outstanding = $ln_itm->quantity - $ln_itm->qty_received;
80 if (!isset($_POST['Update']) && !isset($_POST['ProcessGoodsReceived']) && $ln_itm->receive_qty == 0)
81 { //If no quantites yet input default the balance to be received
82 $ln_itm->receive_qty = $qty_outstanding;
85 $line_total = ($ln_itm->receive_qty * $ln_itm->price);
86 $total += $line_total;
88 label_cell($ln_itm->stock_id);
89 if ($qty_outstanding > 0)
90 text_cells(null, $ln_itm->stock_id . "Desc", $ln_itm->item_description, 30, 50);
92 label_cell($ln_itm->item_description);
93 $dec = get_qty_dec($ln_itm->stock_id);
94 qty_cell($ln_itm->quantity, false, $dec);
95 label_cell($ln_itm->units);
96 qty_cell($ln_itm->qty_received, false, $dec);
97 qty_cell($qty_outstanding, false, $dec);
99 if ($qty_outstanding > 0)
100 qty_cells(null, $ln_itm->line_no, number_format2($ln_itm->receive_qty, $dec), "align=right", null, $dec);
102 label_cell(number_format2($ln_itm->receive_qty, $dec), "align=right");
104 amount_decimal_cell($ln_itm->price);
105 amount_cell($line_total);
110 $colspan = count($th)-1;
112 $display_sub_total = price_format($total/* + input_num('freight_cost')*/);
114 label_row(_("Sub-total"), $display_sub_total, "colspan=$colspan align=right","align=right");
115 $taxes = $_SESSION['PO']->get_taxes(input_num('freight_cost'), true);
117 $tax_total = display_edit_tax_items($taxes, $colspan, $_SESSION['PO']->tax_included);
119 $display_total = price_format(($total + input_num('freight_cost') + $tax_total));
122 label_cells(_("Amount Total"), $display_total, "colspan=$colspan align='right'","align='right'");
128 //--------------------------------------------------------------------------------------------------
130 function check_po_changed()
132 /*Now need to check that the order details are the same as they were when they were read
133 into the Items array. If they've changed then someone else must have altered them */
134 // Sherifoz 22.06.03 Compare against COMPLETED items only !!
135 // Otherwise if you try to fullfill item quantities separately will give error.
136 $result = get_po_items($_SESSION['PO']->order_no);
139 while ($myrow = db_fetch($result))
141 $ln_item = $_SESSION['PO']->line_items[$line_no];
142 // only compare against items that are outstanding
143 $qty_outstanding = $ln_item->quantity - $ln_item->qty_received;
144 if ($qty_outstanding > 0)
146 if ($ln_item->qty_inv != $myrow["qty_invoiced"] ||
147 $ln_item->stock_id != $myrow["item_code"] ||
148 $ln_item->quantity != $myrow["quantity_ordered"] ||
149 $ln_item->qty_received != $myrow["quantity_received"])
155 } /*loop through all line items of the order to ensure none have been invoiced */
160 //--------------------------------------------------------------------------------------------------
162 function can_process()
164 global $SysPrefs, $Refs;
166 if (count($_SESSION['PO']->line_items) <= 0)
168 display_error(_("There is nothing to process. Please enter valid quantities greater than zero."));
172 if (!is_date($_POST['DefaultReceivedDate']))
174 display_error(_("The entered date is invalid."));
175 set_focus('DefaultReceivedDate');
179 if (!is_date_in_fiscalyear($_POST['DefaultReceivedDate']))
181 display_error(_("The entered date is not in fiscal year"));
182 set_focus('DefaultReceivedDate');
186 if (!$Refs->is_valid($_POST['ref']))
188 display_error(_("You must enter a reference."));
193 if (!is_new_reference($_POST['ref'], ST_SUPPRECEIVE))
195 display_error(_("The entered reference is already in use."));
200 $something_received = 0;
201 foreach ($_SESSION['PO']->line_items as $order_line)
203 if ($order_line->receive_qty > 0)
205 $something_received = 1;
210 // Check whether trying to deliver more items than are recorded on the actual purchase order (+ overreceive allowance)
211 $delivery_qty_too_large = 0;
212 foreach ($_SESSION['PO']->line_items as $order_line)
214 if ($order_line->receive_qty+$order_line->qty_received >
215 $order_line->quantity * (1+ ($SysPrefs->over_receive_allowance() / 100)))
217 $delivery_qty_too_large = 1;
222 if ($something_received == 0)
223 { /*Then dont bother proceeding cos nothing to do ! */
224 display_error(_("There is nothing to process. Please enter valid quantities greater than zero."));
227 elseif ($delivery_qty_too_large == 1)
229 display_error(_("Entered quantities cannot be greater than the quantity entered on the purchase order including the allowed over-receive percentage") . " (" . $SysPrefs->over_receive_allowance() ."%)."
231 _("Modify the ordered items on the purchase order if you wish to increase the quantities."));
238 //--------------------------------------------------------------------------------------------------
240 function process_receive_po()
242 global $path_to_root, $Ajax;
247 if (check_po_changed())
249 display_error(_("This order has been changed or invoiced since this delivery was started to be actioned. Processing halted. To enter a delivery against this purchase order, it must be re-selected and re-read again to update the changes made by the other user."));
251 hyperlink_no_params("$path_to_root/purchasing/inquiry/po_search.php",
252 _("Select a different purchase order for receiving goods against"));
254 hyperlink_params("$path_to_root/purchasing/po_receive_items.php",
255 _("Re-Read the updated purchase order for receiving goods against"),
256 "PONumber=" . $_SESSION['PO']->order_no);
258 unset($_SESSION['PO']->line_items);
259 unset($_SESSION['PO']);
260 unset($_POST['ProcessGoodsReceived']);
261 $Ajax->activate('_page_body');
262 display_footer_exit();
265 $grn = &$_SESSION['PO'];
266 $grn->orig_order_date = $_POST['DefaultReceivedDate'];
267 $grn->reference = $_POST['ref'];
268 $grn->Location = $_POST['Location'];
270 $grn_no = add_grn($grn);
272 new_doc_date($_POST['DefaultReceivedDate']);
273 unset($_SESSION['PO']->line_items);
274 unset($_SESSION['PO']);
276 meta_forward($_SERVER['PHP_SELF'], "AddedID=$grn_no");
279 //--------------------------------------------------------------------------------------------------
281 if (isset($_GET['PONumber']) && $_GET['PONumber'] > 0 && !isset($_POST['Update']))
283 create_new_po(ST_PURCHORDER, $_GET['PONumber']);
284 $_SESSION['PO']->trans_type = ST_SUPPRECEIVE;
285 $_SESSION['PO']->reference = $Refs->get_next(ST_SUPPRECEIVE);
289 //--------------------------------------------------------------------------------------------------
291 if (isset($_POST['Update']) || isset($_POST['ProcessGoodsReceived']))
294 /* if update quantities button is hit page has been called and ${$line->line_no} would have be
295 set from the post to the quantity to be received in this receival*/
296 foreach ($_SESSION['PO']->line_items as $line)
298 if( ($line->quantity - $line->qty_received)>0) {
299 $_POST[$line->line_no] = max($_POST[$line->line_no], 0);
300 if (!check_num($line->line_no))
301 $_POST[$line->line_no] = number_format2(0, get_qty_dec($line->stock_id));
303 if (!isset($_POST['DefaultReceivedDate']) || $_POST['DefaultReceivedDate'] == "")
304 $_POST['DefaultReceivedDate'] = new_doc_date();
306 $_SESSION['PO']->line_items[$line->line_no]->receive_qty = input_num($line->line_no);
308 if (isset($_POST[$line->stock_id . "Desc"]) && strlen($_POST[$line->stock_id . "Desc"]) > 0)
310 $_SESSION['PO']->line_items[$line->line_no]->item_description = $_POST[$line->stock_id . "Desc"];
314 $Ajax->activate('grn_items');
317 //--------------------------------------------------------------------------------------------------
319 if (isset($_POST['ProcessGoodsReceived']))
321 process_receive_po();
324 //--------------------------------------------------------------------------------------------------
328 display_grn_summary($_SESSION['PO'], true);
329 display_heading(_("Items to Receive"));
330 display_po_receive_items();
333 submit_center_first('Update', _("Update"), '', true);
334 submit_center_last('ProcessGoodsReceived', _("Process Receive Items"), _("Clear all GL entry fields"), 'default');
338 //--------------------------------------------------------------------------------------------------