Added tax calcualtion algorithm selection in sales and purchasing, driven by company...
[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(ST_SUPPINVOICE);
69 }
70
71 //--------------------------------------------------------------------------------------------------
72 function clear_fields()
73 {
74         global $Ajax;
75         
76         unset($_POST['gl_code']);
77         unset($_POST['dimension_id']);
78         unset($_POST['dimension2_id']);
79         unset($_POST['amount']);
80         unset($_POST['memo_']);
81         unset($_POST['AddGLCodeToTrans']);
82         $Ajax->activate('gl_items');
83         set_focus('gl_code');
84 }
85 //------------------------------------------------------------------------------------------------
86 //      GL postings are often entered in the same form to two accounts
87 //  so fileds are cleared only on user demand.
88 //
89 if (isset($_POST['ClearFields']))
90 {
91         clear_fields();
92 }
93
94 if (isset($_POST['AddGLCodeToTrans'])){
95
96         $Ajax->activate('gl_items');
97         $input_error = false;
98
99         $result = get_gl_account_info($_POST['gl_code']);
100         if (db_num_rows($result) == 0)
101         {
102                 display_error(_("The account code entered is not a valid code, this line cannot be added to the transaction."));
103                 set_focus('gl_code');
104                 $input_error = true;
105         }
106         else
107         {
108                 $myrow = db_fetch_row($result);
109                 $gl_act_name = $myrow[1];
110                 if (!check_num('amount'))
111                 {
112                         display_error(_("The amount entered is not numeric. This line cannot be added to the transaction."));
113                         set_focus('amount');
114                         $input_error = true;
115                 }
116         }
117
118         if (!is_tax_gl_unique(get_post('gl_code'))) {
119                 display_error(_("Cannot post to GL account used by more than one tax type."));
120                 set_focus('gl_code');
121                 $input_error = true;
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         global $Refs;
138
139         if (!$_SESSION['supp_trans']->is_valid_trans_to_post())
140         {
141                 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."));
142                 return false;
143         }
144
145         if (!$Refs->is_valid($_SESSION['supp_trans']->reference)) 
146         {
147                 display_error(_("You must enter an invoice reference."));
148                 set_focus('reference');
149                 return false;
150         }
151
152         if (!is_new_reference($_SESSION['supp_trans']->reference, ST_SUPPINVOICE)) 
153         {
154                 display_error(_("The entered reference is already in use."));
155                 set_focus('reference');
156                 return false;
157         }
158
159         if (!$Refs->is_valid($_SESSION['supp_trans']->supp_reference)) 
160         {
161                 display_error(_("You must enter a supplier's invoice reference."));
162                 set_focus('supp_reference');
163                 return false;
164         }
165
166         if (!is_date( $_SESSION['supp_trans']->tran_date))
167         {
168                 display_error(_("The invoice as entered cannot be processed because the invoice date is in an incorrect format."));
169                 set_focus('trans_date');
170                 return false;
171         } 
172         elseif (!is_date_in_fiscalyear($_SESSION['supp_trans']->tran_date)) 
173         {
174                 display_error(_("The entered date is not in fiscal year."));
175                 set_focus('trans_date');
176                 return false;
177         }
178         if (!is_date( $_SESSION['supp_trans']->due_date))
179         {
180                 display_error(_("The invoice as entered cannot be processed because the due date is in an incorrect format."));
181                 set_focus('due_date');
182                 return false;
183         }
184
185         if (is_reference_already_there($_SESSION['supp_trans']->supplier_id, $_POST['supp_reference']))
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         $inv = $_SESSION['supp_trans'];
203         $invoice_no = add_supp_invoice($inv);
204
205         // presume supplier data need correction
206         if ($inv->stored_algorithm != $inv->tax_algorithm)
207                 update_supp_tax_algorithm($inv->supplier_id, $inv->tax_algorithm);
208
209     $_SESSION['supp_trans']->clear_items();
210     unset($_SESSION['supp_trans']);
211
212         meta_forward($_SERVER['PHP_SELF'], "AddedID=$invoice_no");
213 }
214
215 //--------------------------------------------------------------------------------------------------
216
217 if (isset($_POST['PostInvoice']))
218 {
219         handle_commit_invoice();
220 }
221
222 function check_item_data($n)
223 {
224         global $check_price_charged_vs_order_price,
225                 $check_qty_charged_vs_del_qty, $SysPrefs;
226
227         if (!check_num('this_quantity_inv'.$n, 0) || input_num('this_quantity_inv'.$n)==0)
228         {
229                 display_error( _("The quantity to invoice must be numeric and greater than zero."));
230                 set_focus('this_quantity_inv'.$n);
231                 return false;
232         }
233
234         if (!check_num('ChgPrice'.$n))
235         {
236                 display_error( _("The price is not numeric."));
237                 set_focus('ChgPrice'.$n);
238                 return false;
239         }
240
241         $margin = $SysPrefs->over_charge_allowance();
242         if ($check_price_charged_vs_order_price == True)
243         {
244                 if ($_POST['order_price'.$n]!=input_num('ChgPrice'.$n)) {
245                      if ($_POST['order_price'.$n]==0 ||
246                                 input_num('ChgPrice'.$n)/$_POST['order_price'.$n] >
247                             (1 + ($margin/ 100)))
248                     {
249                         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.") .
250                         _("The over-charge percentage allowance is :") . $margin . "%");
251                         set_focus('ChgPrice'.$n);
252                         return false;
253                     }
254                 }
255         }
256
257         if ($check_qty_charged_vs_del_qty == True)
258         {
259                 if (input_num('this_quantity_inv'.$n) / ($_POST['qty_recd'.$n] - $_POST['prev_quantity_inv'.$n]) >
260                         (1+ ($margin / 100)))
261                 {
262                         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.")
263                         . _("The over-charge percentage allowance is :") . $margin . "%");
264                         set_focus('this_quantity_inv'.$n);
265                         return false;
266                 }
267         }
268
269         return true;
270 }
271
272 function commit_item_data($n)
273 {
274         if (check_item_data($n))
275         {
276         if (input_num('this_quantity_inv'.$n) >= ($_POST['qty_recd'.$n] - $_POST['prev_quantity_inv'.$n]))
277         {
278                 $complete = true;
279         }
280         else
281         {
282                 $complete = false;
283         }
284
285                 $_SESSION['supp_trans']->add_grn_to_trans($n, $_POST['po_detail_item'.$n],
286                         $_POST['item_code'.$n], $_POST['item_description'.$n], $_POST['qty_recd'.$n],
287                         $_POST['prev_quantity_inv'.$n], input_num('this_quantity_inv'.$n),
288                         $_POST['order_price'.$n], input_num('ChgPrice'.$n), $complete,
289                         $_POST['std_cost_unit'.$n], "");
290         }
291 }
292
293 //-----------------------------------------------------------------------------------------
294
295 $id = find_submit('grn_item_id');
296 if ($id != -1)
297 {
298         commit_item_data($id);
299 }
300
301 if (isset($_POST['InvGRNAll']))
302 {
303         foreach($_POST as $postkey=>$postval )
304     {
305                 if (strpos($postkey, "qty_recd") === 0)
306                 {
307                         $id = substr($postkey, strlen("qty_recd"));
308                         $id = (int)$id;
309                         commit_item_data($id);
310                 }
311     }
312 }       
313
314 //--------------------------------------------------------------------------------------------------
315 $id3 = find_submit('Delete');
316 if ($id3 != -1)
317 {
318         $_SESSION['supp_trans']->remove_grn_from_trans($id3);
319         $Ajax->activate('grn_items');
320         $Ajax->activate('inv_tot');
321 }
322
323 $id4 = find_submit('Delete2');
324 if ($id4 != -1)
325 {
326         $_SESSION['supp_trans']->remove_gl_codes_from_trans($id4);
327         clear_fields();
328         $Ajax->activate('gl_items');
329         $Ajax->activate('inv_tot');
330 }
331
332 $id2 = -1;
333 if ($_SESSION["wa_current_user"]->can_access('SA_GRNDELETE'))
334 {
335         $id2 = find_submit('void_item_id');
336         if ($id2 != -1) 
337         {
338                 remove_not_invoice_item($id2);
339                 display_notification(sprintf(_('All yet non-invoiced items on delivery line # %d has been removed.'), $id2));
340
341         }               
342 }
343
344 if (isset($_POST['go']))
345 {
346         $Ajax->activate('gl_items');
347         display_quick_entries($_SESSION['supp_trans'], $_POST['qid'], input_num('totamount'), QE_SUPPINV);
348         $_POST['totamount'] = price_format(0); $Ajax->activate('totamount');
349         $Ajax->activate('inv_tot');
350 }
351
352 start_form();
353
354 invoice_header($_SESSION['supp_trans']);
355
356 if ($_POST['supplier_id']=='') 
357                 display_error(_("There is no supplier selected."));
358 else {
359         display_grn_items($_SESSION['supp_trans'], 1);
360
361         display_gl_items($_SESSION['supp_trans'], 1);
362
363         div_start('inv_tot');
364         invoice_totals($_SESSION['supp_trans']);
365         div_end();
366
367 }
368
369 //-----------------------------------------------------------------------------------------
370
371 if ($id != -1 || $id2 != -1)
372 {
373         $Ajax->activate('grn_items');
374         $Ajax->activate('inv_tot');
375 }
376
377 if (get_post('AddGLCodeToTrans'))
378         $Ajax->activate('inv_tot');
379
380 br();
381 submit_center('PostInvoice', _("Enter Invoice"), true, '', 'default');
382 br();
383
384 end_form();
385
386 //--------------------------------------------------------------------------------------------------
387
388 end_page();
389 ?>