2 /**********************************************************************
3 Copyright (C) FrontAccounting, LLC.
4 Released under the terms of the GNU Affero General Public License,
5 AGPL, as published by the Free Software Foundation, either version
6 3 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/agpl-3.0.html>.
11 ***********************************************************************/
13 // ----------------------------------------------------------------
17 // Title: Inventory Planning
18 // ----------------------------------------------------------------
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 . "/includes/banking.inc");
25 include_once($path_to_root . "/gl/includes/gl_db.inc");
26 include_once($path_to_root . "/inventory/includes/db/items_category_db.inc");
28 //----------------------------------------------------------------------------------------------------
30 // trial_inquiry_controls();
31 print_inventory_sales();
33 function getTransactions($category, $location, $from, $to)
35 $from = date2sql($from);
38 $sql = "SELECT ".TB_PREF."stock_master.category_id,
39 ".TB_PREF."stock_category.description AS cat_description,
40 ".TB_PREF."stock_master.stock_id,
41 ".TB_PREF."stock_master.description,
42 ".TB_PREF."stock_moves.loc_code,
43 SUM(-".TB_PREF."stock_moves.qty*".TB_PREF."stock_moves.price*(1-".TB_PREF."stock_moves.discount_percent)) AS amt,
44 SUM(-".TB_PREF."stock_moves.qty) *(".TB_PREF."stock_master.material_cost + ".TB_PREF."stock_master.labour_cost + ".TB_PREF."stock_master.overhead_cost) AS cost
45 FROM ".TB_PREF."stock_master,
46 ".TB_PREF."stock_category,
47 ".TB_PREF."debtor_trans,
48 ".TB_PREF."stock_moves
49 WHERE ".TB_PREF."stock_master.stock_id=".TB_PREF."stock_moves.stock_id
50 AND ".TB_PREF."stock_master.category_id=".TB_PREF."stock_category.category_id
52 AND ".TB_PREF."stock_moves.type=".TB_PREF."debtor_trans.type
53 AND ".TB_PREF."stock_moves.trans_no=".TB_PREF."debtor_trans.trans_no
54 AND ".TB_PREF."stock_moves.tran_date>='$from'
55 AND ".TB_PREF."stock_moves.tran_date<='$to'
56 AND ((".TB_PREF."debtor_trans.type=13 AND ".TB_PREF."debtor_trans.version=1) OR ".TB_PREF."stock_moves.type=11)
57 AND (".TB_PREF."stock_master.mb_flag='B' OR ".TB_PREF."stock_master.mb_flag='M')";
59 $sql .= " AND ".TB_PREF."stock_master.category_id = '$category'";
60 if ($location != 'all')
61 $sql .= " AND ".TB_PREF."stock_moves.loc_code = '$location'";
62 //$sql .= " AND SUM(".TB_PREF."stock_moves.qty) != 0
63 $sql .= " GROUP BY ".TB_PREF."stock_master.category_id,
64 ".TB_PREF."stock_category.description,
65 ".TB_PREF."stock_master.stock_id,
66 ".TB_PREF."stock_master.description
67 ORDER BY ".TB_PREF."stock_master.category_id,
68 ".TB_PREF."stock_master.stock_id";
70 $sql = "SELECT ".TB_PREF."stock_master.category_id,
71 ".TB_PREF."stock_category.description AS cat_description,
72 ".TB_PREF."stock_master.stock_id,
73 ".TB_PREF."stock_master.description,
74 ".TB_PREF."stock_moves.loc_code,
75 ".TB_PREF."debtor_trans.debtor_no,
76 ".TB_PREF."stock_moves.tran_date,
77 -".TB_PREF."stock_moves.qty*".TB_PREF."stock_moves.price*(1-".TB_PREF."stock_moves.discount_percent) AS amt,
78 -".TB_PREF."stock_moves.qty *(".TB_PREF."stock_master.material_cost + ".TB_PREF."stock_master.labour_cost + ".TB_PREF."stock_master.overhead_cost) AS cost
79 FROM ".TB_PREF."stock_master,
80 ".TB_PREF."stock_category,
81 ".TB_PREF."debtor_trans,
82 ".TB_PREF."stock_moves
83 WHERE ".TB_PREF."stock_master.stock_id=".TB_PREF."stock_moves.stock_id
84 AND ".TB_PREF."stock_master.category_id=".TB_PREF."stock_category.category_id
86 AND ".TB_PREF."stock_moves.type=".TB_PREF."debtor_trans.type
87 AND ".TB_PREF."stock_moves.trans_no=".TB_PREF."debtor_trans.trans_no
88 AND ".TB_PREF."stock_moves.tran_date>='$from'
89 AND ".TB_PREF."stock_moves.tran_date<='$to'
90 AND ((".TB_PREF."debtor_trans.type=13 AND ".TB_PREF."debtor_trans.version=1) OR ".TB_PREF."stock_moves.type=11)
91 AND (".TB_PREF."stock_master.mb_flag='B' OR ".TB_PREF."stock_master.mb_flag='M')";
93 $sql .= " AND ".TB_PREF."stock_master.category_id = '$category'";
94 if ($location != 'all')
95 $sql .= " AND ".TB_PREF."stock_moves.loc_code = '$location'";
96 //$sql .= " AND SUM(".TB_PREF."stock_moves.qty) != 0
97 $sql .= " ORDER BY ".TB_PREF."stock_master.category_id,
98 ".TB_PREF."stock_master.stock_id";
99 return db_query($sql,"No transactions were returned");
103 //----------------------------------------------------------------------------------------------------
105 function print_inventory_sales()
107 global $path_to_root;
109 include_once($path_to_root . "/reporting/includes/pdf_report.inc");
111 $from = $_POST['PARAM_0'];
112 $to = $_POST['PARAM_1'];
113 $category = $_POST['PARAM_2'];
114 $location = $_POST['PARAM_3'];
115 $detail = $_POST['PARAM_4'];
116 $comments = $_POST['PARAM_5'];
118 $dec = user_price_dec();
120 if ($category == reserved_words::get_all_numeric())
125 $cat = get_category_name($category);
127 if ($location == reserved_words::get_all())
129 if ($location == 'all')
132 $loc = get_location_name($location);
134 $cols = array(0, 100, 250, 350, 450, 515);
136 $headers = array(_('Category'), '', _('Sales'), _('Cost'), _('Contribution'));
138 $aligns = array('left', 'left', 'right', 'right', 'right');
140 $params = array( 0 => $comments,
141 1 => array('text' => _('Period'),'from' => $from, 'to' => $to),
142 2 => array('text' => _('Category'), 'from' => $cat, 'to' => ''),
143 3 => array('text' => _('Location'), 'from' => $loc, 'to' => ''));
145 $rep = new FrontReport(_('Inventory Sales Report'), "InventorySalesReport.pdf", user_pagesize());
148 $rep->Info($params, $cols, $headers, $aligns);
151 $res = getTransactions($category, $location, $from, $to);
152 $total = $grandtotal = 0.0;
153 $total1 = $grandtotal1 = 0.0;
154 $total2 = $grandtotal2 = 0.0;
155 $amt = $cost = $cb = 0;
156 $catt = $stock_id = $stock_desc = '';
157 while ($trans=db_fetch($res))
159 if ($catt != $trans['cat_description'])
166 $rep->TextCol(0, 2, _('Total'));
168 $rep->TextCol(2, 3, number_format2($total, $dec));
169 $rep->TextCol(3, 4, number_format2($total1, $dec));
170 $rep->Textcol(4, 5, number_format2($total2, $dec));
173 $rep->Line($rep->row - 2);
177 $total = $total1 = $total2 = 0.0;
179 $rep->TextCol(0, 1, $trans['category_id']);
180 $rep->TextCol(1, 2, $trans['cat_description']);
181 $catt = $trans['cat_description'];
185 if ($stock_id != $trans['stock_id'])
193 $rep->TextCol(0, 1, $stock_id);
194 $rep->TextCol(1, 2, $stock_desc);
195 $rep->TextCol(2, 3, number_format2($amt, $dec));
196 $rep->TextCol(3, 4, number_format2($cost, $dec));
197 $rep->TextCol(4, 5, number_format2($cb, $dec));
200 $amt = $cost = $cb = 0;
202 $stock_id = $trans['stock_id'];
203 $stock_desc = $trans['description'];
205 $curr = get_customer_currency($trans['debtor_no']);
206 $rate = get_exchange_rate_from_home_currency($curr, sql2date($trans['tran_date']));
207 $trans['amt'] *= $rate;
208 $amt += $trans['amt'];
209 $cost += $trans['cost'];
210 $cb1 = $trans['amt'] - $trans['cost'];
212 $total += $trans['amt'];
213 $total1 += $trans['cost'];
215 $grandtotal += $trans['amt'];
216 $grandtotal1 += $trans['cost'];
217 $grandtotal2 += $cb1;
223 $rep->TextCol(0, 1, $stock_id);
224 $rep->TextCol(1, 2, $stock_desc);
225 $rep->TextCol(2, 3, number_format2($amt, $dec));
226 $rep->TextCol(3, 4, number_format2($cost, $dec));
227 $rep->TextCol(4, 5, number_format2($cb, $dec));
231 $rep->TextCol(0, 2, _('Total'));
233 $rep->TextCol(2, 3, number_format2($total, $dec));
234 $rep->TextCol(3, 4, number_format2($total1, $dec));
235 $rep->Textcol(4, 5, number_format2($total2, $dec));
238 $rep->Line($rep->row - 2);
242 $rep->TextCol(0, 2, _('Grand Total'));
243 $rep->TextCol(2, 3, number_format2($grandtotal, $dec));
244 $rep->TextCol(3, 4, number_format2($grandtotal1, $dec));
245 $rep->Textcol(4, 5, number_format2($grandtotal2, $dec));
247 $rep->Line($rep->row - 4);