Cleanup.
[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 = 'SA_SUPPLIERINVOICE';
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(_($help_context = "Enter Supplier Invoice"), false, false, "", $js);
29
30 //----------------------------------------------------------------------------------------
31
32 check_db_has_suppliers(_("There are no suppliers defined in the system."));
33
34 //---------------------------------------------------------------------------------------------------------------
35
36 if (isset($_GET['AddedID'])) 
37 {
38         $invoice_no = $_GET['AddedID'];
39         $trans_type = ST_SUPPINVOICE;
40
41
42     echo "<center>";
43     display_notification_centered(_("Supplier invoice has been processed."));
44     display_note(get_trans_view_str($trans_type, $invoice_no, _("View this Invoice")));
45
46         display_note(get_gl_view_str($trans_type, $invoice_no, _("View the GL Journal Entries for this Invoice")), 1);
47
48         hyperlink_no_params("$path_to_root/purchasing/supplier_payment.php", _("Entry supplier &payment for this invoice"));
49
50         hyperlink_params($_SERVER['PHP_SELF'], _("Enter Another Invoice"), "New=1");
51
52         hyperlink_params("$path_to_root/admin/attachments.php", _("Add an Attachment"), "filterType=$trans_type&trans_no=$invoice_no");
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['supp_trans'] = new supp_trans;
69         $_SESSION['supp_trans']->is_invoice = true;
70 }
71
72 //--------------------------------------------------------------------------------------------------
73 function clear_fields()
74 {
75         global $Ajax;
76         
77         unset($_POST['gl_code']);
78         unset($_POST['dimension_id']);
79         unset($_POST['dimension2_id']);
80         unset($_POST['amount']);
81         unset($_POST['memo_']);
82         unset($_POST['AddGLCodeToTrans']);
83         $Ajax->activate('gl_items');
84         set_focus('gl_code');
85 }
86 //------------------------------------------------------------------------------------------------
87 //      GL postings are often entered in the same form to two accounts
88 //  so fileds are cleared only on user demand.
89 //
90 if (isset($_POST['ClearFields']))
91 {
92         clear_fields();
93 }
94
95 if (isset($_POST['AddGLCodeToTrans'])){
96
97         $Ajax->activate('gl_items');
98         $input_error = false;
99
100         $result = get_gl_account_info($_POST['gl_code']);
101         if (db_num_rows($result) == 0)
102         {
103                 display_error(_("The account code entered is not a valid code, this line cannot be added to the transaction."));
104                 set_focus('gl_code');
105                 $input_error = true;
106         }
107         else
108         {
109                 $myrow = db_fetch_row($result);
110                 $gl_act_name = $myrow[1];
111                 if (!check_num('amount'))
112                 {
113                         display_error(_("The amount entered is not numeric. This line cannot be added to the transaction."));
114                         set_focus('amount');
115                         $input_error = true;
116                 }
117         }
118
119         if (!is_tax_gl_unique(get_post('gl_code'))) {
120                 display_error(_("Cannot post to GL account used by more than one tax type."));
121                 set_focus('gl_code');
122                 $input_error = true;
123         }
124
125         if ($input_error == false)
126         {
127                 $_SESSION['supp_trans']->add_gl_codes_to_trans($_POST['gl_code'], $gl_act_name,
128                         $_POST['dimension_id'], $_POST['dimension2_id'], 
129                         input_num('amount'), $_POST['memo_']);
130                 set_focus('gl_code');
131         }
132 }
133
134 //------------------------------------------------------------------------------------------------
135
136 function check_data()
137 {
138         global $Refs;
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 (!$Refs->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, ST_SUPPINVOICE)) 
154         {
155                 display_error(_("The entered reference is already in use."));
156                 set_focus('reference');
157                 return false;
158         }
159
160         if (!$Refs->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         if (is_reference_already_there($_SESSION['supp_trans']->supplier_id, $_POST['supp_reference']))
187         {       /*Transaction reference already entered */
188                 display_error(_("This invoice number has already been entered. It cannot be entered again." . " (" . $_POST['supp_reference'] . ")"));
189                 return false;
190         }
191
192         return true;
193 }
194
195 //--------------------------------------------------------------------------------------------------
196
197 function handle_commit_invoice()
198 {
199         copy_to_trans($_SESSION['supp_trans']);
200
201         if (!check_data())
202                 return;
203
204         $invoice_no = add_supp_invoice($_SESSION['supp_trans']);
205
206     $_SESSION['supp_trans']->clear_items();
207     unset($_SESSION['supp_trans']);
208
209         meta_forward($_SERVER['PHP_SELF'], "AddedID=$invoice_no");
210 }
211
212 //--------------------------------------------------------------------------------------------------
213
214 if (isset($_POST['PostInvoice']))
215 {
216         handle_commit_invoice();
217 }
218
219 function check_item_data($n)
220 {
221         global $check_price_charged_vs_order_price,
222                 $check_qty_charged_vs_del_qty, $SysPrefs;
223         if (!check_num('this_quantity_inv'.$n, 0) || input_num('this_quantity_inv'.$n)==0)
224         {
225                 display_error( _("The quantity to invoice must be numeric and greater than zero."));
226                 set_focus('this_quantity_inv'.$n);
227                 return false;
228         }
229
230         if (!check_num('ChgPrice'.$n))
231         {
232                 display_error( _("The price is not numeric."));
233                 set_focus('ChgPrice'.$n);
234                 return false;
235         }
236
237         $margin = $SysPrefs->over_charge_allowance();
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 + ($margin/ 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 :") . $margin . "%");
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+ ($margin / 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 :") . $margin . "%");
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 $id2 = -1;
329 if ($_SESSION["wa_current_user"]->can_access('SA_GRNDELETE'))
330 {
331         $id2 = find_submit('void_item_id');
332         if ($id2 != -1) 
333         {
334                 remove_not_invoice_item($id2);
335                 display_notification(sprintf(_('All yet non-invoiced items on delivery line # %d has been removed.'), $id2));
336
337         }               
338 }
339
340 if (isset($_POST['go']))
341 {
342         $Ajax->activate('gl_items');
343         display_quick_entries($_SESSION['supp_trans'], $_POST['qid'], input_num('totamount'), QE_SUPPINV);
344         $_POST['totamount'] = price_format(0); $Ajax->activate('totamount');
345         $Ajax->activate('inv_tot');
346 }
347
348 start_form();
349
350 invoice_header($_SESSION['supp_trans']);
351
352 if ($_POST['supplier_id']=='') 
353         display_error('No supplier found for entered search text');
354 else {
355         start_outer_table("$table_style2 width=98%", 5);
356
357         display_grn_items($_SESSION['supp_trans'], 1);
358
359         display_gl_items($_SESSION['supp_trans'], 1);
360
361         div_start('inv_tot');
362         invoice_totals($_SESSION['supp_trans']);
363         div_end();
364
365         end_outer_table(0, false);
366 }
367
368 //-----------------------------------------------------------------------------------------
369
370 if ($id != -1 || $id2 != -1)
371 {
372         $Ajax->activate('grn_items');
373         $Ajax->activate('inv_tot');
374 }
375
376 if (get_post('AddGLCodeToTrans'))
377         $Ajax->activate('inv_tot');
378
379 br();
380 submit_center('PostInvoice', _("Enter Invoice"), true, '', 'default');
381 br();
382
383 end_form();
384
385 //--------------------------------------------------------------------------------------------------
386
387 end_page();
388 ?>