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