purchasing/includes/ui/po_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 . "/purchasing/includes/purchasing_db.inc");
  13
  14 //--------------------------------------------------------------------------------------------------
  15
  16 function copy_from_cart()
  17 {
  18         $cart = &$_SESSION['PO'];
  19
  20         $_POST['supplier_id'] = $cart->supplier_id;
  21         $_POST['OrderDate'] = $cart->tran_date;
  22         if ($cart->trans_type == ST_SUPPINVOICE)
  23                 $_POST['due_date'] = $cart->due_date;
  24     $_POST['supp_ref'] = $cart->supp_ref;
  25     $_POST['ref'] = $cart->reference;
  26         $_POST['Comments'] = $cart->Comments;
  27     $_POST['StkLocation'] = $cart->Location;
  28     $_POST['delivery_address'] = $cart->delivery_address;
  29         $_POST['prep_amount'] = price_format($cart->prep_amount);
  30         $_POST['_ex_rate'] = $cart->ex_rate;
  31         $_POST['cash_account'] = $cart->cash_account;
  32     $_POST['dimension'] = $cart->dimension;
  33     $_POST['dimension2'] = $cart->dimension2;
  34     foreach($cart->tax_overrides as $id => $value)
  35             $_POST['mantax'][$id] = price_format($value);
  36 }
  37
  38 function copy_to_cart()
  39 {
  40         $cart = &$_SESSION['PO'];
  41
  42         $cart->supplier_id = $_POST['supplier_id'];
  43         $cart->tran_date = $_POST['OrderDate'];
  44         if ($cart->trans_type == ST_SUPPINVOICE)
  45         {
  46                 $cart->due_date = $_POST['due_date'];
  47                 $cart->cash_account = get_post('cash_account');
  48         }
  49         $cart->reference = $_POST['ref'];
  50         $cart->supp_ref = $_POST['supp_ref'];
  51         $cart->Comments = $_POST['Comments'];
  52         $cart->Location = $_POST['StkLocation'];
  53         $cart->delivery_address = $_POST['delivery_address'];
  54         $cart->dimension = @$_POST['dimension'];
  55         $cart->dimension2 =  @$_POST['dimension2'];
  56         $cart->prep_amount = input_num('prep_amount', 0);
  57         $cart->ex_rate = input_num('_ex_rate', null);
  58
  59     if (isset($_POST['mantax'])) {
  60                 foreach($_POST['mantax'] as $id => $tax) {
  61                         $cart->tax_overrides[$id] = user_numeric($_POST['mantax'][$id]); }
  62         }
  63 }
  64
  65 //---------------------------------------------------------------------------------------------------
  66
  67 function create_cart($trans_type, $trans_no)
  68 {
  69         global $Refs;
  70
  71         if (isset($_SESSION['PO']))
  72                 unset ($_SESSION['PO']->line_items, $_SESSION['PO']);
  73
  74         $cart = new purch_order;
  75         $cart->trans_type = $trans_type;
  76
  77         if ($trans_type == ST_SUPPRECEIVE && $trans_no != 0) {
  78                 read_grn($trans_no, $cart);
  79                 foreach($cart->line_items as &$line) {
  80                         $line->qty_old = $line->quantity; // for concurrency checks
  81                         $line->qty_received -= $line->quantity;
  82                 }
  83         } else {
  84                 $cart->order_no = $trans_no;
  85                 $_POST['OrderDate'] = new_doc_date();
  86                 if (!is_date_in_fiscalyear($_POST['OrderDate']))
  87                         $_POST['OrderDate'] = end_fiscalyear();
  88                 $cart->due_date = $cart->tran_date = $_POST['OrderDate'];
  89                 /* read in all the selected order into the Items cart  */
  90                 if ($trans_no) {
  91                         read_po($trans_no, $cart);
  92                         $cart->order_no = $trans_no;
  93                 } else
  94                         $cart->reference = $Refs->get_next($trans_type, null,
  95                                 array('supplier_id' => $cart->supplier_id, 'date' => get_post('OrderDate')));
  96         }
  97         $_SESSION['PO'] = &$cart;
  98 }
  99
 100 //---------------------------------------------------------------------------------------------------
 101
 102 function display_po_header(&$order)
 103 {
 104         global $Ajax, $Refs;
 105
 106         $editable = ($order->order_no == 0);
 107
 108         start_outer_table(TABLESTYLE2, "width='80%'");
 109
 110         table_section(1);
 111     if ($editable)
 112     {
 113         if (!isset($_POST['supplier_id']) && (get_global_supplier() != ALL_TEXT))
 114                 $_POST['supplier_id'] = get_global_supplier();
 115
 116         supplier_list_row(_("Supplier:"), 'supplier_id', null, false, true, false, true);
 117         }
 118         else
 119         {
 120                 hidden('supplier_id', $order->supplier_id);
 121                 label_row(_("Supplier:"), $order->supplier_name);
 122     }
 123
 124         if ($order->supplier_id != get_post('supplier_id',-1)) {
 125                 $old_supp = $order->supplier_id;
 126                 get_supplier_details_to_order($order, $_POST['supplier_id']);
 127             $order->due_date = get_payment_due_date($order->terms, $order->tran_date);
 128
 129                 $_POST['due_date'] = $order->due_date;
 130
 131                 // supplier default price update
 132                 foreach ($order->line_items as $line_no=>$item) {
 133                         $line = &$order->line_items[$line_no];
 134                         $line->price =  get_purchase_price ($order->supplier_id, $line->stock_id);
 135                         $line->quantity =
 136                                 $line->quantity/get_purchase_conversion_factor ($old_supp, $line->stock_id)
 137                                         *get_purchase_conversion_factor ($order->supplier_id, $line->stock_id);
 138                 }
 139             $Ajax->activate('items_table');
 140             $Ajax->activate('due_date');
 141         }
 142         set_global_supplier($_POST['supplier_id']);
 143
 144         date_row($order->trans_type==ST_PURCHORDER ? _("Order Date:") :
 145                 ($order->trans_type==ST_SUPPRECEIVE ? _("Delivery Date:") : _("Invoice Date:")),
 146                 'OrderDate', '', true, 0, 0, 0, null, true);
 147
 148         if (isset($_POST['_OrderDate_changed'])) {
 149                 $order->tran_date = $_POST['OrderDate'];
 150             $order->due_date = get_payment_due_date($order->terms, $order->tran_date);
 151             $_POST['due_date'] = $order->due_date;
 152                 $Ajax->activate('due_date');
 153         }
 154         supplier_credit_row($order->supplier_id, $order->credit);
 155
 156         if (!is_company_currency($order->curr_code))
 157         {
 158                 label_row(_("Supplier Currency:"), $order->curr_code);
 159                 exchange_rate_display(get_company_currency(), $order->curr_code,
 160                         $_POST['OrderDate']);
 161         }
 162
 163     if ($editable)
 164     {
 165         ref_row(_("Reference:"), 'ref', '', null, false, $order->trans_type, array('date'=> @$_POST['OrderDate']));
 166     }
 167     else
 168     {
 169         hidden('ref', $order->reference);
 170         label_row(_("Reference:"), $order->reference);
 171     }
 172
 173         table_section(2);
 174
 175     label_row(_("Terms:"), $order->terms['description']);
 176
 177         if ($order->trans_type==ST_SUPPINVOICE)
 178                 date_row(_("Due Date:"), 'due_date', '', false, 0, 0, 0, null, true);
 179
 180         text_row(_("Supplier's Reference:"), 'supp_ref', null, 20, 60);
 181
 182         if (get_company_pref('use_dimension'))
 183                 dimensions_list_row(_('Dimension').':', 'dimension', null, true, _('Default'), false, 1);
 184         if (get_company_pref('use_dimension') == 2)
 185                 dimensions_list_row(_('Dimension 2').':', 'dimension2', null, true, _('Default'), false, 2);
 186
 187         table_section(3);
 188         locations_list_row(_("Receive Into:"), 'StkLocation', null, false, true, $order->fixed_asset);
 189     if (!isset($_POST['StkLocation']) || $_POST['StkLocation'] == "" ||
 190         isset($_POST['_StkLocation_update']) || !isset($_POST['delivery_address']) ||
 191         $_POST['delivery_address'] == "")
 192     {
 193         /*If this is the first time the form loaded set up defaults */
 194
 195                 $loc_row = get_item_location(get_post('StkLocation'));
 196         if ($loc_row)
 197         {
 198                 $_POST['delivery_address'] = $loc_row["delivery_address"];
 199                         $Ajax->activate('delivery_address');
 200                 $_SESSION['PO']->Location = $_POST['StkLocation'];
 201                 $_SESSION['PO']->delivery_address = $_POST['delivery_address'];
 202
 203         }
 204         else
 205         { /*The default location of the user is crook */
 206                 display_error(_("The default stock location set up for this user is not a currently defined stock location. Your system administrator needs to amend your user record."));
 207         }
 208     }
 209
 210         textarea_row(_("Deliver to:"), 'delivery_address', $_POST['delivery_address'], 35, 4);
 211
 212         end_outer_table(); // outer table
 213 }
 214
 215 //---------------------------------------------------------------------------------------------------
 216
 217 function display_po_items(&$order, $editable=true)
 218 {
 219     display_heading(_("Order Items"));
 220
 221     div_start('items_table');
 222     start_table(TABLESTYLE, "width='80%'");
 223
 224         $new = $order->order_no == 0;
 225
 226         $th = array(_("Item Code"), _("Item Description"), _("Quantity"), _("Received"),
 227                 _("Unit"), _("Required Delivery Date"), $order->tax_included ? _("Price after Tax") : _("Price before Tax"), _("Line Total"), "");
 228
 229         if ($order->trans_type != ST_PURCHORDER)
 230                 array_remove($th, 5);
 231         if ($new)
 232                 array_remove($th, 3);
 233
 234         if (count($order->line_items)) $th[] = '';
 235
 236         table_header($th);
 237
 238         $id = find_submit('Edit');
 239         $total = 0;
 240         $k = 0;
 241         foreach ($order->line_items as $line_no => $po_line)
 242         {
 243         $line_total =   round($po_line->quantity * $po_line->price,  user_price_dec());
 244         if (!$editable || ($id != $line_no))
 245                 {
 246                 alt_table_row_color($k);
 247                 label_cell($po_line->stock_id);
 248                 label_cell($po_line->item_description);
 249                 if ($order->fixed_asset)
 250                     label_cell(1);
 251                 else
 252                 qty_cell($po_line->quantity, false, get_qty_dec($po_line->stock_id));
 253                         if (!$new)
 254                     qty_cell($po_line->qty_received, false, get_qty_dec($po_line->stock_id));
 255                 label_cell($po_line->units);
 256                         if ($order->trans_type == ST_PURCHORDER)
 257                     label_cell($po_line->req_del_date);
 258                 amount_decimal_cell($po_line->price);
 259             amount_cell($line_total);
 260
 261                         if ($editable)
 262                         {
 263                                         edit_button_cell("Edit$line_no", _("Edit"),
 264                                           _('Edit document line'));
 265                                         delete_button_cell("Delete$line_no", _("Delete"),
 266                                                 _('Remove line from document'));
 267                         }
 268                 end_row();
 269                 }
 270                 else
 271                 {
 272                         po_item_controls($order, $k, $line_no);
 273                 }
 274                 $total += $line_total;
 275     }
 276
 277         if ($id==-1 && $editable)
 278                 po_item_controls($order, $k);
 279
 280         $colspan = count($th)-2;
 281         if (count($order->line_items))
 282                 $colspan--;
 283
 284         $display_sub_total = price_format($total);
 285
 286         label_row(_("Sub-total"), $display_sub_total, "colspan=$colspan align=right","align=right", 2);
 287
 288         $taxes = $order->get_taxes();
 289
 290         $tax_total = display_edit_tax_items($taxes, $colspan, $order->tax_included, 2, $order->trans_type==ST_SUPPINVOICE);
 291
 292         $display_total = price_format(($total + $tax_total));
 293
 294         start_row();
 295         label_cells(_("Amount Total"), $display_total, "colspan=$colspan align='right'","align='right'");
 296         $order->trans_type == ST_SUPPINVOICE
 297          ? submit_cells('update', _("Update"), "colspan=2 align='center'", _("Refresh"), true)
 298                 : label_cell('', "colspan=2");
 299         end_row();
 300
 301         end_table(1);
 302         div_end();
 303 }
 304
 305 //---------------------------------------------------------------------------------------------------
 306
 307 function display_po_summary(&$po, $is_self=false, $editable=false)
 308 {
 309     start_table(TABLESTYLE, "width='90%'");
 310
 311     start_row();
 312     label_cells(_("Reference"), $po->reference, "class='tableheader2'");
 313
 314     label_cells(_("Supplier"), $po->supplier_name, "class='tableheader2'");
 315
 316     if (!is_company_currency($po->curr_code))
 317         label_cells(_("Order Currency"), $po->curr_code, "class='tableheader2'");
 318
 319     if (!$is_self)
 320     {
 321         label_cells(_("Purchase Order"), get_trans_view_str(ST_PURCHORDER, $po->order_no),
 322                 "class='tableheader2'");
 323     }
 324         end_row();
 325         start_row();
 326     label_cells(_("Date"), $po->tran_date, "class='tableheader2'");
 327
 328     if ($editable)
 329     {
 330         if (!isset($_POST['Location']))
 331                 $_POST['Location'] = $po->Location;
 332         label_cell(_("Deliver Into Location"), "class='tableheader2'");
 333         locations_list_cells(null, 'Location', $_POST['Location']);
 334     }
 335     else
 336     {
 337         label_cells(_("Deliver Into Location"), get_location_name($po->Location),
 338                 "class='tableheader2'");
 339     }
 340
 341     if ($po->supp_ref != "")
 342         label_cells(_("Supplier's Reference"), $po->supp_ref, "class='tableheader2'");
 343     end_row();
 344
 345     if (!$editable)
 346         label_row(_("Delivery Address"), $po->delivery_address, "class='tableheader2'",
 347                 "colspan=9");
 348
 349         if (!$editable && ($po->prep_amount > 0))
 350         {
 351                 start_row();
 352                 label_cells(_("Required Pre-Payment"), price_format($po->prep_amount), "class='tableheader2'");
 353                 label_cells(_("Pre-Payments Allocated"), price_format($po->alloc), "class='tableheader2'");
 354                 end_row();
 355         }
 356
 357     if ($po->Comments != "")
 358         label_row(_("Order Comments"), $po->Comments, "class='tableheader2'",
 359                 "colspan=9");
 360     end_table(1);
 361 }
 362
 363 //--------------------------------------------------------------------------------
 364
 365 function po_item_controls(&$order, &$rowcounter, $line_no=-1)
 366 {
 367    global $Ajax, $SysPrefs;
 368
 369         alt_table_row_color($rowcounter);
 370         $new = $order->order_no == 0;
 371
 372         $dec2 = 0;
 373         $id = find_submit('Edit');
 374         if (($id != -1) && $line_no == $id)
 375         {
 376
 377                 $_POST['stock_id'] = $order->line_items[$id]->stock_id;
 378                 $dec = get_qty_dec($_POST['stock_id']);
 379                 $_POST['qty'] = qty_format($order->line_items[$id]->quantity, $_POST['stock_id'], $dec);
 380                 $_POST['price'] = price_decimal_format($order->line_items[$id]->price, $dec2);
 381                 if ($order->trans_type == ST_PURCHORDER)
 382                         $_POST['req_del_date'] = $order->line_items[$id]->req_del_date;
 383
 384                 $_POST['units'] = $order->line_items[$id]->units;
 385                 $_POST['item_description'] = $order->line_items[$id]->item_description;
 386
 387                 hidden('stock_id', $_POST['stock_id']);
 388                 label_cell($_POST['stock_id']);
 389
 390                 if ($order->line_items[$id]->descr_editable)
 391                         text_cells(null,'item_description', null, 45, 150);
 392                 else {
 393                         hidden('item_description', $_POST['item_description']);
 394                         label_cell($order->line_items[$id]->item_description);
 395                 }
 396
 397             $Ajax->activate('items_table');
 398                 $qty_rcvd = $order->line_items[$id]->qty_received;
 399         }
 400         else
 401         {
 402
 403                 // Manufactured item can be purchased
 404                 if ($order->fixed_asset)
 405                         stock_purchasable_fa_list_cells(null, 'stock_id', null, false, true, false, true, $order->line_items);
 406                 else
 407                         stock_purchasable_items_list_cells(null, 'stock_id', null, false, true, false, true, array('editable' => 30, 'where'=>array("NOT no_purchase")));
 408
 409                 if (list_updated('stock_id')) {
 410                             $Ajax->activate('price');
 411                             $Ajax->activate('units');
 412                             $Ajax->activate('qty');
 413                             $Ajax->activate('req_del_date');
 414                             $Ajax->activate('line_total');
 415                 }
 416         $item_info = get_item_edit_info($_POST['stock_id']);
 417                 $_POST['units'] = $item_info["units"];
 418
 419                 $dec = $item_info["decimals"];
 420                 $_POST['qty'] = number_format2(get_purchase_conversion_factor ($order->supplier_id, $_POST['stock_id']), $dec);
 421                 $_POST['price'] = price_decimal_format(get_purchase_price ($order->supplier_id, $_POST['stock_id']), $dec2);
 422                 if ($order->trans_type == ST_PURCHORDER)
 423                         $_POST['req_del_date'] = add_days(Today(), $SysPrefs->default_receival_required_by());
 424                 $qty_rcvd = '';
 425         }
 426
 427         if ($order->fixed_asset) {
 428                 label_cell(1, '', 'qty');
 429                 hidden('qty', 1);
 430         } else
 431                 qty_cells(null, 'qty', null, null, null, $dec);
 432
 433         if (!$new)
 434                 qty_cell($qty_rcvd, false, $dec);
 435
 436         label_cell($_POST['units'], '', 'units');
 437         if ($order->trans_type == ST_PURCHORDER)
 438                 date_cells(null, 'req_del_date', '', null, 0, 0, 0);
 439         if ($qty_rcvd > 0)
 440         {
 441                 amount_decimal_cell($_POST['price']);
 442                 hidden('price', $_POST['price']);
 443         }
 444         else
 445                 amount_cells(null, 'price', null, null, null, $dec2);
 446
 447         $line_total = round(input_num('qty') * input_num('price'),  user_price_dec());
 448         amount_cell($line_total, false, '','line_total');
 449
 450         if ($id!=-1)
 451         {
 452                 button_cell('UpdateLine', _("Update"),
 453                                 _('Confirm changes'), ICON_UPDATE);
 454                 button_cell('CancelUpdate', _("Cancel"),
 455                                 _('Cancel changes'), ICON_CANCEL);
 456                 hidden('line_no', $line_no);
 457                 set_focus('qty');
 458         }
 459         else
 460         {
 461                 submit_cells('EnterLine', _("Add Item"), "colspan=2 align='center'",
 462                     _('Add new item to document'), true);
 463         }
 464
 465         end_row();
 466 }
 467
 468 //---------------------------------------------------------------------------------------------------
 469
 470 function display_po_footer(&$trans)
 471 {
 472         global $Ajax;
 473
 474 start_table(TABLESTYLE2);
 475
 476 if ($trans->trans_type == ST_SUPPINVOICE) {
 477         cash_accounts_list_row(_("Payment:"), 'cash_account', null, false, _('Delayed'));
 478 } elseif ($trans->trans_type == ST_PURCHORDER)
 479         amount_row(_("Pre-Payment Required:"), 'prep_amount');
 480
 481 textarea_row(_("Memo:"), 'Comments', null, 70, 4);
 482
 483 end_table();
 484 }
 485 //---------------------------------------------------------------------------------------------------
 486
 487
 488