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 //-------------------------------------------------------------------------------------------------------------
14 function stock_cost_update($stock_id, $material_cost, $labour_cost, $overhead_cost,
17 $mb_flag = get_mb_flag($stock_id);
21 if (is_service($mb_flag))
23 //display_db_error("Cannot do cost update for Service item : $stock_id", "");
26 $sql = "UPDATE ".TB_PREF."stock_master SET material_cost=".db_escape($material_cost)."
27 WHERE stock_id=".db_escape($stock_id);
29 db_query($sql,"The cost details for the inventory item could not be updated");
37 $sql = "UPDATE ".TB_PREF."stock_master SET material_cost=".db_escape($material_cost).",
38 labour_cost=".db_escape($labour_cost).",
39 overhead_cost=".db_escape($overhead_cost).",
40 last_cost=".db_escape($last_cost)."
41 WHERE stock_id=".db_escape($stock_id);
42 db_query($sql,"The cost details for the inventory item could not be updated");
44 $qoh = get_qoh_on_date($stock_id);
47 if (!is_date_in_fiscalyear($date_))
48 $date_ = end_fiscalyear();
52 $new_cost = $material_cost + $labour_cost + $overhead_cost;
54 $value_of_change = round2($qoh * ($new_cost - $last_cost), user_price_dec());
56 if ($value_of_change != 0)
58 $stock_gl_code = get_stock_gl_code($stock_id);
60 $cart = new items_cart(ST_COSTUPDATE);
61 $cart->tran_date = $cart->doc_date = $cart->event_date = $date_;
62 if (!is_date_in_fiscalyear($cart->tran_date))
63 $cart->tran_date = end_fiscalyear();
64 $cart->reference = $Refs->get_next(ST_COSTUPDATE, null, $cart->tran_date, $date_);
66 $cart->memo_ = sprintf(_("Cost was %s changed to %s x quantity on hand of %s"),
67 number_format2($last_cost, 2), number_format2($new_cost), $qoh);
69 $cart->add_gl_item($stock_gl_code["adjustment_account"],
70 $stock_gl_code["dimension_id"], $stock_gl_code["dimension2_id"], -$value_of_change);
71 $cart->add_gl_item($stock_gl_code["inventory_account"], 0, 0, $value_of_change);
73 write_journal_entries($cart);
74 change_stock_moves_std_cost($stock_id, $date_, $new_cost - $last_cost);
79 add_audit_trail(ST_COSTUPDATE, $update_no, $date_);
85 //-------------------------------------------------------------------------------------------------------------
87 function change_stock_moves_std_cost($stock_id, $date, $diff_cost)
89 $date = date2sql($date);
90 $sql = "UPDATE ".TB_PREF."stock_moves SET standard_cost = standard_cost + ".db_escape($diff_cost). " WHERE stock_id = "
91 . db_escape($stock_id)." AND tran_date <= '$date' AND qty <> 0 AND standard_cost > 0.001 AND type <> ".ST_LOCTRANSFER;
92 db_query($sql,"The stock moves cost details for the inventory item could not be updated");