Release 2.0.4
[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         display_footer_exit();
55 }
56
57 //--------------------------------------------------------------------------------------------------
58
59 if (isset($_GET['New']))
60 {
61         if (isset( $_SESSION['supp_trans']))
62         {
63                 unset ($_SESSION['supp_trans']->grn_items);
64                 unset ($_SESSION['supp_trans']->gl_codes);
65                 unset ($_SESSION['supp_trans']);
66         }
67
68         //session_register("SuppInv");
69         session_register("supp_trans");
70         $_SESSION['supp_trans'] = new supp_trans;
71         $_SESSION['supp_trans']->is_invoice = true;
72 }
73
74 //--------------------------------------------------------------------------------------------------
75 function clear_fields()
76 {
77         global $Ajax;
78         
79         unset($_POST['gl_code']);
80         unset($_POST['dimension_id']);
81         unset($_POST['dimension2_id']);
82         unset($_POST['amount']);
83         unset($_POST['memo_']);
84         unset($_POST['AddGLCodeToTrans']);
85         $Ajax->activate('gl_ctrls');
86         set_focus('gl_code');
87 }
88 //------------------------------------------------------------------------------------------------
89 //      GL postings are often entered in the same form to two accounts
90 //  so fileds are cleared only on user demand.
91 //
92 if (isset($_POST['ClearFields']))
93 {
94         clear_fields();
95 }
96
97 if (isset($_POST['AddGLCodeToTrans'])){
98
99         $Ajax->activate('gl_items');
100         $input_error = false;
101
102         $sql = "SELECT account_code, account_name FROM ".TB_PREF."chart_master WHERE account_code='" . $_POST['gl_code'] . "'";
103         $result = db_query($sql,"get account information");
104         if (db_num_rows($result) == 0)
105         {
106                 display_error(_("The account code entered is not a valid code, this line cannot be added to the transaction."));
107                 set_focus('gl_code');
108                 $input_error = true;
109         }
110         else
111         {
112                 $myrow = db_fetch_row($result);
113                 $gl_act_name = $myrow[1];
114                 if (!check_num('amount'))
115                 {
116                         display_error(_("The amount entered is not numeric. This line cannot be added to the transaction."));
117                         set_focus('amount');
118                         $input_error = true;
119                 }
120         }
121
122         if ($input_error == false)
123         {
124                 $_SESSION['supp_trans']->add_gl_codes_to_trans($_POST['gl_code'], $gl_act_name,
125                         $_POST['dimension_id'], $_POST['dimension2_id'], 
126                         input_num('amount'), $_POST['memo_']);
127                 set_focus('gl_code');
128         }
129 }
130
131 //------------------------------------------------------------------------------------------------
132
133 function check_data()
134 {
135         If (!$_SESSION['supp_trans']->is_valid_trans_to_post())
136         {
137                 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."));
138                 return false;
139         }
140
141         if (!references::is_valid($_SESSION['supp_trans']->reference)) 
142         {
143                 display_error(_("You must enter an invoice reference."));
144                 set_focus('reference');
145                 return false;
146         }
147
148         if (!is_new_reference($_SESSION['supp_trans']->reference, 20)) 
149         {
150                 display_error(_("The entered reference is already in use."));
151                 set_focus('reference');
152                 return false;
153         }
154
155         if (!references::is_valid($_SESSION['supp_trans']->supp_reference)) 
156         {
157                 display_error(_("You must enter a supplier's invoice reference."));
158                 set_focus('supp_reference');
159                 return false;
160         }
161
162         if (!is_date( $_SESSION['supp_trans']->tran_date))
163         {
164                 display_error(_("The invoice as entered cannot be processed because the invoice date is in an incorrect format."));
165                 set_focus('trans_date');
166                 return false;
167         } 
168         elseif (!is_date_in_fiscalyear($_SESSION['supp_trans']->tran_date)) 
169         {
170                 display_error(_("The entered date is not in fiscal year."));
171                 set_focus('trans_date');
172                 return false;
173         }
174         if (!is_date( $_SESSION['supp_trans']->due_date))
175         {
176                 display_error(_("The invoice as entered cannot be processed because the due date is in an incorrect format."));
177                 set_focus('due_date');
178                 return false;
179         }
180
181         $sql = "SELECT Count(*) FROM ".TB_PREF."supp_trans WHERE supplier_id='" . $_SESSION['supp_trans']->supplier_id . "' AND supp_reference='" . $_POST['supp_reference'] . "'";
182         $result=db_query($sql,"The sql to check for the previous entry of the same invoice failed");
183
184         $myrow = db_fetch_row($result);
185         if ($myrow[0] == 1)
186         {       /*Transaction reference already entered */
187                 display_error(_("This invoice number has already been entered. It cannot be entered again." . " (" . $_POST['supp_reference'] . ")"));
188                 return false;
189         }
190
191         return true;
192 }
193
194 //--------------------------------------------------------------------------------------------------
195
196 function handle_commit_invoice()
197 {
198         copy_to_trans($_SESSION['supp_trans']);
199
200         if (!check_data())
201                 return;
202
203         $invoice_no = add_supp_invoice($_SESSION['supp_trans']);
204
205     $_SESSION['supp_trans']->clear_items();
206     unset($_SESSION['supp_trans']);
207
208         meta_forward($_SERVER['PHP_SELF'], "AddedID=$invoice_no");
209 }
210
211 //--------------------------------------------------------------------------------------------------
212
213 if (isset($_POST['PostInvoice']))
214 {
215         handle_commit_invoice();
216 }
217
218 function check_item_data($n)
219 {
220         global $check_price_charged_vs_order_price,
221                 $check_qty_charged_vs_del_qty;
222         if (!check_num('this_quantity_inv'.$n, 0) || input_num('this_quantity_inv'.$n)==0)
223         {
224                 display_error( _("The quantity to invoice must be numeric and greater than zero."));
225                 set_focus('this_quantity_inv'.$n);
226                 return false;
227         }
228
229         if (!check_num('ChgPrice'.$n))
230         {
231                 display_error( _("The price is not numeric."));
232                 set_focus('ChgPrice'.$n);
233                 return false;
234         }
235
236         if ($check_price_charged_vs_order_price == True)
237         {
238                 if ($_POST['order_price'.$n]!=input_num('ChgPrice'.$n)) {
239                      if ($_POST['order_price'.$n]==0 ||
240                                 input_num('ChgPrice'.$n)/$_POST['order_price'.$n] >
241                             (1 + (sys_prefs::over_charge_allowance() / 100)))
242                     {
243                         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.") .
244                         _("The over-charge percentage allowance is :") . sys_prefs::over_charge_allowance() . "%");
245                         set_focus('ChgPrice'.$n);
246                         return false;
247                     }
248                 }
249         }
250
251         if ($check_qty_charged_vs_del_qty == True)
252         {
253                 if (input_num('this_quantity_inv'.$n) / ($_POST['qty_recd'.$n] - $_POST['prev_quantity_inv'.$n]) >
254                         (1+ (sys_prefs::over_charge_allowance() / 100)))
255                 {
256                         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.")
257                         . _("The over-charge percentage allowance is :") . sys_prefs::over_charge_allowance() . "%");
258                         set_focus('this_quantity_inv'.$n);
259                         return false;
260                 }
261         }
262
263         return true;
264 }
265
266 $id = find_submit('grn_item_id');
267 if ($id != -1)
268 {
269         if (check_item_data($id))
270         {
271         if (input_num('this_quantity_inv'.$id) >= ($_POST['qty_recd'.$id] - $_POST['prev_quantity_inv'.$id]))
272         {
273                 $complete = true;
274         }
275         else
276         {
277                 $complete = false;
278         }
279
280                 $_SESSION['supp_trans']->add_grn_to_trans($id, $_POST['po_detail_item'.$id],
281                         $_POST['item_code'.$id], $_POST['item_description'.$id], $_POST['qty_recd'.$id],
282                         $_POST['prev_quantity_inv'.$id], input_num('this_quantity_inv'.$id),
283                         $_POST['order_price'.$id], input_num('ChgPrice'.$id), $complete,
284                         $_POST['std_cost_unit'.$id], "");
285         }
286 }
287
288 //--------------------------------------------------------------------------------------------------
289 $id = find_submit('Delete');
290 if ($id != -1)
291 {
292         $_SESSION['supp_trans']->remove_grn_from_trans($id);
293         $Ajax->activate('grn_items');
294         $Ajax->activate('grn_table');
295         $Ajax->activate('inv_tot');
296 }
297
298 $id = find_submit('Delete2');
299 if ($id != -1)
300 {
301         $_SESSION['supp_trans']->remove_gl_codes_from_trans($id);
302         clear_fields();
303         $Ajax->activate('gl_items');
304         $Ajax->activate('inv_tot');
305 }
306
307 start_form(false, true);
308
309 start_table("$table_style2 width=98%", 8);
310 echo "<tr><td valign=center>"; // outer table
311
312 echo "<center>";
313
314 invoice_header($_SESSION['supp_trans']);
315 if ($_POST['supplier_id']=='') 
316         display_error('No supplier found for entered search text');
317 else {
318         echo "</td></tr><tr><td valign=center>"; // outer table
319
320         echo "<center>";
321
322         display_grn_items($_SESSION['supp_trans'], 1);
323         //display_grn_items_for_selection();
324         display_gl_items($_SESSION['supp_trans'], 1);
325         //display_gl_controls();
326
327         //echo "</td></tr><tr><td align=center colspan=2>"; // outer table
328         echo "<br>";
329         div_start('inv_tot');
330         invoice_totals($_SESSION['supp_trans']);
331         div_end();
332 }
333 echo "</td></tr>";
334
335 end_table(); // outer table
336
337 //-----------------------------------------------------------------------------------------
338 $id = find_submit('grn_item_id');
339 $id2 = find_submit('void_item_id');
340 if ($id != -1 || $id2 != -1)
341 {
342         $Ajax->activate('grn_table');
343         $Ajax->activate('grn_items');
344         $Ajax->activate('inv_tot');
345 }
346
347 if (get_post('AddGLCodeToTrans'))
348         $Ajax->activate('inv_tot');
349
350 if ($_SESSION["wa_current_user"]->access == 2)
351 {
352         if ($id2 != -1) // Added section 2008-10-18 Joe Hunt for voiding delivery lines
353         {
354                 begin_transaction();
355                 
356                 $myrow = get_grn_item_detail($id2);
357
358                 $grn = get_grn_batch($myrow['grn_batch_id']);
359
360             $sql = "UPDATE ".TB_PREF."purch_order_details
361                         SET quantity_received = qty_invoiced, quantity_ordered = qty_invoiced WHERE po_detail_item = ".$myrow["po_detail_item"];
362             db_query($sql, "The quantity invoiced of the purchase order line could not be updated");
363
364             $sql = "UPDATE ".TB_PREF."grn_items
365                 SET qty_recd = quantity_inv WHERE id = ".$myrow["id"];
366                 db_query($sql, "The quantity invoiced off the items received record could not be updated");
367         
368                 update_average_material_cost($grn["supplier_id"], $myrow["item_code"],
369                         $myrow["unit_price"], -$myrow["QtyOstdg"], Today());
370
371                 add_stock_move(25, $myrow["item_code"], $myrow['grn_batch_id'], $grn['loc_code'], sql2date($grn["delivery_date"]), "",
372                         -$myrow["QtyOstdg"], $myrow['std_cost_unit'], $grn["supplier_id"], 1, $myrow['unit_price']);
373                         
374                 commit_transaction();
375         }               
376 }
377
378 echo "<br>";
379 submit_center('PostInvoice', _("Enter Invoice"), true, '', true);
380 echo "<br>";
381
382 end_form();
383
384 //--------------------------------------------------------------------------------------------------
385
386 end_page();
387 ?>