Rerun of implemented Selectable Print Orientation (Portrait, Landscape) for all repor...
[fa-stable.git] / reporting / rep303.php
1 <?php
2 /**********************************************************************
3     Copyright (C) FrontAccounting, LLC.
4         Released under the terms of the GNU General Public License, GPL,
5         as published by the Free Software Foundation, either version 3
6         of the License, or (at your option) any later version.
7     This program is distributed in the hope that it will be useful,
8     but WITHOUT ANY WARRANTY; without even the implied warranty of
9     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
10     See the License here <http://www.gnu.org/licenses/gpl-3.0.html>.
11 ***********************************************************************/
12 $page_security = 'SA_ITEMSVALREP';
13 // ----------------------------------------------------------------
14 // $ Revision:  2.0 $
15 // Creator:     Joe Hunt
16 // date_:       2005-05-19
17 // Title:       Stock Check Sheet
18 // ----------------------------------------------------------------
19 $path_to_root="..";
20
21 include_once($path_to_root . "/includes/session.inc");
22 include_once($path_to_root . "/includes/date_functions.inc");
23 include_once($path_to_root . "/includes/data_checks.inc");
24 include_once($path_to_root . "/gl/includes/gl_db.inc");
25 include_once($path_to_root . "/inventory/includes/inventory_db.inc");
26 include_once($path_to_root . "/includes/db/manufacturing_db.inc");
27
28 //----------------------------------------------------------------------------------------------------
29
30 print_stock_check();
31
32 function getTransactions($category, $location)
33 {
34         $sql = "SELECT ".TB_PREF."stock_master.category_id,
35                         ".TB_PREF."stock_category.description AS cat_description,
36                         ".TB_PREF."stock_master.stock_id,
37                         ".TB_PREF."stock_master.units,
38                         ".TB_PREF."stock_master.description, ".TB_PREF."stock_master.inactive,
39                         IF(".TB_PREF."stock_moves.stock_id IS NULL, '', ".TB_PREF."stock_moves.loc_code) AS loc_code,
40                         SUM(IF(".TB_PREF."stock_moves.stock_id IS NULL,0,".TB_PREF."stock_moves.qty)) AS QtyOnHand
41                 FROM (".TB_PREF."stock_master,
42                         ".TB_PREF."stock_category)
43                 LEFT JOIN ".TB_PREF."stock_moves ON
44                         (".TB_PREF."stock_master.stock_id=".TB_PREF."stock_moves.stock_id)
45                 WHERE ".TB_PREF."stock_master.category_id=".TB_PREF."stock_category.category_id
46                 AND (".TB_PREF."stock_master.mb_flag='B' OR ".TB_PREF."stock_master.mb_flag='M')";
47         if ($category != 0)
48                 $sql .= " AND ".TB_PREF."stock_master.category_id = ".db_escape($category);
49         if ($location != 'all')
50                 $sql .= " AND IF(".TB_PREF."stock_moves.stock_id IS NULL, '1=1',".TB_PREF."stock_moves.loc_code = ".db_escape($location).")";
51         $sql .= " GROUP BY ".TB_PREF."stock_master.category_id,
52                 ".TB_PREF."stock_category.description,
53                 ".TB_PREF."stock_master.stock_id,
54                 ".TB_PREF."stock_master.description
55                 ORDER BY ".TB_PREF."stock_master.category_id,
56                 ".TB_PREF."stock_master.stock_id";
57
58     return db_query($sql,"No transactions were returned");
59 }
60
61 //----------------------------------------------------------------------------------------------------
62
63 function print_stock_check()
64 {
65     global $path_to_root, $pic_height;
66
67         $category = $_POST['PARAM_0'];
68         $location = $_POST['PARAM_1'];
69         $pictures = $_POST['PARAM_2'];
70         $check    = $_POST['PARAM_3'];
71         $shortage = $_POST['PARAM_4'];
72         $no_zeros = $_POST['PARAM_5'];
73         $comments = $_POST['PARAM_6'];
74                 $orientation = $_POST['PARAM_7'];
75                 $destination = $_POST['PARAM_8'];
76
77         if ($destination)
78                 include_once($path_to_root . "/reporting/includes/excel_report.inc");
79         else
80                 include_once($path_to_root . "/reporting/includes/pdf_report.inc");
81
82         $orientation = ($orientation ? 'L' : 'P');
83         if ($category == ALL_NUMERIC)
84                 $category = 0;
85         if ($category == 0)
86                 $cat = _('All');
87         else
88                 $cat = get_category_name($category);
89
90         if ($location == ALL_TEXT)
91                 $location = 'all';
92         if ($location == 'all')
93                 $loc = _('All');
94         else
95                 $loc = get_location_name($location);
96         if ($shortage)
97         {
98                 $short = _('Yes');
99                 $available = _('Shortage');
100         }
101         else
102         {
103                 $short = _('No');
104                 $available = _('Available');
105         }
106         if ($no_zeros) $nozeros = _('Yes');
107         else $nozeros = _('No');
108         if ($check)
109         {
110                 $cols = array(0, 75, 225, 250, 295, 345, 390, 445,      515);
111                 $headers = array(_('Stock ID'), _('Description'), _('UOM'), _('Quantity'), _('Check'), _('Demand'), $available, _('On Order'));
112                 $aligns = array('left', 'left', 'left', 'right', 'right', 'right', 'right', 'right');
113         }
114         else
115         {
116                 $cols = array(0, 75, 225, 250, 315, 380, 445,   515);
117                 $headers = array(_('Stock ID'), _('Description'), _('UOM'), _('Quantity'), _('Demand'), $available, _('On Order'));
118                 $aligns = array('left', 'left', 'left', 'right', 'right', 'right', 'right');
119         }
120
121
122         $params =   array(      0 => $comments,
123                                 1 => array('text' => _('Category'), 'from' => $cat, 'to' => ''),
124                                 2 => array('text' => _('Location'), 'from' => $loc, 'to' => ''),
125                                 3 => array('text' => _('Only Shortage'), 'from' => $short, 'to' => ''),
126                                 4 => array('text' => _('Suppress Zeros'), 'from' => $nozeros, 'to' => ''));
127
128         if ($pictures)
129                 $user_comp = user_company();
130         else
131                 $user_comp = "";
132
133         $rep = new FrontReport(_('Stock Check Sheets'), "StockCheckSheet", user_pagesize(), 9, $orientation);
134     if ($orientation == 'L')
135         recalculate_cols($cols);
136
137     $rep->Font();
138     $rep->Info($params, $cols, $headers, $aligns);
139     $rep->NewPage();
140
141         $res = getTransactions($category, $location);
142         $catt = '';
143         while ($trans=db_fetch($res))
144         {
145                 if ($location == 'all')
146                         $loc_code = "";
147                 else
148                         $loc_code = $location;
149                 $demandqty = get_demand_qty($trans['stock_id'], $loc_code);
150                 $demandqty += get_demand_asm_qty($trans['stock_id'], $loc_code);
151                 $onorder = get_on_porder_qty($trans['stock_id'], $loc_code);
152                 $flag = get_mb_flag($trans['stock_id']);
153                 if ($flag == 'M')
154                         $onorder += get_on_worder_qty($trans['stock_id'], $loc_code);
155                 if ($no_zeros && $trans['QtyOnHand'] == 0 && $demandqty == 0 && $onorder == 0)
156                         continue;
157                 if ($shortage && $trans['QtyOnHand'] - $demandqty >= 0)
158                         continue;
159                 if ($catt != $trans['cat_description'])
160                 {
161                         if ($catt != '')
162                         {
163                                 $rep->Line($rep->row - 2);
164                                 $rep->NewLine(2, 3);
165                         }
166                         $rep->TextCol(0, 1, $trans['category_id']);
167                         $rep->TextCol(1, 2, $trans['cat_description']);
168                         $catt = $trans['cat_description'];
169                         $rep->NewLine();
170                 }
171                 $rep->NewLine();
172                 $dec = get_qty_dec($trans['stock_id']);
173                 $rep->TextCol(0, 1, $trans['stock_id']);
174                 $rep->TextCol(1, 2, $trans['description'].($trans['inactive']==1 ? " ("._("Inactive").")" : ""), -1);
175                 $rep->TextCol(2, 3, $trans['units']);
176                 $rep->AmountCol(3, 4, $trans['QtyOnHand'], $dec);
177                 if ($check)
178                 {
179                         $rep->TextCol(4, 5, "_________");
180                         $rep->AmountCol(5, 6, $demandqty, $dec);
181                         $rep->AmountCol(6, 7, $trans['QtyOnHand'] - $demandqty, $dec);
182                         $rep->AmountCol(7, 8, $onorder, $dec);
183                 }
184                 else
185                 {
186                         $rep->AmountCol(4, 5, $demandqty, $dec);
187                         $rep->AmountCol(5, 6, $trans['QtyOnHand'] - $demandqty, $dec);
188                         $rep->AmountCol(6, 7, $onorder, $dec);
189                 }
190                 if ($pictures)
191                 {
192                         $image = company_path() . '/images/'
193                                 . item_img_name($trans['stock_id']) . '.jpg';
194                         if (file_exists($image))
195                         {
196                                 $rep->NewLine();
197                                 if ($rep->row - $pic_height < $rep->bottomMargin)
198                                         $rep->NewPage();
199                                 $rep->AddImage($image, $rep->cols[1], $rep->row - $pic_height, 0, $pic_height);
200                                 $rep->row -= $pic_height;
201                                 $rep->NewLine();
202                         }
203                 }
204         }
205         $rep->Line($rep->row - 4);
206         $rep->NewLine();
207     $rep->End();
208 }
209
210 ?>