Merged all main trunk bugfixes up to release 2.0.5
[fa-stable.git] / purchasing / supplier_invoice.php
1 <?php
2
3 $page_security=5;
4 $path_to_root="..";
5
6 include_once($path_to_root . "/purchasing/includes/purchasing_db.inc");
7
8 include_once($path_to_root . "/includes/session.inc");
9
10 include_once($path_to_root . "/includes/banking.inc");
11 include_once($path_to_root . "/includes/data_checks.inc");
12
13 include_once($path_to_root . "/purchasing/includes/purchasing_ui.inc");
14 $js = "";
15 if ($use_popup_windows)
16         $js .= get_js_open_window(900, 500);
17 if ($use_date_picker)
18         $js .= get_js_date_picker();
19 page(_("Enter Supplier Invoice"), false, false, "", $js);
20
21
22 //----------------------------------------------------------------------------------------
23
24 check_db_has_suppliers(_("There are no suppliers defined in the system."));
25
26 //---------------------------------------------------------------------------------------------------------------
27 if ($ret = context_restore()) {
28  // return from supplier editor
29         copy_from_trans($_SESSION['supp_trans']);
30         if(isset($ret['supplier_id']))
31                 $_POST['supplier_id'] = $ret['supplier_id'];
32 }
33 if (isset($_POST['_supplier_id_editor'])) {
34         copy_to_trans($_SESSION['supp_trans']);
35         context_call($path_to_root.'/purchasing/manage/suppliers.php?supplier_id='.$_POST['supplier_id'], 'supp_trans');
36 }
37
38 //---------------------------------------------------------------------------------------------------------------
39
40 if (isset($_GET['AddedID'])) 
41 {
42         $invoice_no = $_GET['AddedID'];
43         $trans_type = 20;
44
45
46     echo "<center>";
47     display_notification_centered(_("Supplier invoice has been processed."));
48     display_note(get_trans_view_str($trans_type, $invoice_no, _("View this Invoice")));
49
50         display_note(get_gl_view_str($trans_type, $invoice_no, _("View the GL Journal Entries for this Invoice")), 1);
51
52         hyperlink_params($_SERVER['PHP_SELF'], _("Enter Another Invoice"), "New=1");
53
54         hyperlink_params("$path_to_root/admin/attachments.php", _("Add an Attachment"), "filterType=$trans_type&trans_no=$invoice_no");
55         
56         display_footer_exit();
57 }
58
59 //--------------------------------------------------------------------------------------------------
60
61 if (isset($_GET['New']))
62 {
63         if (isset( $_SESSION['supp_trans']))
64         {
65                 unset ($_SESSION['supp_trans']->grn_items);
66                 unset ($_SESSION['supp_trans']->gl_codes);
67                 unset ($_SESSION['supp_trans']);
68         }
69
70         //session_register("SuppInv");
71         session_register("supp_trans");
72         $_SESSION['supp_trans'] = new supp_trans;
73         $_SESSION['supp_trans']->is_invoice = true;
74 }
75
76 //--------------------------------------------------------------------------------------------------
77 function clear_fields()
78 {
79         global $Ajax;
80         
81         unset($_POST['gl_code']);
82         unset($_POST['dimension_id']);
83         unset($_POST['dimension2_id']);
84         unset($_POST['amount']);
85         unset($_POST['memo_']);
86         unset($_POST['AddGLCodeToTrans']);
87         $Ajax->activate('gl_items');
88         set_focus('gl_code');
89 }
90 //------------------------------------------------------------------------------------------------
91 //      GL postings are often entered in the same form to two accounts
92 //  so fileds are cleared only on user demand.
93 //
94 if (isset($_POST['ClearFields']))
95 {
96         clear_fields();
97 }
98
99 if (isset($_POST['AddGLCodeToTrans'])){
100
101         $Ajax->activate('gl_items');
102         $input_error = false;
103
104         $sql = "SELECT account_code, account_name FROM ".TB_PREF."chart_master WHERE account_code='" . $_POST['gl_code'] . "'";
105         $result = db_query($sql,"get account information");
106         if (db_num_rows($result) == 0)
107         {
108                 display_error(_("The account code entered is not a valid code, this line cannot be added to the transaction."));
109                 set_focus('gl_code');
110                 $input_error = true;
111         }
112         else
113         {
114                 $myrow = db_fetch_row($result);
115                 $gl_act_name = $myrow[1];
116                 if (!check_num('amount'))
117                 {
118                         display_error(_("The amount entered is not numeric. This line cannot be added to the transaction."));
119                         set_focus('amount');
120                         $input_error = true;
121                 }
122         }
123
124         if ($input_error == false)
125         {
126                 $_SESSION['supp_trans']->add_gl_codes_to_trans($_POST['gl_code'], $gl_act_name,
127                         $_POST['dimension_id'], $_POST['dimension2_id'], 
128                         input_num('amount'), $_POST['memo_']);
129                 set_focus('gl_code');
130         }
131 }
132
133 //------------------------------------------------------------------------------------------------
134
135 function check_data()
136 {
137         If (!$_SESSION['supp_trans']->is_valid_trans_to_post())
138         {
139                 display_error(_("The invoice cannot be processed because the there are no items or values on the invoice.  Invoices are expected to have a charge."));
140                 return false;
141         }
142
143         if (!references::is_valid($_SESSION['supp_trans']->reference)) 
144         {
145                 display_error(_("You must enter an invoice reference."));
146                 set_focus('reference');
147                 return false;
148         }
149
150         if (!is_new_reference($_SESSION['supp_trans']->reference, 20)) 
151         {
152                 display_error(_("The entered reference is already in use."));
153                 set_focus('reference');
154                 return false;
155         }
156
157         if (!references::is_valid($_SESSION['supp_trans']->supp_reference)) 
158         {
159                 display_error(_("You must enter a supplier's invoice reference."));
160                 set_focus('supp_reference');
161                 return false;
162         }
163
164         if (!is_date( $_SESSION['supp_trans']->tran_date))
165         {
166                 display_error(_("The invoice as entered cannot be processed because the invoice date is in an incorrect format."));
167                 set_focus('trans_date');
168                 return false;
169         } 
170         elseif (!is_date_in_fiscalyear($_SESSION['supp_trans']->tran_date)) 
171         {
172                 display_error(_("The entered date is not in fiscal year."));
173                 set_focus('trans_date');
174                 return false;
175         }
176         if (!is_date( $_SESSION['supp_trans']->due_date))
177         {
178                 display_error(_("The invoice as entered cannot be processed because the due date is in an incorrect format."));
179                 set_focus('due_date');
180                 return false;
181         }
182
183         $sql = "SELECT Count(*) FROM ".TB_PREF."supp_trans WHERE supplier_id='" . $_SESSION['supp_trans']->supplier_id . "' AND supp_reference='" . $_POST['supp_reference'] . "'";
184         $result=db_query($sql,"The sql to check for the previous entry of the same invoice failed");
185
186         $myrow = db_fetch_row($result);
187         if ($myrow[0] == 1)
188         {       /*Transaction reference already entered */
189                 display_error(_("This invoice number has already been entered. It cannot be entered again." . " (" . $_POST['supp_reference'] . ")"));
190                 return false;
191         }
192
193         return true;
194 }
195
196 //--------------------------------------------------------------------------------------------------
197
198 function handle_commit_invoice()
199 {
200         copy_to_trans($_SESSION['supp_trans']);
201
202         if (!check_data())
203                 return;
204
205         $invoice_no = add_supp_invoice($_SESSION['supp_trans']);
206
207     $_SESSION['supp_trans']->clear_items();
208     unset($_SESSION['supp_trans']);
209
210         meta_forward($_SERVER['PHP_SELF'], "AddedID=$invoice_no");
211 }
212
213 //--------------------------------------------------------------------------------------------------
214
215 if (isset($_POST['PostInvoice']))
216 {
217         handle_commit_invoice();
218 }
219
220 function check_item_data($n)
221 {
222         global $check_price_charged_vs_order_price,
223                 $check_qty_charged_vs_del_qty;
224         if (!check_num('this_quantity_inv'.$n, 0) || input_num('this_quantity_inv'.$n)==0)
225         {
226                 display_error( _("The quantity to invoice must be numeric and greater than zero."));
227                 set_focus('this_quantity_inv'.$n);
228                 return false;
229         }
230
231         if (!check_num('ChgPrice'.$n))
232         {
233                 display_error( _("The price is not numeric."));
234                 set_focus('ChgPrice'.$n);
235                 return false;
236         }
237
238         if ($check_price_charged_vs_order_price == True)
239         {
240                 if ($_POST['order_price'.$n]!=input_num('ChgPrice'.$n)) {
241                      if ($_POST['order_price'.$n]==0 ||
242                                 input_num('ChgPrice'.$n)/$_POST['order_price'.$n] >
243                             (1 + (sys_prefs::over_charge_allowance() / 100)))
244                     {
245                         display_error(_("The price being invoiced is more than the purchase order price by more than the allowed over-charge percentage. The system is set up to prohibit this. See the system administrator to modify the set up parameters if necessary.") .
246                         _("The over-charge percentage allowance is :") . sys_prefs::over_charge_allowance() . "%");
247                         set_focus('ChgPrice'.$n);
248                         return false;
249                     }
250                 }
251         }
252
253         if ($check_qty_charged_vs_del_qty == True)
254         {
255                 if (input_num('this_quantity_inv'.$n) / ($_POST['qty_recd'.$n] - $_POST['prev_quantity_inv'.$n]) >
256                         (1+ (sys_prefs::over_charge_allowance() / 100)))
257                 {
258                         display_error( _("The quantity being invoiced is more than the outstanding quantity by more than the allowed over-charge percentage. The system is set up to prohibit this. See the system administrator to modify the set up parameters if necessary.")
259                         . _("The over-charge percentage allowance is :") . sys_prefs::over_charge_allowance() . "%");
260                         set_focus('this_quantity_inv'.$n);
261                         return false;
262                 }
263         }
264
265         return true;
266 }
267
268 function commit_item_data($n)
269 {
270         if (check_item_data($n))
271         {
272         if (input_num('this_quantity_inv'.$n) >= ($_POST['qty_recd'.$n] - $_POST['prev_quantity_inv'.$n]))
273         {
274                 $complete = true;
275         }
276         else
277         {
278                 $complete = false;
279         }
280
281                 $_SESSION['supp_trans']->add_grn_to_trans($n, $_POST['po_detail_item'.$n],
282                         $_POST['item_code'.$n], $_POST['item_description'.$n], $_POST['qty_recd'.$n],
283                         $_POST['prev_quantity_inv'.$n], input_num('this_quantity_inv'.$n),
284                         $_POST['order_price'.$n], input_num('ChgPrice'.$n), $complete,
285                         $_POST['std_cost_unit'.$n], "");
286         }
287 }
288
289 //-----------------------------------------------------------------------------------------
290
291 $id = find_submit('grn_item_id');
292 if ($id != -1)
293 {
294         commit_item_data($id);
295 }
296
297 if (isset($_POST['InvGRNAll']))
298 {
299         foreach($_POST as $postkey=>$postval )
300     {
301                 if (strpos($postkey, "qty_recd") === 0)
302                 {
303                         $id = substr($postkey, strlen("qty_recd"));
304                         $id = (int)$id;
305                         commit_item_data($id);
306                 }
307     }
308 }       
309
310 //--------------------------------------------------------------------------------------------------
311 $id3 = find_submit('Delete');
312 if ($id3 != -1)
313 {
314         $_SESSION['supp_trans']->remove_grn_from_trans($id3);
315         $Ajax->activate('grn_items');
316         $Ajax->activate('inv_tot');
317 }
318
319 $id4 = find_submit('Delete2');
320 if ($id4 != -1)
321 {
322         $_SESSION['supp_trans']->remove_gl_codes_from_trans($id4);
323         clear_fields();
324         $Ajax->activate('gl_items');
325         $Ajax->activate('inv_tot');
326 }
327
328 if ($_SESSION["wa_current_user"]->access == 2)
329 {
330         $id3 = find_submit('void_item_id');
331         if ($id3 != -1) 
332         {
333                 $js = "if(confirm(\""
334                 .sprintf(_('You are about to remove all yet non-invoiced items from delivery line #%d. This operation also irreversibly changes related order line. Do you want to continue ?'), $id3)
335                 ."\")) {
336                         JsHttpRequest.request(\"void_confirm".$id3."\");
337                 }";
338                 $Ajax->addScript(true,$js);
339         }
340         $id2 = find_submit('void_confirm');
341         if ($id2 != -1) // Added section 2008-10-18 Joe Hunt for voiding delivery lines
342         {
343                 begin_transaction();
344                 
345                 $myrow = get_grn_item_detail($id2);
346
347                 $grn = get_grn_batch($myrow['grn_batch_id']);
348
349             $sql = "UPDATE ".TB_PREF."purch_order_details
350                         SET quantity_received = qty_invoiced, quantity_ordered = qty_invoiced WHERE po_detail_item = ".$myrow["po_detail_item"];
351             db_query($sql, "The quantity invoiced of the purchase order line could not be updated");
352
353             $sql = "UPDATE ".TB_PREF."grn_items
354                 SET qty_recd = quantity_inv WHERE id = ".$myrow["id"];
355                 db_query($sql, "The quantity invoiced off the items received record could not be updated");
356         
357                 update_average_material_cost($grn["supplier_id"], $myrow["item_code"],
358                         $myrow["unit_price"], -$myrow["QtyOstdg"], Today());
359
360                 add_stock_move(25, $myrow["item_code"], $myrow['grn_batch_id'], $grn['loc_code'], sql2date($grn["delivery_date"]), "",
361                         -$myrow["QtyOstdg"], $myrow['std_cost_unit'], $grn["supplier_id"], 1, $myrow['unit_price']);
362                         
363                 commit_transaction();
364                 display_notification(sprintf(_('All yet non-invoiced items on delivery line # %d has been removed.'), $id2));
365
366         }               
367 }
368
369 start_form(false, true);
370
371 start_table("$table_style2 width=98%", 8);
372 echo "<tr><td valign=center>"; // outer table
373
374 echo "<center>";
375
376 invoice_header($_SESSION['supp_trans']);
377 if ($_POST['supplier_id']=='') 
378         display_error('No supplier found for entered search text');
379 else {
380         echo "</td></tr><tr><td valign=center>"; // outer table
381
382         echo "<center>";
383
384         display_grn_items($_SESSION['supp_trans'], 1);
385         //display_grn_items_for_selection();
386         display_gl_items($_SESSION['supp_trans'], 1);
387         //display_gl_controls();
388
389         //echo "</td></tr><tr><td align=center colspan=2>"; // outer table
390         echo "<br>";
391         div_start('inv_tot');
392         invoice_totals($_SESSION['supp_trans']);
393         div_end();
394 }
395 echo "</td></tr>";
396
397 end_table(); // outer table
398
399 //-----------------------------------------------------------------------------------------
400
401
402 if ($id != -1 || $id2 != -1)
403 {
404         $Ajax->activate('grn_items');
405         $Ajax->activate('inv_tot');
406 }
407
408 if (get_post('AddGLCodeToTrans'))
409         $Ajax->activate('inv_tot');
410
411 echo "<br>";
412 submit_center('PostInvoice', _("Enter Invoice"), true, '', true);
413 echo "<br>";
414
415 end_form();
416
417 //--------------------------------------------------------------------------------------------------
418
419 end_page();
420 ?>