Feature 5388: Print Invoices (documents) list gets too long. Fixed by default 180...
[fa-stable.git] / reporting / rep303.php
index 4549a02a3b98ca66f44d9fed84dd9d57304a8a1b..c1165c41144d831514b33597035668d376efe180 100644 (file)
@@ -29,40 +29,141 @@ 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 ".TB_PREF."stock_master.category_id,
-                       ".TB_PREF."stock_category.description AS cat_description,
-                       ".TB_PREF."stock_master.stock_id,
-                       ".TB_PREF."stock_master.units,
-                       ".TB_PREF."stock_master.description, ".TB_PREF."stock_master.inactive,
-                       IF(".TB_PREF."stock_moves.stock_id IS NULL, '', ".TB_PREF."stock_moves.loc_code) AS loc_code,
-                       SUM(IF(".TB_PREF."stock_moves.stock_id IS NULL,0,".TB_PREF."stock_moves.qty)) AS QtyOnHand
-               FROM (".TB_PREF."stock_master,
-                       ".TB_PREF."stock_category)
-               LEFT JOIN ".TB_PREF."stock_moves ON
-                       (".TB_PREF."stock_master.stock_id=".TB_PREF."stock_moves.stock_id)
-               WHERE ".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')";
+       $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 ".TB_PREF."stock_master.category_id = ".db_escape($category);
+               $sql .= " AND item.category_id = ".db_escape($category);
        if ($location != 'all')
-               $sql .= " AND IF(".TB_PREF."stock_moves.stock_id IS NULL, '1=1',".TB_PREF."stock_moves.loc_code = ".db_escape($location).")";
+               $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 ".TB_PREF."stock_master.stock_id RLIKE ".db_escape($regexp);
+      $sql .= " AND item.stock_id RLIKE ".db_escape($regexp);
     else
-      $sql .= " AND ".TB_PREF."stock_master.stock_id LIKE ".db_escape($item_like);
+      $sql .= " AND item.stock_id LIKE ".db_escape($item_like);
   }
-       $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";
+       $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");
 }
@@ -71,16 +172,16 @@ function getTransactions($category, $location, $item_like)
 
 function print_stock_check()
 {
-    global $path_to_root, $pic_height;
-
-       $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'];
+    global $path_to_root, $SysPrefs;
+
+       $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'];
 
@@ -113,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)
@@ -128,17 +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 ($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", user_pagesize(), 9, $orientation);
     if ($orientation == 'L')
@@ -159,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)
@@ -197,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']))
+                       {
+                               $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->NewPage();
-                               $rep->AddImage($image, $rep->cols[1], $rep->row - $pic_height, 0, $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);