X-Git-Url: https://delta.frontaccounting.com/gitweb/?a=blobdiff_plain;ds=sidebyside;f=purchasing%2Fincludes%2Fpo_class.inc;h=54ae516474d7424bda75467470b447346bf54f5b;hb=fa46467fccb4052d4c517833cf4198c8bf1dc229;hp=b3b9c2b2b35e5059b9d053bc2d3c3cfde0b7a257;hpb=d567a10b7925c8bb97c734e213d6651a979af29d;p=fa-stable.git diff --git a/purchasing/includes/po_class.inc b/purchasing/includes/po_class.inc index b3b9c2b2..54ae5164 100644 --- a/purchasing/includes/po_class.inc +++ b/purchasing/includes/po_class.inc @@ -9,79 +9,96 @@ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the License here . ***********************************************************************/ -/* Definition of the purch_order class to hold all the information for a purchase order and delivery +/* + This class serves as cart for PO or GRN. */ class purch_order { - + // db interface + var $trans_type; // order/grn/invoice (direct) var $supplier_id; - - var $line_items; /*array of objects of class line_details using the product id as the pointer */ - var $curr_code; - var $requisition_no; - var $delivery_address; var $Comments; + var $tran_date; + var $reference; + var $supp_ref; var $Location; + var $delivery_address; + + var $prep_amount = 0; // prepayment required + var $alloc; // sum of payments allocated + var $tax_included; // type of prices + + var $due_date; // for grn this is delivery date + var $order_no; // for order modification, grn batch + var $ex_rate; // for grn + + var $line_items; + //---- + + var $curr_code; var $supplier_name; - var $orig_order_date; - var $order_no; /*Only used for modification of existing orders otherwise only established when order committed */ - var $lines_on_order; - - var $reference; - - function purch_order() + var $credit; + var $tax_group_id; + var $terms; + var $cash_account; + var $dimension, + $dimension2; + + var $tax_overrides = array(); // array of taxes manually inserted during sales invoice entry (direct invoice) + + var $prepayments = array(); + + var $fixed_asset = false; + var $grn_id; // grn batch id used in edition only + + function __construct() { - /*Constructor function initialises a new purchase order object */ $this->line_items = array(); - $this->lines_on_order = $this->order_no = $this->supplier_id = 0; + $this->order_no = $this->supplier_id = 0; + $this->tax_group_id = find_domestic_tax_group(); // prevent tax errors until supplier is selected } - - function add_to_order($line_no, $stock_id, $qty, $item_descr, $price, $uom, $req_del_date, $qty_inv, $qty_recd) + + function set_supplier($supplier_id, $supplier_name, $curr_code, $tax_group_id, $tax_included, $tax_area) { - if ($qty != 0 && isset($qty)) - { - $this->line_items[$line_no] = new line_details($line_no, $stock_id, $item_descr, $qty, $price, $uom, $req_del_date, $qty_inv, $qty_recd); - $this->lines_on_order++; - Return 1; - } - Return 0; + $this->supplier_id = $supplier_id; + $this->supplier_name = $supplier_name; + $this->curr_code = $curr_code; + $this->tax_group_id = $tax_group_id; + $this->tax_included = $tax_included; + $this->tax_area = $tax_area; + } + + function add_to_order($stock_id, $qty, $item_descr, $price, $req_del_date, $qty_inv, $qty_recd, $qty_ordered=0, $grn_item_id=0, $po_item_id=0) + { + $this->line_items[] = new po_line_details($stock_id, $item_descr, $qty, $price, + $req_del_date, $qty_inv, $qty_recd, $qty_ordered, $grn_item_id, $po_item_id); } - function update_order_item($line_no, $qty, $price, $req_del_date) + function update_order_item($line_no, $qty, $price, $req_del_date, $description="") { + if ($description != "") + $this->line_items[$line_no]->item_description = $description; $this->line_items[$line_no]->quantity = $qty; $this->line_items[$line_no]->price = $price; $this->line_items[$line_no]->req_del_date = $req_del_date; - $this->line_items[$line_no]->price = $price; + $this->line_items[$line_no]->item_description = $description; } function remove_from_order($line_no) { - $this->line_items[$line_no]->Deleted = true; + array_splice($this->line_items, $line_no, 1); } function order_has_items() { - if (count($this->line_items) > 0) - { - foreach ($this->line_items as $ordered_items) - { - if ($ordered_items->Deleted == false) - { - return true; - } - } - } - return false; + return count($this->line_items) != 0; } function clear_items() { unset($this->line_items); $this->line_items = array(); - - $this->lines_on_order = 0; $this->order_no = 0; } @@ -115,42 +132,165 @@ class purch_order } return 0; } + + // + // Returns taxes for PO/GRN. + // $receival=true in purchase receive context. + // + function get_taxes($shipping_cost=null, $receival=false) + { + $items = array(); + $prices = array(); + if($shipping_cost==null) + $shipping_cost = 0;//$this->freight_cost; + + foreach ($this->line_items as $ln_itm) { + $items[] = $ln_itm->stock_id; + $prices[] = round($ln_itm->price * $ln_itm->quantity, user_price_dec()); + } + $taxes = get_tax_for_items($this->trans_type, $items, $prices, $shipping_cost, + $this->tax_group_id, $this->tax_included); + + // Adjustment for swiss franken, we always have 5 rappen = 1/20 franken + if ($this->curr_code == 'CHF') { + $val = $taxes['1']['Value']; + $val1 = (floatval((intval(round(($val*20),0)))/20)); + $taxes['1']['Value'] = $val1; + } + foreach($this->tax_overrides as $id => $value) // add values entered manually + { + $taxes[$id]['Override'] = $value; + } + return $taxes; + } + + /* + Returns order value including all taxes + */ + function get_trans_total() { + + $total = 0; + $dec = user_price_dec(); + + foreach ($this->line_items as $ln_itm) { + $items[] = $ln_itm->stock_id; + $value = round($ln_itm->quantity * $ln_itm->price, $dec); + $prices[] =$value; + $total += $value; + } + + if (!$this->tax_included ) { + $taxes = get_tax_for_items($this->trans_type, $items, $prices, 0, $this->tax_group_id, + $this->tax_included); + + foreach($taxes as $tax) + $total += round($tax['Value'], $dec); + } + return $total; + } + + function split_line_values() + { + // split nominal line values + foreach($this->line_items as $line) + $line->split_item_value($this); + + // Exact tax values are currently entered as tax totals, so we need to move the differences back on line level. + // currently first item with given tax type will be fixed with the calculated difference + // FIXME: change UI moving tax edit to line level in line edit mode, then this workaround will be obsolete. + foreach($this->get_taxes() as $tax_id => $tax) + { + if ($tax['Value'] != 0 && ($tax['Value'] != $tax['Override'])) + { + foreach($this->line_items as $id => $line) + if ($line->gl_amounts[0]['tax_type_id'] == $tax_id) // assumed single tax rate on item, so always gl_mount[0] is valid + { + $diff = $tax['Override'] - $tax['Value']; + $this->line_items[$id]->gl_amounts[0]['Value'] += $diff; + if ($this->vat_category() != VC_NONDEDUCT) + $this->line_items[$id]->gl_amounts[0]['Deductible'] += $diff; + else + $this->line_items[$id]->gl_amounts['Cost'] += $diff; + // when supplier uses net prices the price is exact, so don't fix net, still record exact VAT. + if ($this->tax_included) + { + $this->line_items[$id]->gl_amounts['Net'] -= $diff; + $this->line_items[$id]->gl_amounts['Cost'] -= $diff; + } + break; + } + } + } + } + } /* end of class defintion */ -class line_details +class po_line_details { + //db interface + var $po_item_id; + var $grn_item_id; + var $stock_id; + var $item_description; + var $price; + var $units; + var $req_del_date; + var $qty_inv; // quantity already invoiced against this line (all PIs) + var $qty_received; // quantity already received against this line (all GRNs) + var $qty_ordered; // quantity on order (not used on PO entry) + var $unit_cost; + var $quantity; // this document line quantity + //--- - Var $line_no; - Var $po_detail_rec; - Var $stock_id; - Var $item_description; - Var $quantity; - Var $price; - Var $units; - Var $req_del_date; - Var $qty_inv; - Var $qty_received; - Var $standard_cost; - Var $receive_qty; - Var $Deleted; - - function line_details($line_no, $stock_item, $item_descr, $qty, $prc, $uom, $req_del_date, $qty_inv, $qty_recd) - { + var $descr_editable; + var $vat_category; + var $gl_amounts; // splited line value (after call to split_line_value method) - /* Constructor function to add a new LineDetail object with passed params */ - $this->line_no = $line_no; + function __construct($stock_item, $item_descr, $qty, $prc, $req_del_date, + $qty_inv, $qty_recd, $qty_ordered=0, $grn_item_id=0, $po_item_id=0) + { $this->stock_id = $stock_item; - $this->item_description = $item_descr; + $item_row = get_item($stock_item); + if (!$item_row) + return; + + $this->descr_editable = $item_row["editable"]; + if ($item_descr == null || !$this->descr_editable) + $this->item_description = $item_row["description"]; + else + $this->item_description = $item_descr; $this->quantity = $qty; $this->req_del_date = $req_del_date; $this->price = $prc; - $this->units = $uom; + $this->units = $item_row["units"]; $this->qty_received = $qty_recd; $this->qty_inv = $qty_inv; - $this->receive_qty = 0; /*initialise these last two only */ - $this->standard_cost =0; - $this->Deleted = false; + $this->unit_cost =0; + $this->grn_item_id = $grn_item_id; + $this->vat_category = $item_row["vat_category"]; + $this->qty_ordered = $qty_ordered; + $this->po_item_id = $po_item_id; + } + + // + // GRN line tax free value. + // + function taxfree_charge_value($po) + { + return get_tax_free_price_for_item($po->trans_type, $this->stock_id, $this->quantity*$this->price, + $po->tax_group_id, $po->tax_included); + } + + /* + Splits item value to parts posted to GL. + */ + function split_item_value($cart) + { + $vat_factor = 1; + + return $this->gl_amounts = split_item_price($this->stock_id, $this->price*$this->quantity, $cart->tax_group_id, $cart->tax_included, + ST_SUPPINVOICE, $vat_factor, $cart->tran_date); } + } -?>