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(_("Receive Purchase Order Items"), false, false, "", $js);
27 //---------------------------------------------------------------------------------------------------------------
29 if (isset($_GET['AddedID']))
31 $grn = $_GET['AddedID'];
34 display_notification_centered(_("Purchase Order Delivery has been processed"));
36 display_note(get_trans_view_str($trans_type, $grn, _("&View this Delivery")));
39 //echo get_gl_view_str(25, $grn, _("View the GL &Journal Entries for this Delivery"));
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']))
52 //if (isset($_GET['PONumber']) && !$_GET['PONumber'] > 0 && !isset($_SESSION['PO']))
54 die (_("This page can only be opened if a purchase order has been selected. Please select a purchase order first."));
57 //--------------------------------------------------------------------------------------------------
59 function display_po_receive_items()
63 div_start('grn_items');
64 start_table("colspan=7 $table_style width=90%");
65 $th = array(_("Item Code"), _("Description"), _("Ordered"), _("Units"), _("Received"),
66 _("Outstanding"), _("This Delivery"), _("Price"), _("Total"));
69 /*show the line items on the order with the quantity being received for modification */
72 $k = 0; //row colour counter
74 if (count($_SESSION['PO']->line_items)> 0 )
76 foreach ($_SESSION['PO']->line_items as $ln_itm)
79 alt_table_row_color($k);
81 $qty_outstanding = $ln_itm->quantity - $ln_itm->qty_received;
83 if (!isset($_POST['Update']) && !isset($_POST['ProcessGoodsReceived']) && $ln_itm->receive_qty == 0)
84 { //If no quantites yet input default the balance to be received
85 $ln_itm->receive_qty = $qty_outstanding;
88 $line_total = ($ln_itm->receive_qty * $ln_itm->price);
89 $total += $line_total;
91 label_cell($ln_itm->stock_id);
92 if ($qty_outstanding > 0)
93 text_cells(null, $ln_itm->stock_id . "Desc", $ln_itm->item_description, 30, 50);
95 label_cell($ln_itm->item_description);
96 $dec = get_qty_dec($ln_itm->stock_id);
97 qty_cell($ln_itm->quantity, false, $dec);
98 label_cell($ln_itm->units);
99 qty_cell($ln_itm->qty_received, false, $dec);
100 qty_cell($qty_outstanding, false, $dec);
102 if ($qty_outstanding > 0)
103 qty_cells(null, $ln_itm->line_no, number_format2($ln_itm->receive_qty, $dec), "align=right", null, $dec);
105 label_cell(number_format2($ln_itm->receive_qty, $dec), "align=right");
107 amount_decimal_cell($ln_itm->price);
108 amount_cell($line_total);
113 $display_total = number_format2($total,user_price_dec());
114 label_row(_("Total value of items received"), $display_total, "colspan=8 align=right",
115 "nowrap align=right");
120 //--------------------------------------------------------------------------------------------------
122 function check_po_changed()
124 /*Now need to check that the order details are the same as they were when they were read into the Items array. If they've changed then someone else must have altered them */
125 // Sherifoz 22.06.03 Compare against COMPLETED items only !!
126 // Otherwise if you try to fullfill item quantities separately will give error.
127 $sql = "SELECT item_code, quantity_ordered, quantity_received, qty_invoiced
128 FROM ".TB_PREF."purch_order_details
129 WHERE order_no=" . $_SESSION['PO']->order_no
130 ." ORDER BY po_detail_item";
132 $result = db_query($sql, "could not query purch order details");
133 check_db_error("Could not check that the details of the purchase order had not been changed by another user ", $sql);
136 while ($myrow = db_fetch($result))
138 $ln_item = $_SESSION['PO']->line_items[$line_no];
139 // only compare against items that are outstanding
140 $qty_outstanding = $ln_item->quantity - $ln_item->qty_received;
141 if ($qty_outstanding > 0)
143 if ($ln_item->qty_inv != $myrow["qty_invoiced"] ||
144 $ln_item->stock_id != $myrow["item_code"] ||
145 $ln_item->quantity != $myrow["quantity_ordered"] ||
146 $ln_item->qty_received != $myrow["quantity_received"])
152 } /*loop through all line items of the order to ensure none have been invoiced */
157 //--------------------------------------------------------------------------------------------------
159 function can_process()
161 global $SysPrefs, $Refs;
163 if (count($_SESSION['PO']->line_items) <= 0)
165 display_error(_("There is nothing to process. Please enter valid quantities greater than zero."));
169 if (!is_date($_POST['DefaultReceivedDate']))
171 display_error(_("The entered date is invalid."));
172 set_focus('DefaultReceivedDate');
176 if (!$Refs->is_valid($_POST['ref']))
178 display_error(_("You must enter a reference."));
183 if (!is_new_reference($_POST['ref'], 25))
185 display_error(_("The entered reference is already in use."));
190 $something_received = 0;
191 foreach ($_SESSION['PO']->line_items as $order_line)
193 if ($order_line->receive_qty > 0)
195 $something_received = 1;
200 // Check whether trying to deliver more items than are recorded on the actual purchase order (+ overreceive allowance)
201 $delivery_qty_too_large = 0;
202 foreach ($_SESSION['PO']->line_items as $order_line)
204 if ($order_line->receive_qty+$order_line->qty_received >
205 $order_line->quantity * (1+ ($SysPrefs->over_receive_allowance() / 100)))
207 $delivery_qty_too_large = 1;
212 if ($something_received == 0)
213 { /*Then dont bother proceeding cos nothing to do ! */
214 display_error(_("There is nothing to process. Please enter valid quantities greater than zero."));
217 elseif ($delivery_qty_too_large == 1)
219 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() ."%)."
221 _("Modify the ordered items on the purchase order if you wish to increase the quantities."));
228 //--------------------------------------------------------------------------------------------------
230 function process_receive_po()
232 global $path_to_root, $Ajax;
237 if (check_po_changed())
239 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."));
240 hyperlink_no_params("$path_to_root/purchasing/inquiry/po_search.php",
241 _("Select a different purchase order for receiving goods against"));
242 hyperlink_params("$path_to_root/purchasing/po_receive_items.php",
243 _("Re-Read the updated purchase order for receiving goods against"),
244 "PONumber=" . $_SESSION['PO']->order_no);
245 unset($_SESSION['PO']->line_items);
246 unset($_SESSION['PO']);
247 unset($_POST['ProcessGoodsReceived']);
248 $Ajax->activate('_page_body');
249 display_footer_exit();
252 $grn = add_grn($_SESSION['PO'], $_POST['DefaultReceivedDate'],
253 $_POST['ref'], $_POST['Location']);
255 new_doc_date($_POST['DefaultReceivedDate']);
256 unset($_SESSION['PO']->line_items);
257 unset($_SESSION['PO']);
259 meta_forward($_SERVER['PHP_SELF'], "AddedID=$grn");
262 //--------------------------------------------------------------------------------------------------
264 if (isset($_GET['PONumber']) && $_GET['PONumber'] > 0 && !isset($_POST['Update']))
269 /*read in all the selected order into the Items cart */
270 read_po($_GET['PONumber'], $_SESSION['PO']);
273 //--------------------------------------------------------------------------------------------------
275 if (isset($_POST['Update']) || isset($_POST['ProcessGoodsReceived']))
278 /* if update quantities button is hit page has been called and ${$line->line_no} would have be
279 set from the post to the quantity to be received in this receival*/
280 foreach ($_SESSION['PO']->line_items as $line)
282 if( ($line->quantity - $line->qty_received)>0) {
283 $_POST[$line->line_no] = max($_POST[$line->line_no], 0);
284 if (!check_num($line->line_no))
285 $_POST[$line->line_no] = number_format2(0, get_qty_dec($line->stock_id));
287 if (!isset($_POST['DefaultReceivedDate']) || $_POST['DefaultReceivedDate'] == "")
288 $_POST['DefaultReceivedDate'] = new_doc_date();
290 $_SESSION['PO']->line_items[$line->line_no]->receive_qty = input_num($line->line_no);
292 if (isset($_POST[$line->stock_id . "Desc"]) && strlen($_POST[$line->stock_id . "Desc"]) > 0)
294 $_SESSION['PO']->line_items[$line->line_no]->item_description = $_POST[$line->stock_id . "Desc"];
298 $Ajax->activate('grn_items');
301 //--------------------------------------------------------------------------------------------------
303 if (isset($_POST['ProcessGoodsReceived']))
305 process_receive_po();
308 //--------------------------------------------------------------------------------------------------
312 display_grn_summary($_SESSION['PO'], true);
313 display_heading(_("Items to Receive"));
314 display_po_receive_items();
317 submit_center_first('Update', _("Update"), '', true);
318 submit_center_last('ProcessGoodsReceived', _("Process Receive Items"), _("Clear all GL entry fields"), 'default');
322 //--------------------------------------------------------------------------------------------------