4a5aa39dea106fac0d1171781303a6f8ecc8066e
[fa-stable.git] / purchasing / po_entry_items.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 $path_to_root = "..";
13 $page_security = 'SA_PURCHASEORDER';
14 include_once($path_to_root . "/purchasing/includes/po_class.inc");
15 include_once($path_to_root . "/includes/session.inc");
16 include_once($path_to_root . "/purchasing/includes/purchasing_ui.inc");
17 include_once($path_to_root . "/purchasing/includes/db/suppliers_db.inc");
18 include_once($path_to_root . "/reporting/includes/reporting.inc");
19
20 set_page_security( @$_SESSION['PO']->trans_type,
21         array(  ST_PURCHORDER => 'SA_PURCHASEORDER',
22                         ST_SUPPRECEIVE => 'SA_GRN',
23                         ST_SUPPINVOICE => 'SA_SUPPLIERINVOICE'),
24         array(  'NewOrder' => 'SA_PURCHASEORDER',
25                         'ModifyOrderNumber' => 'SA_PURCHASEORDER',
26                         'AddedID' => 'SA_PURCHASEORDER',
27                         'NewGRN' => 'SA_GRN',
28                         'AddedGRN' => 'SA_GRN',
29                         'NewInvoice' => 'SA_SUPPLIERINVOICE',
30                         'AddedPI' => 'SA_SUPPLIERINVOICE')
31 );
32
33 $js = '';
34 if ($SysPrefs->use_popup_windows)
35         $js .= get_js_open_window(900, 500);
36 if (user_use_date_picker())
37         $js .= get_js_date_picker();
38
39 if (isset($_GET['ModifyOrderNumber']) && is_numeric($_GET['ModifyOrderNumber'])) {
40
41         $_SESSION['page_title'] = _($help_context = "Modify Purchase Order #") . $_GET['ModifyOrderNumber'];
42         create_new_po(ST_PURCHORDER, $_GET['ModifyOrderNumber']);
43         copy_from_cart();
44 } elseif (isset($_GET['NewOrder'])) {
45
46         $_SESSION['page_title'] = _($help_context = "Purchase Order Entry");
47         create_new_po(ST_PURCHORDER, 0);
48         copy_from_cart();
49 } elseif (isset($_GET['NewGRN'])) {
50
51         $_SESSION['page_title'] = _($help_context = "Direct GRN Entry");
52         create_new_po(ST_SUPPRECEIVE, 0);
53         copy_from_cart();
54 } elseif (isset($_GET['NewInvoice'])) {
55
56         $_SESSION['page_title'] = _($help_context = "Direct Purchase Invoice Entry");
57         create_new_po(ST_SUPPINVOICE, 0);
58         copy_from_cart();
59 }
60
61 page($_SESSION['page_title'], false, false, "", $js);
62
63 if (isset($_GET['ModifyOrderNumber']))
64         check_is_editable(ST_PURCHORDER, $_GET['ModifyOrderNumber']);
65
66 //---------------------------------------------------------------------------------------------------
67
68 check_db_has_suppliers(_("There are no suppliers defined in the system."));
69
70 check_db_has_purchasable_items(_("There are no purchasable inventory items defined in the system."));
71
72 //---------------------------------------------------------------------------------------------------------------
73
74 if (isset($_GET['AddedID'])) 
75 {
76         $order_no = $_GET['AddedID'];
77         $trans_type = ST_PURCHORDER;    
78
79         if (!isset($_GET['Updated']))
80                 display_notification_centered(_("Purchase Order has been entered"));
81         else
82                 display_notification_centered(_("Purchase Order has been updated") . " #$order_no");
83         display_note(get_trans_view_str($trans_type, $order_no, _("&View this order")), 0, 1);
84
85         display_note(print_document_link($order_no, _("&Print This Order"), true, $trans_type), 0, 1);
86
87         display_note(print_document_link($order_no, _("&Email This Order"), true, $trans_type, false, "printlink", "", 1));
88
89         hyperlink_params($path_to_root . "/purchasing/po_receive_items.php", _("&Receive Items on this Purchase Order"), "PONumber=$order_no");
90
91         hyperlink_params($_SERVER['PHP_SELF'], _("Enter &Another Purchase Order"), "NewOrder=yes");
92         
93         hyperlink_no_params($path_to_root."/purchasing/inquiry/po_search.php", _("Select An &Outstanding Purchase Order"));
94         
95         display_footer_exit();  
96
97 } elseif (isset($_GET['AddedGRN'])) {
98
99         $trans_no = $_GET['AddedGRN'];
100         $trans_type = ST_SUPPRECEIVE;
101
102         display_notification_centered(_("Direct GRN has been entered"));
103
104         display_note(get_trans_view_str($trans_type, $trans_no, _("&View this GRN")), 0);
105
106     $clearing_act = get_company_pref('grn_clearing_act');
107         if ($clearing_act)      
108                 display_note(get_gl_view_str($trans_type, $trans_no, _("View the GL Journal Entries for this Delivery")), 1);
109 // not yet
110 //      display_note(print_document_link($trans_no, _("&Print This GRN"), true, $trans_type), 0, 1);
111
112         hyperlink_params("$path_to_root/purchasing/supplier_invoice.php",
113                 _("Entry purchase &invoice for this receival"), "New=1");
114
115         hyperlink_params("$path_to_root/admin/attachments.php", _("Add an Attachment"), 
116                 "filterType=$trans_type&trans_no=$trans_no");
117
118         hyperlink_params($_SERVER['PHP_SELF'], _("Enter &Another GRN"), "NewGRN=Yes");
119         
120         display_footer_exit();  
121
122 } elseif (isset($_GET['AddedPI'])) {
123
124         $trans_no = $_GET['AddedPI'];
125         $trans_type = ST_SUPPINVOICE;
126
127         display_notification_centered(_("Direct Purchase Invoice has been entered"));
128
129         display_note(get_trans_view_str($trans_type, $trans_no, _("&View this Invoice")), 0);
130
131 // not yet
132 //      display_note(print_document_link($trans_no, _("&Print This Invoice"), true, $trans_type), 0, 1);
133
134         display_note(get_gl_view_str($trans_type, $trans_no, _("View the GL Journal Entries for this Invoice")), 1);
135
136         hyperlink_params("$path_to_root/purchasing/supplier_payment.php", _("Entry supplier &payment for this invoice"),
137                 "trans_type=$trans_type&PInvoice=".$trans_no);
138
139         hyperlink_params("$path_to_root/admin/attachments.php", _("Add an Attachment"), 
140                 "filterType=$trans_type&trans_no=$trans_no");
141
142         hyperlink_params($_SERVER['PHP_SELF'], _("Enter &Another Direct Invoice"), "NewInvoice=Yes");
143         
144         display_footer_exit();  
145 }
146 //--------------------------------------------------------------------------------------------------
147
148 function line_start_focus() {
149   global        $Ajax;
150
151   $Ajax->activate('items_table');
152   set_focus('_stock_id_edit');
153 }
154 //--------------------------------------------------------------------------------------------------
155
156 function unset_form_variables() {
157         unset($_POST['stock_id']);
158     unset($_POST['qty']);
159     unset($_POST['price']);
160     unset($_POST['req_del_date']);
161 }
162
163 //---------------------------------------------------------------------------------------------------
164
165 function handle_delete_item($line_no)
166 {
167         if($_SESSION['PO']->some_already_received($line_no) == 0)
168         {
169                 $_SESSION['PO']->remove_from_order($line_no);
170                 unset_form_variables();
171         } 
172         else 
173         {
174                 display_error(_("This item cannot be deleted because some of it has already been received."));
175         }       
176     line_start_focus();
177 }
178
179 //---------------------------------------------------------------------------------------------------
180
181 function handle_cancel_po()
182 {
183         global $path_to_root;
184         
185         //need to check that not already dispatched or invoiced by the supplier
186         if(($_SESSION['PO']->order_no != 0) && 
187                 $_SESSION['PO']->any_already_received() == 1)
188         {
189                 display_error(_("This order cannot be cancelled because some of it has already been received.") 
190                         . "<br>" . _("The line item quantities may be modified to quantities more than already received. prices cannot be altered for lines that have already been received and quantities cannot be reduced below the quantity already received."));
191                 return;
192         }
193         
194         if($_SESSION['PO']->order_no != 0)
195         {
196                 delete_po($_SESSION['PO']->order_no);
197         } else {
198                 unset($_SESSION['PO']);
199                 meta_forward($path_to_root.'/index.php','application=AP');
200         }
201
202         $_SESSION['PO']->clear_items();
203         $_SESSION['PO'] = new purch_order;
204
205         display_notification(_("This purchase order has been cancelled."));
206
207         hyperlink_params($path_to_root . "/purchasing/po_entry_items.php", _("Enter a new purchase order"), "NewOrder=Yes");
208         echo "<br>";
209
210         end_page();
211         exit;
212 }
213
214 //---------------------------------------------------------------------------------------------------
215
216 function check_data()
217 {
218         if(!get_post('stock_id_text', true)) {
219                 display_error( _("Item description cannot be empty."));
220                 set_focus('stock_id_edit');
221                 return false;
222         }
223
224         $dec = get_qty_dec($_POST['stock_id']);
225         $min = 1 / pow(10, $dec);
226     if (!check_num('qty',$min))
227     {
228         $min = number_format2($min, $dec);
229                 display_error(_("The quantity of the order item must be numeric and not less than ").$min);
230                 set_focus('qty');
231                 return false;
232     }
233
234     if (!check_num('price', 0))
235     {
236                 display_error(_("The price entered must be numeric and not less than zero."));
237                 set_focus('price');
238                 return false;      
239     }
240     if ($_SESSION['PO']->trans_type == ST_PURCHORDER && !is_date($_POST['req_del_date'])){
241                 display_error(_("The date entered is in an invalid format."));
242                 set_focus('req_del_date');
243                 return false;            
244     }
245      
246     return true;        
247 }
248
249 //---------------------------------------------------------------------------------------------------
250
251 function handle_update_item()
252 {
253         $allow_update = check_data(); 
254
255         if ($allow_update)
256         {
257                 if ($_SESSION['PO']->line_items[$_POST['line_no']]->qty_inv > input_num('qty') ||
258                         $_SESSION['PO']->line_items[$_POST['line_no']]->qty_received > input_num('qty'))
259                 {
260                         display_error(_("You are attempting to make the quantity ordered a quantity less than has already been invoiced or received.  This is prohibited.") .
261                                 "<br>" . _("The quantity received can only be modified by entering a negative receipt and the quantity invoiced can only be reduced by entering a credit note against this item."));
262                         set_focus('qty');
263                         return;
264                 }
265         
266                 $_SESSION['PO']->update_order_item($_POST['line_no'], input_num('qty'), input_num('price'),
267                         @$_POST['req_del_date'], $_POST['item_description'] );
268                 unset_form_variables();
269         }       
270     line_start_focus();
271 }
272
273 //---------------------------------------------------------------------------------------------------
274
275 function handle_add_new_item()
276 {
277         $allow_update = check_data();
278         
279         if ($allow_update == true)
280         { 
281                 if (count($_SESSION['PO']->line_items) > 0)
282                 {
283                     foreach ($_SESSION['PO']->line_items as $order_item) 
284                     {
285                         /* do a loop round the items on the order to see that the item
286                         is not already on this order */
287                             if (($order_item->stock_id == $_POST['stock_id'])) 
288                             {
289                                         display_warning(_("The selected item is already on this order."));
290                             }
291                     } /* end of the foreach loop to look for pre-existing items of the same code */
292                 }
293
294                 if ($allow_update == true)
295                 {
296                         $result = get_short_info($_POST['stock_id']);
297
298                         if (db_num_rows($result) == 0)
299                         {
300                                 $allow_update = false;
301                         }
302
303                         if ($allow_update)
304                         {
305                                 $myrow = db_fetch($result);
306                                 $_SESSION['PO']->add_to_order (count($_SESSION['PO']->line_items), $_POST['stock_id'], input_num('qty'), 
307                                         get_post('stock_id_text'), //$myrow["description"], 
308                                         input_num('price'), '', // $myrow["units"], (retrived in cart)
309                                         $_SESSION['PO']->trans_type == ST_PURCHORDER ? $_POST['req_del_date'] : '', 0, 0);
310
311                                 unset_form_variables();
312                                 $_POST['stock_id']      = "";
313                         } 
314                         else 
315                         {
316                              display_error(_("The selected item does not exist or it is a kit part and therefore cannot be purchased."));
317                         }
318
319                 } /* end of if not already on the order and allow input was true*/
320     }
321         line_start_focus();
322 }
323
324 //---------------------------------------------------------------------------------------------------
325
326 function can_commit()
327 {
328         global $Refs;
329
330         if (!get_post('supplier_id')) 
331         {
332                 display_error(_("There is no supplier selected."));
333                 set_focus('supplier_id');
334                 return false;
335         } 
336
337         if (!is_date($_POST['OrderDate'])) 
338         {
339                 display_error(_("The entered order date is invalid."));
340                 set_focus('OrderDate');
341                 return false;
342         } 
343         if (($_SESSION['PO']->trans_type == ST_SUPPRECEIVE || $_SESSION['PO']->trans_type == ST_SUPPINVOICE) 
344                 && !is_date_in_fiscalyear($_POST['OrderDate'])) {
345                 display_error(_("The entered date is out of fiscal year or is closed for further data entry."));
346                 set_focus('OrderDate');
347                 return false;
348         }
349
350         if (($_SESSION['PO']->trans_type==ST_SUPPINVOICE) && !is_date($_POST['due_date'])) 
351         {
352                 display_error(_("The entered due date is invalid."));
353                 set_focus('due_date');
354                 return false;
355         } 
356
357         if (!$_SESSION['PO']->order_no) 
358         {
359         if (!check_reference(get_post('ref'), $_SESSION['PO']->trans_type))
360         {
361                         set_focus('ref');
362                 return false;
363         }
364         }
365
366         if ($_SESSION['PO']->trans_type == ST_SUPPINVOICE && trim(get_post('supp_ref')) == false)
367         {
368                 display_error(_("You must enter a supplier's invoice reference."));
369                 set_focus('supp_ref');
370                 return false;
371         }
372         if ($_SESSION['PO']->trans_type==ST_SUPPINVOICE 
373                 && is_reference_already_there($_SESSION['PO']->supplier_id, get_post('supp_ref'), $_SESSION['PO']->order_no))
374         {
375                 display_error(_("This invoice number has already been entered. It cannot be entered again.") . " (" . get_post('supp_ref') . ")");
376                 set_focus('supp_ref');
377                 return false;
378         }
379         if ($_SESSION['PO']->trans_type == ST_PURCHORDER && get_post('delivery_address') == '')
380         {
381                 display_error(_("There is no delivery address specified."));
382                 set_focus('delivery_address');
383                 return false;
384         } 
385         if (get_post('StkLocation') == '')
386         {
387                 display_error(_("There is no location specified to move any items into."));
388                 set_focus('StkLocation');
389                 return false;
390         } 
391         if (!db_has_currency_rates($_SESSION['PO']->curr_code, $_POST['OrderDate']))
392                 return false;
393         if ($_SESSION['PO']->order_has_items() == false)
394         {
395         display_error (_("The order cannot be placed because there are no lines entered on this order."));
396         return false;
397         }
398         if (floatcmp(input_num('prep_amount'), $_SESSION['PO']->get_trans_total()) > 0)
399         {
400                 display_error(_("Required prepayment is greater than total invoice value."));
401                 set_focus('prep_amount');
402                 return false;
403         }
404
405         return true;
406 }
407
408 function handle_commit_order()
409 {
410         $cart = &$_SESSION['PO'];
411
412         if (can_commit()) {
413
414                 copy_to_cart();
415                 new_doc_date($cart->orig_order_date);
416                 if ($cart->order_no == 0) { // new po/grn/invoice
417                         $trans_no = add_direct_supp_trans($cart);
418                         if ($trans_no) {
419                                 unset($_SESSION['PO']);
420                                 if ($cart->trans_type == ST_PURCHORDER)
421                                         meta_forward($_SERVER['PHP_SELF'], "AddedID=$trans_no");
422                                 elseif ($cart->trans_type == ST_SUPPRECEIVE)
423                                         meta_forward($_SERVER['PHP_SELF'], "AddedGRN=$trans_no");
424                                 else
425                                         meta_forward($_SERVER['PHP_SELF'], "AddedPI=$trans_no");
426                         }
427                 } else { // order modification
428                         $order_no = update_po($cart);
429                         unset($_SESSION['PO']);
430                 meta_forward($_SERVER['PHP_SELF'], "AddedID=$order_no&Updated=1");      
431                 }
432         }
433 }
434 //---------------------------------------------------------------------------------------------------
435 if (isset($_POST['update'])) {
436         copy_to_cart();
437         $Ajax->activate('items_table');
438 }
439
440 $id = find_submit('Delete');
441 if ($id != -1)
442         handle_delete_item($id);
443
444 if (isset($_POST['Commit']))
445 {
446         handle_commit_order();
447 }
448 if (isset($_POST['UpdateLine']))
449         handle_update_item();
450
451 if (isset($_POST['EnterLine']))
452         handle_add_new_item();
453
454 if (isset($_POST['CancelOrder'])) 
455         handle_cancel_po();
456
457 if (isset($_POST['CancelUpdate']))
458         unset_form_variables();
459
460 if (isset($_POST['CancelUpdate']) || isset($_POST['UpdateLine'])) {
461         line_start_focus();
462 }
463
464 //---------------------------------------------------------------------------------------------------
465
466 start_form();
467
468 display_po_header($_SESSION['PO']);
469 echo "<br>";
470
471 display_po_items($_SESSION['PO']);
472
473 start_table(TABLESTYLE2);
474
475
476 if ($_SESSION['PO']->trans_type == ST_SUPPINVOICE) {
477         cash_accounts_list_row(_("Payment:"), 'cash_account', null, false, _('Delayed'));
478 }
479
480 textarea_row(_("Memo:"), 'Comments', null, 70, 4);
481
482 end_table(1);
483
484 div_start('controls', 'items_table');
485 $process_txt = _("Place Order");
486 $update_txt = _("Update Order");
487 $cancel_txt = _("Cancel Order");
488 if ($_SESSION['PO']->trans_type == ST_SUPPRECEIVE) {
489         $process_txt = _("Process GRN");
490         $update_txt = _("Update GRN");
491         $cancel_txt = _("Cancel GRN");
492 }       
493 elseif ($_SESSION['PO']->trans_type == ST_SUPPINVOICE) {
494         $process_txt = _("Process Invoice");
495         $update_txt = _("Update Invoice");
496         $cancel_txt = _("Cancel Invoice");
497 }       
498 if ($_SESSION['PO']->order_has_items()) 
499 {
500         if ($_SESSION['PO']->order_no)
501                 submit_center_first('Commit', $update_txt, '', 'default');
502         else
503                 submit_center_first('Commit', $process_txt, '', 'default');
504         submit_center_last('CancelOrder', $cancel_txt);         
505 }
506 else
507         submit_center('CancelOrder', $cancel_txt, true, false, 'cancel');
508 div_end();
509 //---------------------------------------------------------------------------------------------------
510
511 end_form();
512 end_page();