X-Git-Url: https://delta.frontaccounting.com/gitweb/?a=blobdiff_plain;f=reporting%2Frep303.php;h=c1165c41144d831514b33597035668d376efe180;hb=f3a1386748cd9250419b5ad03b95c56af2bb5f92;hp=7d8984dbfca13d4b2af6974b529c3b901985d9a5;hpb=a9d55e1c13cbd6a6305b9322ec8621a06516f9f3;p=fa-stable.git

diff --git a/reporting/rep303.php b/reporting/rep303.php
index 7d8984db..c1165c41 100644
--- a/reporting/rep303.php
+++ b/reporting/rep303.php
@@ -29,6 +29,108 @@ include_once($path_to_root . "/includes/db/manufacturing_db.inc");
 
 print_stock_check();
 
+/**
+ * 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)
+{
+	//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 / 
+	 */
+
+	//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;
+
+	//Trims parsed string to remove unwanted whitespace or characters
+	$code = (string)trim($code); 
+	if (preg_match('/[^0-9]/', $code))
+		return false;
+
+	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
+		return false;
+}
+	
 function getTransactions($category, $location, $item_like)
 {
 	$sql = "SELECT item.category_id,
@@ -112,6 +214,7 @@ function print_stock_check()
 		$short = _('No');
 		$available = _('Available');
 	}
+	$barcodes = !empty($SysPrefs->prefs['barcodes_on_stock']);
 	if ($no_zeros) $nozeros = _('Yes');
 	else $nozeros = _('No');
 	if ($check)
@@ -127,12 +230,33 @@ function print_stock_check()
 		$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' => ''),
-    				3 => array('text' => _('Only Shortage'), 'from' => $short, 'to' => ''),
-					4 => array('text' => _('Suppress Zeros'), 'from' => $nozeros, 'to' => ''));
+	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", user_pagesize(), 9, $orientation);
     if ($orientation == 'L')
@@ -153,9 +277,7 @@ function print_stock_check()
 		$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);
-		$flag = get_mb_flag($trans['stock_id']);
-		if ($flag == 'M')
-			$onorder += get_on_worder_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)
@@ -191,19 +313,32 @@ function print_stock_check()
 			$rep->AmountCol(5, 6, $trans['QtyOnHand'] - $demandqty, $dec);
 			$rep->AmountCol(6, 7, $onorder, $dec);
 		}
-		if ($pictures)
+		if ($pictures || $barcodes)
 		{
-			$image = company_path() . '/images/'
-				. item_img_name($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']))
 			{
-				$rep->NewLine();
-				if ($rep->row - $SysPrefs->pic_height < $rep->bottomMargin)
-					$rep->NewPage();
-				$rep->AddImage($image, $rep->cols[1], $rep->row - $SysPrefs->pic_height, 0, $SysPrefs->pic_height);
-				$rep->row -= $SysPrefs->pic_height;
-				$rep->NewLine();
+				$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)
+			{
+				$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);