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 ***********************************************************************/
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");
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',
27 'NewInvoice' => 'SA_SUPPLIERINVOICE')
31 if ($use_popup_windows)
32 $js .= get_js_open_window(900, 500);
34 $js .= get_js_date_picker();
36 if (isset($_GET['ModifyOrderNumber']) && is_numeric($_GET['ModifyOrderNumber'])) {
38 $_SESSION['page_title'] = _($help_context = "Modify Purchase Order #") . $_GET['ModifyOrderNumber'];
39 create_new_po(ST_PURCHORDER, $_GET['ModifyOrderNumber']);
41 } elseif (isset($_GET['NewOrder'])) {
43 $_SESSION['page_title'] = _($help_context = "Purchase Order Entry");
44 create_new_po(ST_PURCHORDER, 0);
46 } elseif (isset($_GET['NewGRN'])) {
48 $_SESSION['page_title'] = _($help_context = "Direct GRN Entry");
49 create_new_po(ST_SUPPRECEIVE, 0);
51 } elseif (isset($_GET['NewInvoice'])) {
53 $_SESSION['page_title'] = _($help_context = "Direct Purchase Invoice Entry");
54 create_new_po(ST_SUPPINVOICE, 0);
58 page($_SESSION['page_title'], false, false, "", $js);
60 //---------------------------------------------------------------------------------------------------
62 check_db_has_suppliers(_("There are no suppliers defined in the system."));
64 check_db_has_purchasable_items(_("There are no purchasable inventory items defined in the system."));
66 //---------------------------------------------------------------------------------------------------------------
68 if (isset($_GET['AddedID']))
70 $order_no = $_GET['AddedID'];
71 $trans_type = ST_PURCHORDER;
73 if (!isset($_GET['Updated']))
74 display_notification_centered(_("Purchase Order has been entered"));
76 display_notification_centered(_("Purchase Order has been updated") . " #$order_no");
77 display_note(get_trans_view_str($trans_type, $order_no, _("&View this order")), 0, 1);
79 display_note(print_document_link($order_no, _("&Print This Order"), true, $trans_type), 0, 1);
81 display_note(print_document_link($order_no, _("&Email This Order"), true, $trans_type, false, "printlink", "", 1));
83 hyperlink_params($path_to_root . "/purchasing/po_receive_items.php", _("&Receive Items on this Purchase Order"), "PONumber=$order_no");
85 hyperlink_params($_SERVER['PHP_SELF'], _("Enter &Another Purchase Order"), "NewOrder=yes");
87 hyperlink_no_params($path_to_root."/purchasing/inquiry/po_search.php", _("Select An &Outstanding Purchase Order"));
89 display_footer_exit();
91 } elseif (isset($_GET['AddedGRN'])) {
93 $trans_no = $_GET['AddedGRN'];
94 $trans_type = ST_SUPPRECEIVE;
96 display_notification_centered(_("Direct GRN has been entered"));
98 display_note(get_trans_view_str($trans_type, $trans_no, _("&View this GRN")), 0);
101 // display_note(print_document_link($trans_no, _("&Print This GRN"), true, $trans_type), 0, 1);
103 hyperlink_params("$path_to_root/purchasing/supplier_invoice.php",
104 _("Entry purchase &invoice for this receival"), "New=1");
106 hyperlink_params("$path_to_root/admin/attachments.php", _("Add an Attachment"),
107 "filterType=$trans_type&trans_no=$trans_no");
109 hyperlink_params($_SERVER['PHP_SELF'], _("Enter &Another GRN"), "NewGRN=Yes");
111 display_footer_exit();
113 } elseif (isset($_GET['AddedPI'])) {
115 $trans_no = $_GET['AddedPI'];
116 $trans_type = ST_SUPPINVOICE;
118 display_notification_centered(_("Direct Purchase Invoice has been entered"));
120 display_note(get_trans_view_str($trans_type, $trans_no, _("&View this Invoice")), 0);
123 // display_note(print_document_link($trans_no, _("&Print This Invoice"), true, $trans_type), 0, 1);
125 display_note(get_gl_view_str($trans_type, $trans_no, _("View the GL Journal Entries for this Invoice")), 1);
127 hyperlink_params("$path_to_root/purchasing/supplier_payment.php", _("Entry supplier &payment for this invoice"),
128 "PInvoice=".$trans_no);
130 hyperlink_params("$path_to_root/admin/attachments.php", _("Add an Attachment"),
131 "filterType=$trans_type&trans_no=$trans_no");
133 hyperlink_params($_SERVER['PHP_SELF'], _("Enter &Another Direct Invoice"), "NewInvoice=Yes");
135 display_footer_exit();
137 //--------------------------------------------------------------------------------------------------
139 function line_start_focus() {
142 $Ajax->activate('items_table');
143 set_focus('_stock_id_edit');
145 //--------------------------------------------------------------------------------------------------
147 function unset_form_variables() {
148 unset($_POST['stock_id']);
149 unset($_POST['qty']);
150 unset($_POST['price']);
151 unset($_POST['req_del_date']);
154 //---------------------------------------------------------------------------------------------------
156 function handle_delete_item($line_no)
158 if($_SESSION['PO']->some_already_received($line_no) == 0)
160 $_SESSION['PO']->remove_from_order($line_no);
161 unset_form_variables();
165 display_error(_("This item cannot be deleted because some of it has already been received."));
170 //---------------------------------------------------------------------------------------------------
172 function handle_cancel_po()
174 global $path_to_root;
176 //need to check that not already dispatched or invoiced by the supplier
177 if(($_SESSION['PO']->order_no != 0) &&
178 $_SESSION['PO']->any_already_received() == 1)
180 display_error(_("This order cannot be cancelled because some of it has already been received.")
181 . "<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."));
185 if($_SESSION['PO']->order_no != 0)
187 delete_po($_SESSION['PO']->order_no);
189 unset($_SESSION['PO']);
190 meta_forward($path_to_root.'/index.php','application=AP');
193 $_SESSION['PO']->clear_items();
194 $_SESSION['PO'] = new purch_order;
196 display_notification(_("This purchase order has been cancelled."));
198 hyperlink_params($path_to_root . "/purchasing/po_entry_items.php", _("Enter a new purchase order"), "NewOrder=Yes");
205 //---------------------------------------------------------------------------------------------------
207 function check_data()
209 if(!get_post('stock_id_text', true)) {
210 display_error( _("Item description cannot be empty."));
211 set_focus('stock_id_edit');
215 $dec = get_qty_dec($_POST['stock_id']);
216 $min = 1 / pow(10, $dec);
217 if (!check_num('qty',$min))
219 $min = number_format2($min, $dec);
220 display_error(_("The quantity of the order item must be numeric and not less than ").$min);
225 if (!check_num('price', 0))
227 display_error(_("The price entered must be numeric and not less than zero."));
231 if ($_SESSION['PO']->trans_type == ST_PURCHORDER && !is_date($_POST['req_del_date'])){
232 display_error(_("The date entered is in an invalid format."));
233 set_focus('req_del_date');
240 //---------------------------------------------------------------------------------------------------
242 function handle_update_item()
244 $allow_update = check_data();
248 if ($_SESSION['PO']->line_items[$_POST['line_no']]->qty_inv > input_num('qty') ||
249 $_SESSION['PO']->line_items[$_POST['line_no']]->qty_received > input_num('qty'))
251 display_error(_("You are attempting to make the quantity ordered a quantity less than has already been invoiced or received. This is prohibited.") .
252 "<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."));
257 $_SESSION['PO']->update_order_item($_POST['line_no'], input_num('qty'), input_num('price'),
258 @$_POST['req_del_date'], $_POST['item_description'] );
259 unset_form_variables();
264 //---------------------------------------------------------------------------------------------------
266 function handle_add_new_item()
268 $allow_update = check_data();
270 if ($allow_update == true)
272 if (count($_SESSION['PO']->line_items) > 0)
274 foreach ($_SESSION['PO']->line_items as $order_item)
276 /* do a loop round the items on the order to see that the item
277 is not already on this order */
278 if (($order_item->stock_id == $_POST['stock_id']))
280 display_warning(_("The selected item is already on this order."));
282 } /* end of the foreach loop to look for pre-existing items of the same code */
285 if ($allow_update == true)
287 $result = get_short_info($_POST['stock_id']);
289 if (db_num_rows($result) == 0)
291 $allow_update = false;
296 $myrow = db_fetch($result);
297 $_SESSION['PO']->add_to_order (count($_SESSION['PO']->line_items), $_POST['stock_id'], input_num('qty'),
298 get_post('stock_id_text'), //$myrow["description"],
299 input_num('price'), '', // $myrow["units"], (retrived in cart)
300 $_SESSION['PO']->trans_type == ST_PURCHORDER ? $_POST['req_del_date'] : '', 0, 0);
302 unset_form_variables();
303 $_POST['stock_id'] = "";
307 display_error(_("The selected item does not exist or it is a kit part and therefore cannot be purchased."));
310 } /* end of if not already on the order and allow input was true*/
315 //---------------------------------------------------------------------------------------------------
317 function can_commit()
321 if (!get_post('supplier_id'))
323 display_error(_("There is no supplier selected."));
324 set_focus('supplier_id');
328 if (!is_date($_POST['OrderDate']))
330 display_error(_("The entered order date is invalid."));
331 set_focus('OrderDate');
335 if (($_SESSION['PO']->trans_type==ST_SUPPINVOICE) && !is_date($_POST['due_date']))
337 display_error(_("The entered due date is invalid."));
338 set_focus('due_date');
342 if (!$_SESSION['PO']->order_no)
344 if (!$Refs->is_valid(get_post('ref')))
346 display_error(_("There is no reference entered for this purchase order."));
351 if (!is_new_reference(get_post('ref'), $_SESSION['PO']->trans_type))
353 display_error(_("The entered reference is already in use."));
359 if ($_SESSION['PO']->trans_type == ST_SUPPINVOICE && !$Refs->is_valid(get_post('supp_ref')))
361 display_error(_("You must enter a supplier's invoice reference."));
362 set_focus('supp_ref');
365 if ($_SESSION['PO']->trans_type == ST_PURCHORDER && get_post('delivery_address') == '')
367 display_error(_("There is no delivery address specified."));
368 set_focus('delivery_address');
371 if (get_post('StkLocation') == '')
373 display_error(_("There is no location specified to move any items into."));
374 set_focus('StkLocation');
378 if ($_SESSION['PO']->order_has_items() == false)
380 display_error (_("The order cannot be placed because there are no lines entered on this order."));
387 //---------------------------------------------------------------------------------------------------
389 function handle_commit_order()
391 $cart = &$_SESSION['PO'];
396 if ($cart->trans_type != ST_PURCHORDER) {
397 // for direct grn/invoice set same dates for lines as for whole document
398 foreach ($cart->line_items as $line_no =>$line)
399 $cart->line_items[$line_no]->req_del_date = $cart->orig_order_date;
401 if ($cart->order_no == 0) { // new po/grn/invoice
402 /*its a new order to be inserted */
403 $ref = $cart->reference;
404 if ($cart->trans_type != ST_PURCHORDER) {
405 $cart->reference = 'auto';
406 begin_transaction(); // all db changes as single transaction for direct document
408 $order_no = add_po($cart);
409 new_doc_date($cart->orig_order_date);
410 $cart->order_no = $order_no;
412 if ($cart->trans_type == ST_PURCHORDER) {
413 unset($_SESSION['PO']);
414 meta_forward($_SERVER['PHP_SELF'], "AddedID=$order_no");
417 if ($cart->trans_type == ST_SUPPRECEIVE)
418 $cart->reference = $ref;
419 $cart->Comments = $cart->reference; //grn does not hold supp_ref
420 foreach($cart->line_items as $key => $line)
421 $cart->line_items[$key]->receive_qty = $line->quantity;
422 $grn_no = add_grn($cart);
423 if ($cart->trans_type == ST_SUPPRECEIVE) {
424 commit_transaction(); // save PO+GRN
425 unset($_SESSION['PO']);
426 meta_forward($_SERVER['PHP_SELF'], "AddedGRN=$grn_no");
428 // Direct Purchase Invoice
429 $inv = new supp_trans(ST_SUPPINVOICE);
430 $inv->Comments = $cart->Comments;
431 $inv->supplier_id = $cart->supplier_id;
432 $inv->tran_date = $cart->orig_order_date;
433 $inv->due_date = $cart->due_date;
434 $inv->reference = $ref;
435 $inv->supp_reference = $cart->supp_ref;
436 $inv->tax_included = $cart->tax_included;
437 $supp = get_supplier($cart->supplier_id);
438 $inv->tax_group_id = $supp['tax_group_id'];
439 // $inv->ov_discount 'this isn't used at all'
440 $inv->ov_amount = $inv->ov_gst = 0;
442 foreach($cart->line_items as $key => $line) {
443 $inv->add_grn_to_trans($line->grn_item_id, $line->po_detail_rec, $line->stock_id,
444 $line->item_description, $line->receive_qty, 0, $line->receive_qty,
445 $line->price, $line->price, true, get_standard_cost($line->stock_id), '');
446 $inv->ov_amount += round2(($line->receive_qty * $line->price), user_price_dec());
448 $taxes = $inv->get_taxes($inv->tax_group_id, 0, false);
449 foreach( $taxes as $taxitem) {
450 $inv->ov_gst += round2($taxitem['Value'], user_price_dec());
452 $inv_no = add_supp_invoice($inv);
453 commit_transaction(); // save PO+GRN+PI
454 // FIXME payment for cash terms. (Needs cash account selection)
455 unset($_SESSION['PO']);
456 meta_forward($_SERVER['PHP_SELF'], "AddedPI=$inv_no");
458 else { // order modification
460 $order_no = update_po($cart);
461 unset($_SESSION['PO']);
462 meta_forward($_SERVER['PHP_SELF'], "AddedID=$order_no&Updated=1");
466 //---------------------------------------------------------------------------------------------------
467 $id = find_submit('Delete');
469 handle_delete_item($id);
471 if (isset($_POST['Commit']))
473 handle_commit_order();
475 if (isset($_POST['UpdateLine']))
476 handle_update_item();
478 if (isset($_POST['EnterLine']))
479 handle_add_new_item();
481 if (isset($_POST['CancelOrder']))
484 if (isset($_POST['CancelUpdate']))
485 unset_form_variables();
487 if (isset($_POST['CancelUpdate']) || isset($_POST['UpdateLine'])) {
491 //---------------------------------------------------------------------------------------------------
495 display_po_header($_SESSION['PO']);
498 display_po_items($_SESSION['PO']);
500 start_table(TABLESTYLE2);
501 textarea_row(_("Memo:"), 'Comments', null, 70, 4);
505 div_start('controls', 'items_table');
506 $process_txt = _("Place Order");
507 $update_txt = _("Update Order");
508 $cancel_txt = _("Cancel Order");
509 if ($_SESSION['PO']->trans_type == ST_SUPPRECEIVE) {
510 $process_txt = _("Process GRN");
511 $update_txt = _("Update GRN");
512 $cancel_txt = _("Cancel GRN");
514 elseif ($_SESSION['PO']->trans_type == ST_SUPPINVOICE) {
515 $process_txt = _("Process Invoice");
516 $update_txt = _("Update Invoice");
517 $cancel_txt = _("Cancel Invoice");
519 if ($_SESSION['PO']->order_has_items())
521 if ($_SESSION['PO']->order_no)
522 submit_center_first('Commit', $update_txt, '', 'default');
524 submit_center_first('Commit', $process_txt, '', 'default');
525 submit_center_last('CancelOrder', $cancel_txt);
528 submit_center('CancelOrder', $cancel_txt, true, false, 'cancel');
530 //---------------------------------------------------------------------------------------------------