***********************************************************************/
$page_security = 'SA_ITEMSVALREP';
// ----------------------------------------------------------------
-// $ Revision: 2.0 $
-// Creator: Jujuk
-// date_: 2011-05-24
-// Title: Stock Movements
+// $ Revision: 2.4 $
+// Creator: boxygen, Joe Hunt
+// date_: 2017-05-14
+// Title: Costed Inventory Movements
// ----------------------------------------------------------------
$path_to_root="..";
inventory_movements();
+function get_domestic_price($myrow, $stock_id)
+{
+ if ($myrow['type'] == ST_SUPPRECEIVE || $myrow['type'] == ST_SUPPCREDIT)
+ {
+ $price = $myrow['price'];
+ if ($myrow['person_id'] > 0)
+ {
+ // Do we have foreign currency?
+ $supp = get_supplier($myrow['person_id']);
+ $currency = $supp['curr_code'];
+ $ex_rate = $myrow['ex_rate'];
+ $price *= $ex_rate;
+ }
+ }
+ else
+ $price = $myrow['standard_cost']; //pick standard_cost for sales deliveries
+
+ return $price;
+}
+
function fetch_items($category=0)
{
$sql = "SELECT stock_id, stock.description AS name,
- stock.category_id,
- units,material_cost,
+ stock.category_id,units,
cat.description
FROM ".TB_PREF."stock_master stock LEFT JOIN ".TB_PREF."stock_category cat ON stock.category_id=cat.category_id
- WHERE mb_flag <> 'D'";
+ WHERE mb_flag <> 'D' AND mb_flag <> 'F'";
if ($category != 0)
$sql .= " AND cat.category_id = ".db_escape($category);
$sql .= " ORDER BY stock.category_id, stock_id";
$sql = "SELECT ".($inward ? '' : '-')."SUM(qty) FROM ".TB_PREF."stock_moves
WHERE stock_id=".db_escape($stock_id)."
AND tran_date >= '$from_date'
- AND tran_date <= '$to_date'";
+ AND tran_date <= '$to_date' AND type <> ".ST_LOCTRANSFER;
if ($location != '')
$sql .= " AND loc_code = ".db_escape($location);
}
+function avg_unit_cost($stock_id, $location=null, $to_date)
+{
+ if ($to_date == null)
+ $to_date = Today();
+
+ $to_date = date2sql($to_date);
+
+ $sql = "SELECT move.*, supplier.supplier_id person_id, IF(ISNULL(grn.rate), credit.rate, grn.rate) ex_rate
+ FROM ".TB_PREF."stock_moves move
+ LEFT JOIN ".TB_PREF."supp_trans credit ON credit.trans_no=move.trans_no AND credit.type=move.type
+ LEFT JOIN ".TB_PREF."grn_batch grn ON grn.id=move.trans_no AND 25=move.type
+ LEFT JOIN ".TB_PREF."suppliers supplier ON IFNULL(grn.supplier_id, credit.supplier_id)=supplier.supplier_id
+ LEFT JOIN ".TB_PREF."debtor_trans cust_trans ON cust_trans.trans_no=move.trans_no AND cust_trans.type=move.type
+ LEFT JOIN ".TB_PREF."debtors_master debtor ON cust_trans.debtor_no=debtor.debtor_no
+ WHERE stock_id=".db_escape($stock_id)."
+ AND move.tran_date < '$to_date' AND qty <> 0 AND move.type <> ".ST_LOCTRANSFER;
+
+ if ($location != '')
+ $sql .= " AND move.loc_code = ".db_escape($location);
+
+ $sql .= " ORDER BY tran_date";
+
+ $result = db_query($sql, "No standard cost transactions were returned");
+
+ if ($result == false)
+ return 0;
+
+ $qty = $tot_cost = 0;
+ while ($row=db_fetch($result))
+ {
+ $qty += $row['qty'];
+ $price = get_domestic_price($row, $stock_id);
+ $tran_cost = $price * $row['qty'];
+ $tot_cost += $tran_cost;
+ }
+ if ($qty == 0)
+ return 0;
+ return $tot_cost / $qty;
+}
+
//----------------------------------------------------------------------------------------------------
function trans_qty_unit_cost($stock_id, $location=null, $from_date, $to_date, $inward = true)
$to_date = date2sql($to_date);
- $sql = "SELECT AVG (price) FROM ".TB_PREF."stock_moves
+ $sql = "SELECT move.*, supplier.supplier_id person_id, IF(ISNULL(grn.rate), credit.rate, grn.rate) ex_rate
+ FROM ".TB_PREF."stock_moves move
+ LEFT JOIN ".TB_PREF."supp_trans credit ON credit.trans_no=move.trans_no AND credit.type=move.type
+ LEFT JOIN ".TB_PREF."grn_batch grn ON grn.id=move.trans_no AND 25=move.type
+ LEFT JOIN ".TB_PREF."suppliers supplier ON IFNULL(grn.supplier_id, credit.supplier_id)=supplier.supplier_id
+ LEFT JOIN ".TB_PREF."debtor_trans cust_trans ON cust_trans.trans_no=move.trans_no AND cust_trans.type=move.type
+ LEFT JOIN ".TB_PREF."debtors_master debtor ON cust_trans.debtor_no=debtor.debtor_no
WHERE stock_id=".db_escape($stock_id)."
- AND tran_date >= '$from_date'
- AND tran_date <= '$to_date'";
+ AND move.tran_date >= '$from_date' AND move.tran_date <= '$to_date' AND qty <> 0 AND move.type <> ".ST_LOCTRANSFER;
if ($location != '')
- $sql .= " AND loc_code = ".db_escape($location);
+ $sql .= " AND move.loc_code = ".db_escape($location);
if ($inward)
$sql .= " AND qty > 0 ";
else
$sql .= " AND qty < 0 ";
-
- $result = db_query($sql, "QOH calculation failed");
-
- $myrow = db_fetch_row($result);
-
- return $myrow[0];
-
+ $sql .= " ORDER BY tran_date";
+
+ $result = db_query($sql, "No standard cost transactions were returned");
+
+ if ($result == false)
+ return 0;
+
+ $qty = $tot_cost = 0;
+ while ($row=db_fetch($result))
+ {
+ $qty += $row['qty'];
+ $price = get_domestic_price($row, $stock_id);
+ $tran_cost = $row['qty'] * $price;
+ $tot_cost += $tran_cost;
+ }
+ if ($qty == 0)
+ return 0;
+ return $tot_cost / $qty;
}
//----------------------------------------------------------------------------------------------------
else
$loc = get_location_name($location);
- $cols = array(0, 60, 130, 160, 185, 210, 250, 275, 300, 340, 365, 390, 430, 455, 480, 520);
+ $cols = array(0, 60, 134, 160, 185, 215, 250, 275, 305, 340, 365, 395, 430, 455, 485, 520);
$headers = array(_('Category'), _('Description'), _('UOM'), '', '', _('OpeningStock'), '', '',_('StockIn'), '', '', _('Delivery'), '', '', _('ClosingStock'));
$headers2 = array("", "", "", _("QTY"), _("Rate"), _("Value"), _("QTY"), _("Rate"), _("Value"), _("QTY"), _("Rate"), _("Value"), _("QTY"), _("Rate"), _("Value"));
$rep->Info($params, $cols, $headers2, $aligns, $cols, $headers, $aligns);
$rep->NewPage();
+ $totval_open = $totval_in = $totval_out = $totval_close = 0;
$result = fetch_items($category);
+ $dec = user_price_dec();
$catgor = '';
while ($myrow=db_fetch($result))
{
$rep->fontSize -= 2;
$rep->NewLine();
}
+ $qoh_start = get_qoh_on_date($myrow['stock_id'], $location, add_days($from_date, -1));
+ $qoh_end = get_qoh_on_date($myrow['stock_id'], $location, $to_date);
+
+ $inward = trans_qty($myrow['stock_id'], $location, $from_date, $to_date);
+ $outward = trans_qty($myrow['stock_id'], $location, $from_date, $to_date, false);
+ $openCost = avg_unit_cost($myrow['stock_id'], $location, $from_date);
+ $unitCost = avg_unit_cost($myrow['stock_id'], $location, add_days($to_date, 1));
+ if ($qoh_start == 0 && $inward == 0 && $outward == 0 && $qoh_end == 0)
+ continue;
$rep->NewLine();
$rep->TextCol(0, 1, $myrow['stock_id']);
- $rep->TextCol(1, 2, $myrow['name']);
+ $rep->TextCol(1, 2, substr($myrow['name'], 0, 24) . ' ');
$rep->TextCol(2, 3, $myrow['units']);
- $qoh_start= $inward = $outward = $qoh_end = 0;
-
- $qoh_start += get_qoh_on_date($myrow['stock_id'], $location, add_days($from_date, -1));
- $qoh_end += get_qoh_on_date($myrow['stock_id'], $location, $to_date);
-
- $inward += trans_qty($myrow['stock_id'], $location, $from_date, $to_date);
- $outward += trans_qty($myrow['stock_id'], $location, $from_date, $to_date, false);
- $unitCost=$myrow['material_cost'];
$rep->AmountCol(3, 4, $qoh_start, get_qty_dec($myrow['stock_id']));
-// $rep->AmountCol(4, 5, $unitCost, get_qty_dec($myrow['stock_id']));
- $rep->AmountCol(4, 5, $myrow['material_cost']);
- $rep->AmountCol(5, 6, $qoh_start*$unitCost, get_qty_dec($myrow['stock_id']));
+ $rep->AmountCol(4, 5, $openCost, $dec);
+ $openCost *= $qoh_start;
+ $totval_open += $openCost;
+ $rep->AmountCol(5, 6, $openCost);
if($inward>0){
$rep->AmountCol(6, 7, $inward, get_qty_dec($myrow['stock_id']));
- $unitCost_IN= trans_qty_unit_cost($myrow['stock_id'], $location, $from_date, $to_date);
- $rep->AmountCol(7, 8, $unitCost_IN,get_qty_dec($myrow['stock_id']));
- $rep->AmountCol(8, 9, $inward*$unitCost_IN, get_qty_dec($myrow['stock_id']));
+ $unitCost_in = trans_qty_unit_cost($myrow['stock_id'], $location, $from_date, $to_date);
+ $rep->AmountCol(7, 8, $unitCost_in,$dec);
+ $unitCost_in *= $inward;
+ $totval_in += $unitCost_in;
+ $rep->AmountCol(8, 9, $unitCost_in);
}
if($outward>0){
$rep->AmountCol(9, 10, $outward, get_qty_dec($myrow['stock_id']));
-
- $unitCost_out= trans_qty_unit_cost($myrow['stock_id'], $location, $from_date, $to_date, false);
- $rep->AmountCol(10, 11, $unitCost_out,get_qty_dec($myrow['stock_id']));
- $rep->AmountCol(11, 12, $outward*$unitCost_out, get_qty_dec($myrow['stock_id']));
+ $unitCost_out = trans_qty_unit_cost($myrow['stock_id'], $location, $from_date, $to_date, false);
+ $rep->AmountCol(10, 11, $unitCost_out,$dec);
+ $unitCost_out *= $outward;
+ $totval_out += $unitCost_out;
+ $rep->AmountCol(11, 12, $unitCost_out);
}
$rep->AmountCol(12, 13, $qoh_end, get_qty_dec($myrow['stock_id']));
- $rep->AmountCol(13, 14, $myrow['material_cost'],get_qty_dec($myrow['stock_id']));
- $rep->AmountCol(14, 15, $qoh_end*$unitCost, get_qty_dec($myrow['stock_id']));
+ $rep->AmountCol(13, 14, $unitCost,$dec);
+ $unitCost *= $qoh_end;
+ $totval_close += $unitCost;
+ $rep->AmountCol(14, 15, $unitCost);
$rep->NewLine(0, 1);
}
$rep->Line($rep->row - 4);
+ $rep->NewLine(2);
+ $rep->TextCol(0, 1, _("Total Movement"));
+ $rep->AmountCol(5, 6, $totval_open);
+ $rep->AmountCol(8, 9, $totval_in);
+ $rep->AmountCol(11, 12, $totval_out);
+ $rep->AmountCol(14, 15, $totval_open + $totval_in - $totval_out);
+ $rep->NewLine(1);
+ $rep->TextCol(0, 1, _("Total Out"));
+ $rep->AmountCol(14, 15, $totval_close);
+ $rep->Line($rep->row - 4);
- $rep->NewLine();
$rep->End();
}
-?>
\ No newline at end of file
projects / fa-stable.git / blobdiff