<?php
-
-$page_security = 2;
+/**********************************************************************
+ Copyright (C) FrontAccounting, LLC.
+ Released under the terms of the GNU General Public License, GPL,
+ as published by the Free Software Foundation, either version 3
+ of the License, or (at your option) any later version.
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+ See the License here <http://www.gnu.org/licenses/gpl-3.0.html>.
+***********************************************************************/
+$page_security = 'SA_ITEMSVALREP';
// ----------------------------------------------------------------
// $ Revision: 2.0 $
// Creator: Joe Hunt
// date_: 2005-05-19
-// Title: Stock Check
+// Title: Stock Check Sheet
// ----------------------------------------------------------------
-$path_to_root="../";
+$path_to_root="..";
-include_once($path_to_root . "includes/session.inc");
-include_once($path_to_root . "includes/date_functions.inc");
-include_once($path_to_root . "includes/data_checks.inc");
-include_once($path_to_root . "gl/includes/gl_db.inc");
-include_once($path_to_root . "inventory/includes/db/items_category_db.inc");
+include_once($path_to_root . "/includes/session.inc");
+include_once($path_to_root . "/includes/date_functions.inc");
+include_once($path_to_root . "/includes/data_checks.inc");
+include_once($path_to_root . "/gl/includes/gl_db.inc");
+include_once($path_to_root . "/inventory/includes/inventory_db.inc");
+include_once($path_to_root . "/includes/db/manufacturing_db.inc");
//----------------------------------------------------------------------------------------------------
-// trial_inquiry_controls();
print_stock_check();
-function getTransactions($category, $location)
+/**
+ * Bar codes checker - Checks if a barcode can be valid and returns type of barcode
+ *
+ * @link http://www.phpclasses.org/package/8560-PHP-Detect-type-and-check-EAN-and-UPC-barcodes.html
+ * @type tests EAN, EAN-8, EAN-13, GTIN-8, GTIN-12, GTIN-14, UPC, UPC-12 coupon code, JAN
+ * @author Ferry Bouwhuis
+ * @version 1.0.1
+ * @LastChange 2014-04-13
+ */
+
+function barcode_check($code, $return_value = false, $get_type = false)
{
- $sql = "SELECT ".TB_PREF."stock_master.category_id,
- ".TB_PREF."stock_category.description AS cat_description,
- ".TB_PREF."stock_master.stock_id,
- ".TB_PREF."stock_master.description,
- ".TB_PREF."stock_moves.loc_code,
- SUM(".TB_PREF."stock_moves.qty) AS QtyOnHand
- FROM ".TB_PREF."stock_master,
- ".TB_PREF."stock_category,
- ".TB_PREF."stock_moves
- WHERE ".TB_PREF."stock_master.stock_id=".TB_PREF."stock_moves.stock_id
- AND ".TB_PREF."stock_master.category_id=".TB_PREF."stock_category.category_id
- AND (".TB_PREF."stock_master.mb_flag='B' OR ".TB_PREF."stock_master.mb_flag='M')";
- if ($category != 0)
- $sql .= " AND ".TB_PREF."stock_master.category_id = '$category'";
- if ($location != 'all')
- $sql .= " AND ".TB_PREF."stock_moves.loc_code = '$location'";
- $sql .= " GROUP BY ".TB_PREF."stock_master.category_id,
- ".TB_PREF."stock_category.description,
- ".TB_PREF."stock_master.stock_id,
- ".TB_PREF."stock_master.description
- ORDER BY ".TB_PREF."stock_master.category_id,
- ".TB_PREF."stock_master.stock_id";
+ //Setting return value
+ /*
+ * If true it will retun al barcodes as 14 digit strings
+ * If false it will return only what is needed UPC -> 12 / EAN -> 13 /
+ */
- return db_query($sql,"No transactions were returned");
-}
+ //Filter UPC coupon codes
+ /*
+ * If true it will return false on UPC coupon codes
+ * Type will always return UPC coupon code
+ */
+ $skip_coupon_codes = true;
-function getDemandQty($stockid, $location)
-{
- $sql = "SELECT SUM(".TB_PREF."sales_order_details.quantity - ".TB_PREF."sales_order_details.qty_sent) AS QtyDemand
- FROM ".TB_PREF."sales_order_details,
- ".TB_PREF."sales_orders
- WHERE ".TB_PREF."sales_order_details.order_no=".TB_PREF."sales_orders.order_no AND
- ".TB_PREF."sales_orders.from_stk_loc ='$location' AND
- ".TB_PREF."sales_order_details.stk_code = '$stockid'";
-
- $TransResult = db_query($sql,"No transactions were returned");
- $DemandRow = db_fetch($TransResult);
- return $DemandRow['QtyDemand'];
-}
+ //Trims parsed string to remove unwanted whitespace or characters
+ $code = (string)trim($code);
+ if (preg_match('/[^0-9]/', $code))
+ return false;
-function getDemandAsmQty($stockid, $location)
-{
- $sql = "SELECT SUM((".TB_PREF."sales_order_details.quantity-".TB_PREF."sales_order_details.qty_sent)*".TB_PREF."bom.quantity)
- AS Dem
- FROM ".TB_PREF."sales_order_details,
- ".TB_PREF."sales_orders,
- ".TB_PREF."bom,
- ".TB_PREF."stock_master
- WHERE ".TB_PREF."sales_order_details.stk_code=".TB_PREF."bom.parent AND
- ".TB_PREF."sales_orders.order_no = ".TB_PREF."sales_order_details.order_no AND
- ".TB_PREF."sales_orders.from_stk_loc='$location' AND
- ".TB_PREF."sales_order_details.quantity-".TB_PREF."sales_order_details.qty_sent > 0 AND
- ".TB_PREF."bom.component='$stockid' AND
- ".TB_PREF."stock_master.stock_id=".TB_PREF."bom.parent AND
- ".TB_PREF."stock_master.mb_flag='A'";
-
- $TransResult = db_query($sql,"No transactions were returned");
- if (db_num_rows($TransResult)==1)
- {
- $DemandRow = db_fetch_row($TransResult);
- $DemandQty = $DemandRow[0];
+ if (!is_string($code))
+ $code = strval($code);
+ $code = trim($code);
+ $length = strlen($code);
+ if(($length > 11 && $length <= 14) || $length == 8)
+ {
+ $zeroes = 18 - $length;
+ $fill = "";
+ for ($i = 0; $i < $zeroes; $i++)
+ $fill .= "0";
+ $code = $fill . $code;
+
+ $calc = 0;
+ for ($i = 0; $i < (strlen($code) - 1); $i++)
+ $calc += ($i % 2 ? $code[$i] * 1 : $code[$i] * 3);
+
+ if (substr(10 - (substr($calc, -1)), -1) != substr($code, -1))
+ return false;
+ elseif (substr($code, 5, 1) > 2)
+ {
+ //EAN / JAN / EAN-13 code
+ if ($get_type)
+ return 'EAN';
+ else
+ return (string)substr($code, ($return_value ? -14 : -13));
+ }
+ elseif (substr($code, 6, 1) == 0 && substr($code, 0, 10) == 0)
+ {
+ //EAN-8 / GTIN-8 code
+ if ($get_type)
+ return 'EAN-8';
+ else
+ return (string)substr($code, ($return_value ? -14 : -8));
+ }
+ elseif (substr($code, 5, 1) <= 0)
+ {
+ //UPC / UCC-12 GTIN-12 code
+ if ($get_type)
+ {
+ if (substr($code, 6, 1) == 5)
+ return 'UPC coupon code';
+ else
+ return 'UPC';
+ }
+ else
+ {
+ if ($skip_coupon_codes && substr($code, 6, 1) == 5)
+ return false;
+ return (string)substr($code, ($return_value ? -14 : -12));
+ }
+ }
+ elseif (substr($code, 0, 6) == 0)
+ {
+ //GTIN-14
+ if ($get_type)
+ return 'GTIN-14';
+ else
+ return (string)substr($code, -14);
+ }
+ else
+ {
+ //EAN code
+ if ($get_type)
+ return 'EAN';
+ else
+ return (string)substr($code,($return_value ? -14 : -13));
+ }
}
else
- $DemandQty = 0.0;
+ return false;
+}
+
+function getTransactions($category, $location, $item_like)
+{
+ $sql = "SELECT item.category_id,
+ category.description AS cat_description,
+ item.stock_id, item.units,
+ item.description, item.inactive,
+ IF(move.stock_id IS NULL, '', move.loc_code) AS loc_code,
+ SUM(IF(move.stock_id IS NULL,0,move.qty)) AS QtyOnHand
+ FROM ("
+ .TB_PREF."stock_master item,"
+ .TB_PREF."stock_category category)
+ LEFT JOIN ".TB_PREF."stock_moves move ON item.stock_id=move.stock_id
+ WHERE item.category_id=category.category_id
+ AND (item.mb_flag='B' OR item.mb_flag='M')";
+ if ($category != 0)
+ $sql .= " AND item.category_id = ".db_escape($category);
+ if ($location != 'all')
+ $sql .= " AND IF(move.stock_id IS NULL, '1=1',move.loc_code = ".db_escape($location).")";
+ if($item_like)
+ {
+ $regexp = null;
+
+ if(sscanf($item_like, "/%s", $regexp)==1)
+ $sql .= " AND item.stock_id RLIKE ".db_escape($regexp);
+ else
+ $sql .= " AND item.stock_id LIKE ".db_escape($item_like);
+ }
+ $sql .= " GROUP BY item.category_id,
+ category.description,
+ item.stock_id,
+ item.description
+ ORDER BY item.category_id,
+ item.stock_id";
- return $DemandQty;
+ return db_query($sql,"No transactions were returned");
}
//----------------------------------------------------------------------------------------------------
function print_stock_check()
{
- global $comp_path, $path_to_root, $pic_height, $pic_width;
+ global $path_to_root, $SysPrefs;
- include_once($path_to_root . "reporting/includes/pdf_report.inc");
+ $category = $_POST['PARAM_0'];
+ $location = $_POST['PARAM_1'];
+ $pictures = $_POST['PARAM_2'];
+ $check = $_POST['PARAM_3'];
+ $shortage = $_POST['PARAM_4'];
+ $no_zeros = $_POST['PARAM_5'];
+ $like = $_POST['PARAM_6'];
+ $comments = $_POST['PARAM_7'];
+ $orientation = $_POST['PARAM_8'];
+ $destination = $_POST['PARAM_9'];
- $category = $_POST['PARAM_0'];
- $location = $_POST['PARAM_1'];
- $pictures = $_POST['PARAM_2'];
- $check = $_POST['PARAM_3'];
- $comments = $_POST['PARAM_4'];
+ if ($destination)
+ include_once($path_to_root . "/reporting/includes/excel_report.inc");
+ else
+ include_once($path_to_root . "/reporting/includes/pdf_report.inc");
- if ($category == reserved_words::get_all_numeric())
+ $orientation = ($orientation ? 'L' : 'P');
+ if ($category == ALL_NUMERIC)
$category = 0;
if ($category == 0)
$cat = _('All');
else
$cat = get_category_name($category);
- if ($location == reserved_words::get_all())
+ if ($location == ALL_TEXT)
$location = 'all';
if ($location == 'all')
$loc = _('All');
else
- $loc = $location;
-
+ $loc = get_location_name($location);
+ if ($shortage)
+ {
+ $short = _('Yes');
+ $available = _('Shortage');
+ }
+ else
+ {
+ $short = _('No');
+ $available = _('Available');
+ }
+ $barcodes = !empty($SysPrefs->prefs['barcodes_on_stock']);
+ if ($no_zeros) $nozeros = _('Yes');
+ else $nozeros = _('No');
if ($check)
{
- $cols = array(0, 100, 250, 305, 375, 445, 515);
- $headers = array(_('Category'), _('Description'), _('Quantity'), _('Check'), _('Demand'), _('Difference'));
- $aligns = array('left', 'left', 'right', 'right', 'right', 'right');
+ $cols = array(0, 75, 225, 250, 295, 345, 390, 445, 515);
+ $headers = array(_('Stock ID'), _('Description'), _('UOM'), _('Quantity'), _('Check'), _('Demand'), $available, _('On Order'));
+ $aligns = array('left', 'left', 'left', 'right', 'right', 'right', 'right', 'right');
}
else
{
- $cols = array(0, 100, 305, 375, 445, 515);
- $headers = array(_('Category'), _('Description'), _('Quantity'), _('Demand'), _('Difference'));
- $aligns = array('left', 'left', 'right', 'right', 'right');
+ $cols = array(0, 75, 225, 250, 315, 380, 445, 515);
+ $headers = array(_('Stock ID'), _('Description'), _('UOM'), _('Quantity'), _('Demand'), $available, _('On Order'));
+ $aligns = array('left', 'left', 'left', 'right', 'right', 'right', 'right');
}
+ $params = array(
+ 0 => $comments,
+ 1 => array('text' => _('Category'), 'from' => $cat, 'to' => ''),
+ 2 => array('text' => _('Location'), 'from' => $loc, 'to' => ''),
+ 3 => array('text' => _('Only Shortage'), 'from' => $short, 'to' => ''),
+ 4 => array('text' => _('Suppress Zeros'), 'from' => $nozeros, 'to' => '')
+ );
- $params = array( 0 => $comments,
- 1 => array('text' => _('Category'), 'from' => $cat, 'to' => ''),
- 2 => array('text' => _('Location'), 'from' => $loc, 'to' => ''));
-
- if ($pictures)
- $user_comp = user_company();
- else
- $user_comp = "";
+ if ($barcodes)
+ {
+ // define barcode style
+ $style = array(
+ 'position' => 'L', // If blank string, barcode starts on left edge of page
+ 'stretch' => false,
+ 'fitwidth' => true,
+ 'cellfitalign' => '',
+ 'border' => false,
+ 'padding' => 3,
+ 'fgcolor' => array(0,0,0),
+ 'bgcolor' => false, //array(255,255,255),
+ 'text' => true,
+ 'font' => 'helvetica',
+ 'fontsize' => 8,
+ 'stretchtext' => 4
+ );
+ // write1DBarcode($code, $type, $x='', $y='', $w='', $h='', $xres=0.4, $style='', $align='')
+ }
- $rep = new FrontReport(_('Stock Check Sheets'), "StockCheckSheet.pdf", user_pagesize());
+ $rep = new FrontReport(_('Stock Check Sheets'), "StockCheckSheet", user_pagesize(), 9, $orientation);
+ if ($orientation == 'L')
+ recalculate_cols($cols);
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
- $rep->Header();
+ $rep->NewPage();
- $res = getTransactions($category, $location);
+ $res = getTransactions($category, $location, $like);
$catt = '';
while ($trans=db_fetch($res))
{
+ if ($location == 'all')
+ $loc_code = "";
+ else
+ $loc_code = $location;
+ $demandqty = get_demand_qty($trans['stock_id'], $loc_code);
+ $demandqty += get_demand_asm_qty($trans['stock_id'], $loc_code);
+ $onorder = get_on_porder_qty($trans['stock_id'], $loc_code);
+ $onorder += get_on_worder_qty($trans['stock_id'], $loc_code);
+ if ($no_zeros && $trans['QtyOnHand'] == 0 && $demandqty == 0 && $onorder == 0)
+ continue;
+ if ($shortage && $trans['QtyOnHand'] - $demandqty >= 0)
+ continue;
if ($catt != $trans['cat_description'])
{
if ($catt != '')
$catt = $trans['cat_description'];
$rep->NewLine();
}
- $demandqty = getDemandQty($trans['stock_id'], $trans['loc_code']);
- $demandqty += getDemandAsmQty($trans['stock_id'], $trans['loc_code']);
$rep->NewLine();
$dec = get_qty_dec($trans['stock_id']);
$rep->TextCol(0, 1, $trans['stock_id']);
- $rep->TextCol(1, 2, $trans['description']);
- $rep->TextCol(2, 3, number_format2($trans['QtyOnHand'], $dec));
+ $rep->TextCol(1, 2, $trans['description'].($trans['inactive']==1 ? " ("._("Inactive").")" : ""), -1);
+ $rep->TextCol(2, 3, $trans['units']);
+ $rep->AmountCol(3, 4, $trans['QtyOnHand'], $dec);
if ($check)
{
- $rep->TextCol(3, 4, "_________");
- $rep->TextCol(4, 5, number_format2($demandqty, $dec));
- $rep->TextCol(5, 6, number_format2($trans['QtyOnHand'] - $demandqty, $dec));
+ $rep->TextCol(4, 5, "_________");
+ $rep->AmountCol(5, 6, $demandqty, $dec);
+ $rep->AmountCol(6, 7, $trans['QtyOnHand'] - $demandqty, $dec);
+ $rep->AmountCol(7, 8, $onorder, $dec);
}
else
{
- $rep->TextCol(3, 4, number_format2($demandqty, $dec));
- $rep->TextCol(4, 5, number_format2($trans['QtyOnHand'] - $demandqty, $dec));
+ $rep->AmountCol(4, 5, $demandqty, $dec);
+ $rep->AmountCol(5, 6, $trans['QtyOnHand'] - $demandqty, $dec);
+ $rep->AmountCol(6, 7, $onorder, $dec);
}
- if ($pictures)
+ if ($pictures || $barcodes)
{
- $image = $comp_path .'/'. $user_comp . '/images/' . $trans['stock_id'] . '.jpg';
- if (file_exists($image))
+ $rep->NewLine();
+ if ($rep->row - $SysPrefs->pic_height < $rep->bottomMargin)
+ $rep->NewPage();
+ $firstcol = 1;
+ $adjust = false;
+ if ($barcodes && barcode_check($trans['stock_id']))
+ {
+ $adjust = true;
+ $bar_y = $rep->GetY();
+ $barcode = str_pad($trans['stock_id'], 7, '0', STR_PAD_LEFT);
+ $barcode = substr($barcode, 0, 8); // EAN 8 Check digit is auto computed and barcode printed
+ $rep->write1DBarcode($barcode, 'EAN8', $rep->cols[$firstcol++], $bar_y + 22, 22, $SysPrefs->pic_height, 1.2, $style, 'N');
+ }
+ if ($pictures)
{
- $rep->NewLine();
- if ($rep->row - $pic_height < $rep->bottomMargin)
- $rep->Header();
- $rep->AddImage($image, $rep->cols[1], $rep->row - $pic_height, $pic_width, $pic_height);
- $rep->row -= $pic_height;
- $rep->NewLine();
+ $adjust = true;
+ $image = company_path() . '/images/' . item_img_name($trans['stock_id']) . '.jpg';
+ if (file_exists($image))
+ {
+ $rep->AddImage($image, $rep->cols[$firstcol], $rep->row - $SysPrefs->pic_height, 0, $SysPrefs->pic_height);
+ }
}
+ if ($adjust)
+ $rep->row -= $SysPrefs->pic_height;
}
}
$rep->Line($rep->row - 4);
+ $rep->NewLine();
$rep->End();
}
-?>
\ No newline at end of file
projects / fa-stable.git / blobdiff