X-Git-Url: https://delta.frontaccounting.com/gitweb/?a=blobdiff_plain;f=reporting%2Frep303.php;h=c1165c41144d831514b33597035668d376efe180;hb=7e6e0807990447d2977b970c3a0fd28dc9250194;hp=1cfab257919bd862636f370bd1107bab99d407f0;hpb=c09be0dad6b05131e240349a375af7a4b7bf3444;p=fa-stable.git diff --git a/reporting/rep303.php b/reporting/rep303.php index 1cfab257..c1165c41 100644 --- a/reporting/rep303.php +++ b/reporting/rep303.php @@ -1,147 +1,287 @@ . +***********************************************************************/ +$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; - return $DemandQty; + 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 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']; - $comments = $_POST['PARAM_3']; + 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; - - $cols = array(0, 100, 305, 375, 445, 515); - - $headers = array(_('Category'), _('Description'), _('Quantity'), _('Demand'), _('Difference')); - - $aligns = array('left', 'left', 'right', 'right', 'right'); + $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, 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, 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' => '')); + $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' => '') + ); - 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 != '') @@ -154,31 +294,55 @@ function print_stock_check() $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(3, 4, number_format2($demandqty, $dec)); - $rep->TextCol(4, 5, number_format2($trans['QtyOnHand'] - $demandqty, $dec)); - if ($pictures) + $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) { - $image = $comp_path .'/'. $user_comp . '/images/' . $trans['stock_id'] . '.jpg'; - if (file_exists($image)) + $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->AmountCol(4, 5, $demandqty, $dec); + $rep->AmountCol(5, 6, $trans['QtyOnHand'] - $demandqty, $dec); + $rep->AmountCol(6, 7, $onorder, $dec); + } + if ($pictures || $barcodes) + { + $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 - $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