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 This class serves as cart for PO or GRN.
19 var $trans_type; // order/grn/invoice (direct)
26 var $delivery_address;
28 var $prep_amount = 0; // prepayment required
29 var $alloc; // sum of payments allocated
30 var $tax_included; // type of prices
32 var $due_date; // for grn this is delivery date
33 var $order_no; // for order modification, grn batch
34 var $ex_rate; // for grn
48 var $tax_overrides = array(); // array of taxes manually inserted during sales invoice entry (direct invoice)
50 var $prepayments = array();
52 var $fixed_asset = false;
53 var $grn_id; // grn batch id used in edition only
55 function __construct()
57 $this->line_items = array();
58 $this->order_no = $this->supplier_id = 0;
59 $this->tax_group_id = find_domestic_tax_group(); // prevent tax errors until supplier is selected
62 function set_supplier($supplier_id, $supplier_name, $curr_code, $tax_group_id, $tax_included, $tax_area)
64 $this->supplier_id = $supplier_id;
65 $this->supplier_name = $supplier_name;
66 $this->curr_code = $curr_code;
67 $this->tax_group_id = $tax_group_id;
68 $this->tax_included = $tax_included;
69 $this->tax_area = $tax_area;
72 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, $unit_cost=0)
74 $line = new po_line_details($stock_id, $item_descr, $qty, $price,
75 $req_del_date, $qty_inv, $qty_recd, $qty_ordered, $grn_item_id, $po_item_id, $unit_cost);
77 $this->line_items[] = $line;
81 function update_order_item($line_no, $qty, $price, $req_del_date, $description="")
83 if ($description != "")
84 $this->line_items[$line_no]->item_description = $description;
85 $this->line_items[$line_no]->quantity = $qty;
86 $this->line_items[$line_no]->price = $price;
87 $this->line_items[$line_no]->req_del_date = $req_del_date;
88 $this->line_items[$line_no]->item_description = $description;
91 function remove_from_order($line_no)
93 array_splice($this->line_items, $line_no, 1);
96 function order_has_items()
98 return count($this->line_items) != 0;
101 function clear_items()
103 unset($this->line_items);
104 $this->line_items = array();
109 function any_already_received()
111 /* Checks if there have been deliveries or invoiced entered against any of the line items */
112 if (count($this->line_items) > 0)
114 foreach ($this->line_items as $ordered_items)
116 if ($ordered_items->qty_received != 0 || $ordered_items->qty_inv != 0)
125 function some_already_received($line_no)
127 /* Checks if there have been deliveries or amounts invoiced against a specific line item */
128 if (count($this->line_items) > 0)
130 if ($this->line_items[$line_no]->qty_received != 0 ||
131 $this->line_items[$line_no]->qty_inv != 0)
140 // Returns taxes for PO/GRN.
141 // $receival=true in purchase receive context.
143 function get_taxes($shipping_cost=null, $receival=false)
147 if($shipping_cost==null)
148 $shipping_cost = 0;//$this->freight_cost;
150 foreach ($this->line_items as $ln_itm) {
151 $items[] = $ln_itm->stock_id;
152 $prices[] = round($ln_itm->price * $ln_itm->quantity, user_price_dec());
154 $taxes = get_tax_for_items($this->trans_type, $items, $prices, $shipping_cost,
155 $this->tax_group_id, $this->tax_included);
157 // Adjustment for swiss franken, we always have 5 rappen = 1/20 franken
158 if ($this->curr_code == 'CHF') {
159 $val = $taxes['1']['Value'];
160 $val1 = (floatval((intval(round(($val*20),0)))/20));
161 $taxes['1']['Value'] = $val1;
163 foreach($this->tax_overrides as $id => $value) // add values entered manually
165 $taxes[$id]['Override'] = $value;
171 Returns order value including all taxes
173 function get_trans_total() {
176 $dec = user_price_dec();
178 foreach ($this->line_items as $ln_itm) {
179 $items[] = $ln_itm->stock_id;
180 $value = round($ln_itm->quantity * $ln_itm->price, $dec);
185 if (!$this->tax_included ) {
186 $taxes = get_tax_for_items($this->trans_type, $items, $prices, 0, $this->tax_group_id,
187 $this->tax_included);
189 foreach($taxes as $tax)
190 $total += round($tax['Value'], $dec);
195 function split_line_values()
197 // split nominal line values
198 foreach($this->line_items as $line)
199 $line->split_item_value();
201 // Exact tax values are currently entered as tax totals, so we need to move the differences back on line level.
202 // currently first item with given tax type will be fixed with the calculated difference
203 // FIXME: change UI moving tax edit to line level in line edit mode, then this workaround will be obsolete.
204 foreach($this->get_taxes() as $tax_id => $tax)
206 if ($tax['Value'] != 0 && ($tax['Value'] != $tax['Override']))
208 foreach($this->line_items as $id => $line)
209 if ($line->gl_amounts[0]['tax_type_id'] == $tax_id) // assumed single tax rate on item, so always gl_mount[0] is valid
211 $diff = $tax['Override'] - $tax['Value'];
212 $this->line_items[$id]->gl_amounts[0]['Value'] += $diff;
213 if ($line->vat_category != VC_NONDEDUCT)
214 $this->line_items[$id]->gl_amounts[0]['Deductible'] += $diff;
216 $this->line_items[$id]->gl_amounts['Cost'] += $diff;
217 // when supplier uses net prices the price is exact, so don't fix net, still record exact VAT.
218 if ($this->tax_included)
220 $this->line_items[$id]->gl_amounts['Net'] -= $diff;
221 $this->line_items[$id]->gl_amounts['Cost'] -= $diff;
229 } /* end of class defintion */
231 class po_line_details
237 var $item_description;
241 var $qty_inv; // quantity already invoiced against this line (all PIs)
242 var $qty_received; // quantity already received against this line (all GRNs)
243 var $qty_ordered; // quantity on order (not used on PO entry)
245 var $quantity; // this document line quantity
248 var $cart; // line context
251 var $gl_amounts; // splited line value (after call to split_line_value method)
253 function __construct($stock_item, $item_descr, $qty, $prc, $req_del_date,
254 $qty_inv, $qty_recd, $qty_ordered=0, $grn_item_id=0, $po_item_id=0, $unit_cost=0)
256 $this->stock_id = $stock_item;
257 $item_row = get_item($stock_item);
261 $this->descr_editable = $item_row["editable"];
262 if ($item_descr == null || !$this->descr_editable)
263 $this->item_description = $item_row["description"];
265 $this->item_description = $item_descr;
266 $this->quantity = $qty;
267 $this->req_del_date = $req_del_date;
269 $this->units = $item_row["units"];
270 $this->qty_received = $qty_recd;
271 $this->qty_inv = $qty_inv;
272 $this->unit_cost = $unit_cost;
273 $this->grn_item_id = $grn_item_id;
274 $this->vat_category = $item_row["vat_category"];
275 $this->qty_ordered = $qty_ordered;
276 $this->po_item_id = $po_item_id;
280 // GRN line tax free value.
282 function taxfree_charge_value()
284 $this->split_item_value();
285 return $this->gl_amounts['Net'];
289 Splits item value to parts posted to GL.
291 function split_item_value()
295 return $this->gl_amounts = split_item_price($this->stock_id, $this->price*$this->quantity, $this->cart->tax_group_id, $this->cart->tax_included,
296 ST_SUPPINVOICE, $vat_factor);