Rerun. Update button for change of shipping
[fa-stable.git] / sales / includes / ui / sales_order_ui.inc
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 include_once($path_to_root . "/sales/includes/cart_class.inc");
13 include_once($path_to_root . "/includes/manufacturing.inc");
14
15 //--------------------------------------------------------------------------------
16 function add_to_order(&$order, $new_item, $new_item_qty, $price, $discount)
17 {
18         // calculate item price to sum of kit element prices factor for 
19         // value distribution over all exploded kit items
20          $std_price = get_kit_price($new_item, $order->customer_currency, 
21                 $order->sales_type,     $order->price_factor, get_post('OrderDate'), true);
22
23         if ($std_price == 0)
24                 $price_factor = 0;
25         else
26                 $price_factor = $price/$std_price;
27
28         $kit = get_item_kit($new_item);
29         $item_num = db_num_rows($kit);
30
31         while($item = db_fetch($kit)) {
32                 $std_price = get_kit_price($item['stock_id'], $order->customer_currency, 
33                         $order->sales_type,     $order->price_factor, get_post('OrderDate'), true);
34
35                 // rounding differences are included in last price item in kit
36                 $item_num--;
37                 if ($item_num) {
38                         $price -= $item['quantity']*$std_price*$price_factor;
39                         $item_price = $std_price*$price_factor;
40                 } else {
41                         if ($item['quantity']) 
42                                 $price = $price/$item['quantity'];
43                         $item_price = $price;
44                 }
45                 $item_price = round($item_price, user_price_dec());
46
47          if (!$item['is_foreign'] && $item['item_code'] != $item['stock_id'])
48          {      // this is sales kit - recurse 
49                 add_to_order($order, $item['stock_id'], $new_item_qty*$item['quantity'],
50                         $item_price, $discount, $std_price);
51          }
52          else
53          {      // stock item record eventually with foreign code
54
55                 // check duplicate stock item
56                 foreach ($order->line_items as $order_item)
57                 {
58                         if (strcasecmp($order_item->stock_id, $item['stock_id']) == 0)
59                         {
60                                 display_warning(_("For Part :").$item['stock_id']. " " 
61                                         . _("This item is already on this document. You have been warned."));
62                                 break;
63                         }
64                 }
65                 $order->add_to_cart (count($order->line_items), $item['stock_id'], 
66                         $new_item_qty*$item['quantity'], $item_price, $discount);
67          }
68         }
69 }
70 //---------------------------------------------------------------------------------
71
72 function get_customer_details_to_order(&$order, $customer_id, $branch_id)
73 {
74         $ret_error = "";
75
76         $myrow = get_customer_to_order($customer_id);
77
78         $name = $myrow['name'];
79
80         if ($myrow['dissallow_invoices'] == 1)
81                 $ret_error = _("The selected customer account is currently on hold. Please contact the credit control personnel to discuss.");
82
83         $deliver = $myrow['address']; // in case no branch address use company address
84
85         $order->set_customer($customer_id, $name, $myrow['curr_code'], 
86                 $myrow['discount'], $myrow['pymt_discount']);
87
88         // the sales type determines the price list to be used by default
89         $order->set_sales_type($myrow['salestype'], $myrow['sales_type'], $myrow['tax_included'],
90             $myrow['factor']);
91
92         if ($order->trans_type != ST_SALESORDER && $order->trans_type != ST_SALESQUOTE)
93         {
94                 $order->dimension_id = $myrow['dimension_id'];
95                 $order->dimension2_id = $myrow['dimension2_id'];
96         }
97         $result = get_branch_to_order($customer_id, $branch_id);
98
99         if (db_num_rows($result) == 0)
100         {
101                 return _("The selected customer and branch are not valid, or the customer does not have any branches.");
102         }
103
104         $myrow = db_fetch($result);
105
106         $order->set_branch($branch_id, $myrow["tax_group_id"],
107         $myrow["tax_group_name"], $myrow["phone"], $myrow["email"]);
108
109         $address = trim($myrow["br_post_address"]) != '' ? $myrow["br_post_address"]
110                 : (trim($myrow["br_address"]) != '' ? $myrow["br_address"]:$deliver);
111
112         $order->set_delivery($myrow["default_ship_via"], $myrow["br_name"],
113                 $address);
114         if ($order->trans_type == ST_SALESINVOICE) {
115                 $order->due_date = get_invoice_duedate($customer_id, $order->document_date);
116                 if ($order->pos != -1)
117                         $order->cash = date_diff2($order->due_date, Today(), 'd')<2;
118         }
119         if($order->cash ) {
120                 if($order->pos != -1) {
121                 $paym = get_sales_point($order->pos);
122                 $order->set_location($paym["pos_location"], $paym["location_name"]);
123                 }
124         } else
125                 $order->set_location($myrow["default_location"], $myrow["location_name"]);
126                 
127         return $ret_error;
128 }
129
130 //---------------------------------------------------------------------------------
131
132 function display_order_summary($title, &$order, $editable_items=false)
133 {
134         global $table_style, $path_to_root, $SysPrefs;
135
136         display_heading($title);
137
138     div_start('items_table');
139         start_table("$table_style colspan=7 width=90%");
140         $th = array(_("Item Code"), _("Item Description"), _("Quantity"),
141                 _("Delivered"),
142                 _("Unit"), _("Price"), _("Discount %"), _("Total"), "");
143
144         if ($order->trans_no == 0) {
145         unset( $th[3] );
146         }
147
148         if (count($order->line_items))
149              $th[]= '';
150
151         table_header($th);
152
153         $total = 0;
154         $k = 0;  //row colour counter
155
156         $id = find_submit('Edit');
157         $has_marked = false;
158         foreach ($order->line_items as $line_no=>$stock_item)
159         {
160
161                 $line_total = round($stock_item->qty_dispatched * $stock_item->price * (1 - $stock_item->discount_percent),
162                    user_price_dec());
163
164                 $qoh_msg = '';
165                 if (!$editable_items || $id != $line_no)
166                 {
167                         if (!$SysPrefs->allow_negative_stock() && is_inventory_item($stock_item->stock_id)) {
168                                 $qoh = get_qoh_on_date($stock_item->stock_id, 
169                                         $_POST['Location'], $_POST['OrderDate']);
170                                 if ($stock_item->qty_dispatched > $qoh) 
171                                 {
172                                         // oops, we don't have enough of one of the component items
173                                         start_row("class='stockmankobg'");
174                                         $qoh_msg .= $stock_item->stock_id . " - " . $stock_item->item_description . ": " .
175                                         _("Quantity On Hand") . " = " 
176                                         . number_format2($qoh, get_qty_dec($stock_item->stock_id)) . '<br>';
177                                         $has_marked = true;
178                                  } else 
179                                         alt_table_row_color($k);
180                         } else {
181                                 alt_table_row_color($k);
182                         }
183
184                         view_stock_status_cell($stock_item->stock_id);
185
186                         //label_cell($stock_item->item_description, "nowrap" );
187                         label_cell($stock_item->item_description );
188                         $dec = get_qty_dec($stock_item->stock_id);
189                         qty_cell($stock_item->qty_dispatched, false, $dec);
190
191                         if ($order->trans_no!=0)
192                                 qty_cell($stock_item->qty_done, false, $dec);
193
194                         label_cell($stock_item->units);
195                         amount_cell($stock_item->price);
196
197                         percent_cell($stock_item->discount_percent * 100);
198                         amount_cell($line_total);
199
200                         if ($editable_items)
201                         {
202                                 edit_button_cell("Edit$line_no", _("Edit"),
203                                 _('Edit document line'));
204                                 delete_button_cell("Delete$line_no", _("Delete"),
205                                 _('Remove line from document'));
206                         }
207                         end_row();
208                 }
209                 else
210                 {
211                         sales_order_item_controls($order, $k,  $line_no);
212                 }
213
214                 $total += $line_total;
215         }
216
217         if ($id==-1 && $editable_items)
218                 sales_order_item_controls($order, $k);
219
220         $colspan = 6;
221         small_amount_row(_("Shipping Charge"), 'freight_cost', price_format(get_post('freight_cost',0)), "colspan=$colspan align=right");
222         $display_sub_total = price_format($total + input_num('freight_cost'));
223
224         label_row(_("Sub-total"), $display_sub_total, "colspan=$colspan align=right","align=right");
225
226         $taxes = $order->get_taxes(input_num('freight_cost'));
227         $tax_total = display_edit_tax_items($taxes, $colspan, $order->tax_included);
228
229         $display_total = price_format(($total + input_num('freight_cost') + $tax_total));
230
231         start_row();
232         label_cells(_("Amount Total"), $display_total, "colspan=$colspan align=right","align=right");
233         submit_cells('update', _("Update"), "colspan=2", _("Refresh"), true);
234         end_row();
235
236         end_table();
237         if ($has_marked) {
238                 display_note(_("Marked items have insufficient quantities in stock as on day of delivery."), 0, 1, "class='stockmankofg'");
239                 if ($order->trans_type!=30 && !$SysPrefs->allow_negative_stock())
240                         display_error(_("The delivery cannot be processed because there is an insufficient quantity for item:")
241                                 . '<br>'. $qoh_msg);
242         }
243     div_end();
244 }
245
246 // ------------------------------------------------------------------------------
247
248 function display_order_header(&$order, $editable, $date_text, $display_tax_group=false)
249 {
250         global $table_style, $Ajax, $SysPrefs;
251
252         start_outer_table("width=80% $table_style");
253
254         table_section(1);
255         
256         $customer_error = "";
257         $change_prices = 0;
258
259         if (isset($order) && !$editable)
260         {
261                 // can't change the customer/branch if items already received on this order
262                 //echo $order->customer_name . " - " . $order->deliver_to;
263                 label_row(null, $order->customer_name . " - " . $order->deliver_to);
264                 hidden('customer_id', $order->customer_id);
265                 hidden('branch_id', $order->Branch);
266                 hidden('sales_type', $order->sales_type);
267                 if ($order->trans_type != ST_SALESORDER  && $order->trans_type != ST_SALESQUOTE) {
268                         hidden('dimension_id', $order->dimension_id); // 2008-11-12 Joe Hunt
269                         hidden('dimension2_id', $order->dimension2_id);
270                 }       
271         }
272         else
273         {
274                 customer_list_row(_("Customer:"), 'customer_id', null, false, true, false, true);
275
276                 if ($order->customer_id != get_post('customer_id', -1))
277                 {
278                         // customer has changed
279                         $Ajax->activate('branch_id');
280                 }
281                 customer_branches_list_row(_("Branch:"),
282                   $_POST['customer_id'], 'branch_id', null, false, true, true, true);
283
284                 if( ($order->customer_id != get_post('customer_id', -1)) ||
285                         ($order->Branch != get_post('branch_id', -1)) ||
286                         list_updated('customer_id')) 
287                 {
288
289                         if (!isset($_POST['branch_id']) || $_POST['branch_id'] == "")
290                         {
291                                 // ignore errors on customer search box call
292                                 if ($_POST['customer_id'] == '')
293                                         $customer_error = _("No customer found for entered text.");
294                                 else
295                                         $customer_error = _("The selected customer does not have any branches. Please create at least one branch.");
296                                 unset($_POST['branch_id']);
297                                 $order->Branch = 0;
298                         } 
299                         else
300                         {
301
302                                 $old_order = (PHP_VERSION<5) ? $order : clone( $order );
303
304                                 $customer_error = get_customer_details_to_order($order, $_POST['customer_id'], $_POST['branch_id']);
305                                 $_POST['Location'] = $order->Location;
306                                 $_POST['deliver_to'] = $order->deliver_to;
307                                 $_POST['delivery_address'] = $order->delivery_address;
308                                 $_POST['phone'] = $order->phone;
309                                 if (get_post('cash') !== $order->cash) {
310                                         $_POST['cash'] = $order->cash;
311                                         $Ajax->activate('delivery');
312                                         $Ajax->activate('cash');
313                                 } else {
314                                         if ($order->trans_type == ST_SALESINVOICE)
315                                         {
316                                                 $_POST['delivery_date'] = $order->due_date;
317                                                 $Ajax->activate('delivery_date');
318                                         }
319                                         $Ajax->activate('Location');
320                                         $Ajax->activate('deliver_to');
321                                         $Ajax->activate('phone');
322                                         $Ajax->activate('delivery_address');
323                                 }
324                                 // change prices if necessary
325                                 // what about discount in template case?
326                                 if ($old_order->customer_currency != $order->customer_currency) {
327                                         $change_prices = 1;
328                                 }
329                                 if ($old_order->sales_type != $order->sales_type) {
330                                 //  || $old_order->default_discount!=$order->default_discount
331                                         $_POST['sales_type'] = $order->sales_type;
332                                         $Ajax->activate('sales_type');
333                                         $change_prices = 1;
334                                 }
335                                 if ($old_order->dimension_id != $order->dimension_id) {
336                                         $_POST['dimension_id'] = $order->dimension_id;
337                                     $Ajax->activate('dimension_id');
338                                 }
339                                 if ($old_order->dimension2_id != $order->dimension2_id) {
340                                         $_POST['dimension2_id'] = $order->dimension2_id;
341                                     $Ajax->activate('dimension2_id');
342                                 }
343                                 unset($old_order);
344                         }
345                         set_global_customer($_POST['customer_id']);
346                 } // changed branch
347                 else
348                 {
349                         $row = get_customer_to_order($_POST['customer_id']);
350                         if ($row['dissallow_invoices'] == 1)
351                                 $customer_error = _("The selected customer account is currently on hold. Please contact the credit control personnel to discuss.");
352                 
353                 }
354         }
355
356         ref_cells(_("Reference").':', 'ref', _('Reference number unique for this document type'), null, '');
357
358         if (!is_company_currency($order->customer_currency))
359         {
360             table_section(2);
361
362                 label_row(_("Customer Currency:"), $order->customer_currency);
363                 exchange_rate_display($order->customer_currency, get_company_currency(),
364                         ($editable ? $_POST['OrderDate'] : $order->document_date));
365         }
366         table_section(3);
367
368         if ($order->trans_type == ST_SALESINVOICE && $order->pos != -1) {
369                 sale_payment_list_cells(_('Payment:'), 'cash', null, true);
370                 $cash_payment = get_post('cash', 0);
371                 // current user can issue both credit and cash invoices
372                 if ($order->cash != $cash_payment) {
373                         $order->cash = $cash_payment;
374                         if ($cash_payment) {
375                                 $paym = get_sales_point(user_pos());
376                                 $order->cash_account = $paym['pos_account'];
377                                 $order->account_name = $paym['bank_account_name'];
378                                 $_POST['Location'] = $order->Location = $paym['pos_location'];
379                                 $order->location_name = $paym['location_name'];
380                         }
381                         $Ajax->activate('items_table');
382                         $Ajax->activate('delivery');
383                         set_focus($order->pos == -1 ? 'delivery_date' : 'account');
384                 }
385         } else
386                 hidden('cash', $order->cash);
387
388         if($editable) {
389                 $str = sales_types_list_row(_("Price List"), 'sales_type', null, true);
390         } else {
391                 label_row(_("Price List:"), $order->sales_type_name);
392         }
393         if ($order->sales_type != $_POST['sales_type']) {
394                 $myrow = get_sales_type($_POST['sales_type']);
395                 $order->set_sales_type($myrow['id'], $myrow['sales_type'],
396                         $myrow['tax_included'], $myrow['factor']);
397                 $Ajax->activate('sales_type');
398                 $change_prices = 1;
399         }
400
401         label_row(_("Customer Discount:"), ($order->default_discount * 100) . "%");
402         
403         table_section(4);
404
405         if ($editable)
406         {
407                 if (!isset($_POST['OrderDate']) || $_POST['OrderDate'] == "")
408                         $_POST['OrderDate'] = $order->document_date;
409
410                 date_row($date_text, 'OrderDate', _('Date of order receive'),
411                         $order->trans_no==0, 0, 0, 0, null, true);
412                 if (isset($_POST['_OrderDate_changed'])) {
413                         if (!is_company_currency($order->customer_currency) 
414                                 && (get_base_sales_type()>0)) {
415                                         $change_prices = 1;
416                         }
417                         $Ajax->activate('_ex_rate');
418                         if ($order->trans_type == ST_SALESINVOICE) {
419                                 $_POST['delivery_date'] = get_invoice_duedate(get_post('customer_id'), get_post('OrderDate'));
420                         } else 
421                                 $_POST['delivery_date'] = add_days(get_post('OrderDate'), $SysPrefs->default_delivery_required_by());
422                         $Ajax->activate('items_table');
423                         $Ajax->activate('delivery_date');
424                 }
425                 if ($order->trans_type != ST_SALESORDER && $order->trans_type != ST_SALESQUOTE)
426                 {       // 2008-11-12 Joe Hunt added dimensions
427                         $dim = get_company_pref('use_dimension');
428                         if ($dim > 0)
429                                 dimensions_list_row(_("Dimension").":", 'dimension_id', 
430                                         null, true, ' ', false, 1, false);
431                         else
432                                 hidden('dimension_id', 0);
433                         if ($dim > 1)
434                                 dimensions_list_row(_("Dimension")." 2:", 'dimension2_id', 
435                                         null, true, ' ', false, 2, false);
436                         else
437                                 hidden('dimension2_id', 0);
438                 }       
439         }
440         else
441         {
442                 label_row($date_text, $order->document_date);
443                 hidden('OrderDate', $order->document_date);
444         }
445
446         if ($display_tax_group)
447         {
448             label_row(_("Tax Group:"), $order->tax_group_name);
449             hidden('tax_group_id', $order->tax_group_id);
450         }
451
452         end_outer_table(1); // outer table
453
454         if ($change_prices != 0) {
455                 foreach ($order->line_items as $line_no=>$item) {
456                         $line = &$order->line_items[$line_no];
457                         $line->price = get_kit_price($line->stock_id, $order->customer_currency,
458                                 $order->sales_type, $order->price_factor, get_post('OrderDate'));
459                 //              $line->discount_percent = $order->default_discount;
460                 }
461             $Ajax->activate('items_table');
462         }
463
464         return $customer_error;
465 }
466
467 //--------------------------------------------------------------------------------
468
469 function sales_order_item_controls(&$order, &$rowcounter, $line_no=-1)
470 {
471     global $Ajax;
472
473         alt_table_row_color($rowcounter);
474
475         $id = find_submit('Edit');
476         if ($line_no!=-1 && $line_no == $id) // edit old line
477         {
478                 $_POST['stock_id'] = $order->line_items[$id]->stock_id;
479                 $dec = get_qty_dec($_POST['stock_id']);
480                 $_POST['qty'] = number_format2($order->line_items[$id]->qty_dispatched, $dec);
481                 $_POST['price'] = price_format($order->line_items[$id]->price);
482                 $_POST['Disc'] = percent_format($order->line_items[$id]->discount_percent*100);
483                 $_POST['item_description'] = $order->line_items[$id]->item_description;
484                 $units = $order->line_items[$id]->units;
485                 hidden('stock_id', $_POST['stock_id']);
486                 label_cell($_POST['stock_id']);
487                 text_cells(null,'item_description', null, 45, 150);
488                 //label_cell($order->line_items[$line_no]->item_description, "nowrap");
489             $Ajax->activate('items_table');
490         }
491         else    // prepare new line
492         {
493                 sales_items_list_cells(null,'stock_id', null, false, true);
494                 if (list_updated('stock_id')) {
495                             $Ajax->activate('price');
496                             $Ajax->activate('units');
497                             $Ajax->activate('qty');
498                             $Ajax->activate('line_total');
499                 }
500
501                 $item_info = get_item_edit_info($_POST['stock_id']);
502                 $units = $item_info["units"];
503                 $dec = $item_info['decimals'];
504                 $_POST['qty'] = number_format2(1, $dec);
505                 $price = get_kit_price($_POST['stock_id'],
506                         $order->customer_currency, $order->sales_type,
507                         $order->price_factor, get_post('OrderDate'));
508                 $_POST['price'] = price_format($price);
509                 // default to the customer's discount %
510                 $_POST['Disc'] = percent_format($order->default_discount * 100);
511         }
512
513         qty_cells(null, 'qty', $_POST['qty'], null, null, $dec);
514
515         if ($order->trans_no!=0) {
516                 qty_cell($line_no==-1 ? 0 :$order->line_items[$line_no]->qty_done, false, $dec);
517         }
518
519         label_cell($units, '', 'units');
520
521         $str = amount_cells(null, 'price');
522
523         small_amount_cells(null, 'Disc', percent_format($_POST['Disc']), null, null, user_percent_dec());
524
525         $line_total = input_num('qty') * input_num('price') * (1 - input_num('Disc') / 100);
526
527         amount_cell($line_total, false, '','line_total');
528
529         if ($id!=-1)
530         {
531                 button_cell('UpdateItem', _("Update"),
532                                 _('Confirm changes'), ICON_UPDATE);
533                 button_cell('CancelItemChanges', _("Cancel"),
534                                 _('Cancel changes'), ICON_CANCEL);
535                 hidden('LineNo', $line_no);
536                 set_focus('qty');
537         }
538         else
539         {
540                 submit_cells('AddItem', _("Add Item"), "colspan=2",
541                     _('Add new item to document'), true);
542         }
543
544         end_row();
545 }
546
547 //--------------------------------------------------------------------------------
548
549 function display_delivery_details(&$order)
550 {
551         global $table_style2, $Ajax;
552
553         div_start('delivery');  
554
555         if (get_post('cash', 0)) {      // Direct payment sale
556                 $Ajax->activate('items_table');
557                 display_heading(_('Cash payment'));
558                 start_table("$table_style2 width=60%");
559                 label_row(_("Deliver from Location:"), $order->location_name);
560
561                 hidden('Location', $order->Location);
562                 label_row(_("Cash account:"), $order->account_name);
563                 textarea_row(_("Comments:"), "Comments", $order->Comments, 31, 5);
564                 end_table();
565         } else {
566
567                 if ($order->trans_type==ST_SALESINVOICE)
568                 {
569                         $title = _("Delivery Details");
570                         $delname = _("Due Date").':';
571                 }
572                 elseif ($order->trans_type==ST_CUSTDELIVERY)
573                 {
574                         $title = _("Invoice Delivery Details");
575                         $delname = _("Invoice before").':';
576                 }
577                 elseif ($order->trans_type==ST_SALESQUOTE)
578                 {
579                         $title = _("Quotation Delivery Details");
580                         $delname = _("Valid until").':';
581                 }
582                 else
583                 {
584                         $title = _("Order Delivery Details");
585                         $delname = _("Required Delivery Date").':';
586                 }
587                 display_heading($title);
588                 start_outer_table("$table_style2 width=90%");
589                 table_section(1);
590
591                 locations_list_row(_("Deliver from Location:"), 'Location', null, 
592                         false, true);
593                 if (list_updated('Location'))
594                         $Ajax->activate('items_table');
595
596
597                 date_row($delname, 'delivery_date',
598                         $order->trans_type==ST_SALESORDER ?  _('Enter requested day of delivery') : $order->trans_type==ST_SALESQUOTE ? _('Enter Valid until Date') : '');
599                 text_row(_("Deliver To:"), 'deliver_to', $order->deliver_to, 40, 40,
600                         _('Additional identifier for delivery e.g. name of receiving person'));
601
602                 textarea_row(_("Address:"), 'delivery_address', $order->delivery_address, 35, 5,
603                         _('Delivery address. Default is address of customer branch'));
604
605                 table_section(2);
606
607                 text_row(_("Contact Phone Number:"), 'phone', $order->phone, 25, 25,
608                     _('Phone number of ordering person. Defaults to branch phone number'));
609                 text_row(_("Customer Reference:"), 'cust_ref', $order->cust_ref, 25, 25,
610                   _('Customer reference number for this order (if any)'));
611                 textarea_row(_("Comments:"), "Comments", $order->Comments, 31, 5);
612
613                 shippers_list_row(_("Shipping Company:"), 'ship_via', $order->ship_via);
614
615                 end_outer_table(1);
616         }
617         div_end();
618 }
619
620 ?>