More files with Quantity routines needed fix due to php4 related issue.
[fa-stable.git] / purchasing / po_receive_items.php
1 <?php
2 $page_security = 11;
3 $path_to_root="..";
4 include_once($path_to_root . "/purchasing/includes/po_class.inc");
5
6 include_once($path_to_root . "/includes/session.inc");
7 include_once($path_to_root . "/purchasing/includes/purchasing_db.inc");
8 include_once($path_to_root . "/purchasing/includes/purchasing_ui.inc");
9
10 $js = "";
11 if ($use_popup_windows)
12         $js .= get_js_open_window(900, 500);
13 if ($use_date_picker)
14         $js .= get_js_date_picker();
15 page(_("Receive Purchase Order Items"), false, false, "", $js);
16
17 //---------------------------------------------------------------------------------------------------------------
18
19 if (isset($_GET['AddedID']))
20 {
21         $grn = $_GET['AddedID'];
22         $trans_type = 25;
23
24         display_notification_centered(_("Purchase Order Delivery has been processed"));
25
26         display_note(get_trans_view_str($trans_type, $grn, _("View this Delivery")));
27
28         //echo "<BR>";
29         //echo get_gl_view_str(25, $grn, _("View the GL Journal Entries for this Delivery"));
30
31 //      echo "<br>";
32         hyperlink_no_params("$path_to_root/purchasing/inquiry/po_search.php", _("Select a different purchase order for receiving items against"));
33
34         display_footer_exit();
35 }
36
37 //--------------------------------------------------------------------------------------------------
38
39 if ((!isset($_GET['PONumber']) || $_GET['PONumber'] == 0) && !isset($_SESSION['PO']))
40 //if (isset($_GET['PONumber']) && !$_GET['PONumber'] > 0 && !isset($_SESSION['PO']))
41 {
42         die (_("This page can only be opened if a purchase order has been selected. Please select a purchase order first."));
43 }
44
45 //--------------------------------------------------------------------------------------------------
46
47 function display_po_receive_items()
48 {
49         global $table_style;
50     start_table("colspan=7 $table_style width=90%");
51     $th = array(_("Item Code"), _("Description"), _("Ordered"), _("Units"), _("Received"),
52         _("Outstanding"), _("This Delivery"), _("Price"), _("Total"));
53     table_header($th);
54
55     /*show the line items on the order with the quantity being received for modification */
56
57     $total = 0;
58     $k = 0; //row colour counter
59
60     if (count($_SESSION['PO']->line_items)> 0 )
61     {
62         foreach ($_SESSION['PO']->line_items as $ln_itm)
63         {
64
65                         alt_table_row_color($k);
66
67                 $qty_outstanding = $ln_itm->quantity - $ln_itm->qty_received;
68
69                 if ($ln_itm->receive_qty == 0)
70                 {   //If no quantites yet input default the balance to be received
71                 $ln_itm->receive_qty = $qty_outstanding;
72                 }
73
74                 $line_total = ($ln_itm->receive_qty * $ln_itm->price);
75                 $total += $line_total;
76
77                         label_cell($ln_itm->stock_id);
78                         if ($qty_outstanding > 0)
79                                 text_cells(null, $ln_itm->stock_id . "Desc", $ln_itm->item_description, 30, 50);
80                         else
81                                 label_cell($ln_itm->item_description);
82                         $dec = get_qty_dec($ln_itm->stock_id);
83                         qty_cell($ln_itm->quantity, false, $dec);
84                         label_cell($ln_itm->units);
85                         qty_cell($ln_itm->qty_received, false, $dec);
86                         qty_cell($qty_outstanding, false, $dec);
87
88                         if ($qty_outstanding > 0)
89                                 qty_cells(null, $ln_itm->line_no, number_format2($ln_itm->receive_qty, $dec), "align=right", null, $dec);
90                         else
91                                 qty_cells(null, $ln_itm->line_no, number_format2($ln_itm->receive_qty, $dec), "align=right",
92                                         "disabled", $dec);
93
94                         amount_cell($ln_itm->price);
95                         amount_cell($line_total);
96                         end_row();
97         }
98     }
99
100     $display_total = number_format2($total,user_price_dec());
101     label_row(_("Total value of items received"), $display_total, "colspan=8 align=right",
102         "nowrap align=right");
103     end_table();
104 }
105
106 //--------------------------------------------------------------------------------------------------
107
108 function check_po_changed()
109 {
110         /*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 */
111         // Sherifoz 22.06.03 Compare against COMPLETED items only !!
112         // Otherwise if you try to fullfill item quantities separately will give error.
113         $sql = "SELECT item_code, quantity_ordered, quantity_received, qty_invoiced
114                 FROM ".TB_PREF."purch_order_details
115                 WHERE order_no=" . $_SESSION['PO']->order_no . "
116                 AND (quantity_ordered > quantity_received)
117                 ORDER BY po_detail_item";
118
119         $result = db_query($sql, "could not query purch order details");
120     check_db_error("Could not check that the details of the purchase order had not been changed by another user ", $sql);
121
122         $line_no = 1;
123         while ($myrow = db_fetch($result))
124         {
125                 $ln_item = $_SESSION['PO']->line_items[$line_no];
126
127                 // only compare against items that are outstanding
128                 $qty_outstanding = $ln_item->quantity - $ln_item->qty_received;
129                 if ($qty_outstanding > 0)
130                 {
131                 if ($ln_item->qty_inv != $myrow["qty_invoiced"] ||
132                         $ln_item->stock_id != $myrow["item_code"] ||
133                         $ln_item->quantity != $myrow["quantity_ordered"] ||
134                         $ln_item->qty_received != $myrow["quantity_received"])
135                 {
136                         return true;
137                 }
138                 }
139                 $line_no++;
140         } /*loop through all line items of the order to ensure none have been invoiced */
141
142         return false;
143 }
144
145 //--------------------------------------------------------------------------------------------------
146
147 function can_process()
148 {
149         if (count($_SESSION['PO']->line_items) <= 0)
150         {
151         display_error(_("There is nothing to process. Please enter valid quantities greater than zero."));
152         return false;
153         }
154
155         if (!is_date($_POST['DefaultReceivedDate']))
156         {
157                 display_error(_("The entered date is invalid."));
158                 set_focus('DefaultReceivedDate');
159                 return false;
160         }
161
162     if (!references::is_valid($_POST['ref']))
163     {
164                 display_error(_("You must enter a reference."));
165                 set_focus('ref');
166                 return false;
167         }
168
169         if (!is_new_reference($_POST['ref'], 25))
170         {
171                 display_error(_("The entered reference is already in use."));
172                 set_focus('ref');
173                 return false;
174         }
175
176         $something_received = 0;
177         foreach ($_SESSION['PO']->line_items as $order_line)
178         {
179                 if ($order_line->receive_qty > 0)
180                 {
181                         $something_received = 1;
182                         break;
183                 }
184         }
185
186     // Check whether trying to deliver more items than are recorded on the actual purchase order (+ overreceive allowance)
187     $delivery_qty_too_large = 0;
188         foreach ($_SESSION['PO']->line_items as $order_line)
189         {
190                 if ($order_line->receive_qty+$order_line->qty_received >
191                         $order_line->quantity * (1+ (sys_prefs::over_receive_allowance() / 100)))
192                 {
193                         $delivery_qty_too_large = 1;
194                         break;
195                 }
196         }
197
198     if ($something_received == 0)
199     {   /*Then dont bother proceeding cos nothing to do ! */
200         display_error(_("There is nothing to process. Please enter valid quantities greater than zero."));
201         return false;
202     }
203     elseif ($delivery_qty_too_large == 1)
204     {
205         display_error(_("Entered quantities cannot be greater than the quantity entered on the purchase order including the allowed over-receive percentage") . " (" . sys_prefs::over_receive_allowance() ."%)."
206                 . "<br>" .
207                 _("Modify the ordered items on the purchase order if you wish to increase the quantities."));
208         return false;
209     }
210
211         return true;
212 }
213
214 //--------------------------------------------------------------------------------------------------
215
216 function process_receive_po()
217 {
218         global $path_to_root;
219
220         if (!can_process())
221                 return;
222
223         if (check_po_changed())
224         {
225                 echo "<br> " . _("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.") . "<BR>";
226
227                 echo "<center><a href='$path_to_root/purchasing/inquiry/po_search.php?" . SID . "'>" . _("Select a different purchase order for receiving goods against") . "</a></center>";
228                 echo "<center><a href='$path_to_root/po_receive_items.php?" . SID . "PONumber=" . $_SESSION['PO']->OrderNumber . "'>" . _("Re-Read the updated purchase order for receiving goods against") . "</a></center>";
229                 unset($_SESSION['PO']->line_items);
230                 unset($_SESSION['PO']);
231                 unset($_POST['ProcessGoodsReceived']);
232                 exit;
233         }
234
235         $grn = add_grn($_SESSION['PO'], $_POST['DefaultReceivedDate'],
236                 $_POST['ref'], $_POST['Location']);
237
238         unset($_SESSION['PO']->line_items);
239         unset($_SESSION['PO']);
240
241         meta_forward($_SERVER['PHP_SELF'], "AddedID=$grn");
242 }
243
244 //--------------------------------------------------------------------------------------------------
245
246 if (isset($_GET['PONumber']) && $_GET['PONumber'] > 0 && !isset($_POST['Update']))
247 {
248
249         create_new_po();
250
251         /*read in all the selected order into the Items cart  */
252         read_po($_GET['PONumber'], $_SESSION['PO']);
253 }
254
255 //--------------------------------------------------------------------------------------------------
256
257 if (isset($_POST['Update']) || isset($_POST['ProcessGoodsReceived']))
258 {
259
260         /* if update quantities button is hit page has been called and ${$line->line_no} would have be
261         set from the post to the quantity to be received in this receival*/
262         foreach ($_SESSION['PO']->line_items as $line)
263         {
264
265                 $_POST[$line->line_no] = max($_POST[$line->line_no], 0);
266                 if (!check_num($line->line_no))
267                         $_POST[$line->line_no] = number_format2(0, get_qty_dec($line->stock_id));
268
269                 if (!isset($_POST['DefaultReceivedDate']) || $_POST['DefaultReceivedDate'] == "")
270                         $_POST['DefaultReceivedDate'] = Today();
271
272                 $_SESSION['PO']->line_items[$line->line_no]->receive_qty = input_num($line->line_no);
273
274                 if (isset($_POST[$line->stock_id . "Desc"]) && strlen($_POST[$line->stock_id . "Desc"]) > 0)
275                 {
276                         $_SESSION['PO']->line_items[$line->line_no]->item_description = $_POST[$line->stock_id . "Desc"];
277                 }
278         }
279 }
280
281 //--------------------------------------------------------------------------------------------------
282
283 if (isset($_POST['ProcessGoodsReceived']))
284 {
285         process_receive_po();
286 }
287
288 //--------------------------------------------------------------------------------------------------
289
290 start_form(false, true);
291
292 display_grn_summary($_SESSION['PO'], true);
293 display_heading(_("Items to Receive"));
294 display_po_receive_items();
295
296 echo "<br><center>";
297 submit('Update', _("Update"));
298 echo "&nbsp";
299 submit('ProcessGoodsReceived', _("Process Receive Items"));
300 echo "</center>";
301
302 end_form();
303
304 //--------------------------------------------------------------------------------------------------
305
306 end_page();
307 ?>
308