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 ***********************************************************************/
13 $path_to_root="../..";
14 include($path_to_root . "/includes/db_pager.inc");
15 include($path_to_root . "/includes/session.inc");
17 include($path_to_root . "/purchasing/includes/purchasing_ui.inc");
19 if ($use_popup_windows)
20 $js .= get_js_open_window(900, 500);
22 $js .= get_js_date_picker();
23 page(_("Supplier Allocation Inquiry"), false, false, "", $js);
25 if (isset($_GET['supplier_id']))
27 $_POST['supplier_id'] = $_GET['supplier_id'];
29 if (isset($_GET['FromDate']))
31 $_POST['TransAfterDate'] = $_GET['FromDate'];
33 if (isset($_GET['ToDate']))
35 $_POST['TransToDate'] = $_GET['ToDate'];
38 //------------------------------------------------------------------------------------------------
42 if (!isset($_POST['supplier_id']))
43 $_POST['supplier_id'] = get_global_supplier();
45 start_table("class='tablestyle_noborder'");
48 supplier_list_cells(_("Select a supplier: "), 'supplier_id', $_POST['supplier_id'], true);
50 date_cells(_("From:"), 'TransAfterDate', '', null, -30);
51 date_cells(_("To:"), 'TransToDate', '', null, 1);
53 supp_allocations_list_cell("filterType", null);
55 check_cells(_("show settled:"), 'showSettled', null);
57 submit_cells('RefreshInquiry', _("Search"),'',_('Refresh Inquiry'), true);
59 set_global_supplier($_POST['supplier_id']);
64 //------------------------------------------------------------------------------------------------
65 function check_overdue($row)
67 return ($row['TotalAmount']>$row['Allocated']) &&
71 function systype_name($dummy, $type)
73 return systypes::name($type);
76 function view_link($trans)
78 return get_trans_view_str($trans["type"], $trans["trans_no"]);
81 function due_date($row)
83 return (($row["type"] == 20) || ($row["type"]== 21))
84 ? $row["due_date"] : "";
87 function fmt_balance($row)
89 $value = ($row["type"] == 1 || $row["type"] == 21 || $row["type"] == 22)
90 ? -$row["TotalAmount"] - $row["Allocated"]
91 : $row["TotalAmount"] - $row["Allocated"];
95 function alloc_link($row)
98 pager_link(_("Allocations"),
99 "/purchasing/allocations/supplier_allocate.php?trans_no=" .
100 $row["trans_no"]. "&trans_type=" . $row["type"], ICON_MONEY );
102 return (($row["type"] == 1 || $row["type"] == 21 || $row["type"] == 22)
103 && (-$row["TotalAmount"] - $row["Allocated"]) > 0)
107 function fmt_debit($row)
109 $value = -$row["TotalAmount"];
110 return $value>=0 ? price_format($value) : '';
114 function fmt_credit($row)
116 $value = $row["TotalAmount"];
117 return $value>0 ? price_format($value) : '';
119 //------------------------------------------------------------------------------------------------
121 $date_after = date2sql($_POST['TransAfterDate']);
122 $date_to = date2sql($_POST['TransToDate']);
124 // Sherifoz 22.06.03 Also get the description
130 trans.supp_reference,
134 (trans.ov_amount + trans.ov_gst + trans.ov_discount) AS TotalAmount,
135 trans.alloc AS Allocated,
136 ((trans.type = 20 OR trans.type = 21) AND trans.due_date < '" . date2sql(Today()) . "') AS OverDue
138 .TB_PREF."supp_trans as trans, "
139 .TB_PREF."suppliers as supplier
140 WHERE supplier.supplier_id = trans.supplier_id
141 AND trans.tran_date >= '$date_after'
142 AND trans.tran_date <= '$date_to'";
143 if ($_POST['supplier_id'] != reserved_words::get_all())
144 $sql .= " AND trans.supplier_id = '" . $_POST['supplier_id'] . "'";
145 if (isset($_POST['filterType']) && $_POST['filterType'] != reserved_words::get_all())
147 if (($_POST['filterType'] == '1') || ($_POST['filterType'] == '2'))
149 $sql .= " AND trans.type = 20 ";
151 elseif ($_POST['filterType'] == '3')
153 $sql .= " AND trans.type = 22 ";
155 elseif (($_POST['filterType'] == '4') || ($_POST['filterType'] == '5'))
157 $sql .= " AND trans.type = 21 ";
160 if (($_POST['filterType'] == '2') || ($_POST['filterType'] == '5'))
162 $today = date2sql(Today());
163 $sql .= " AND trans.due_date < '$today' ";
167 if (!check_value('showSettled'))
169 $sql .= " AND (round(abs(ov_amount + ov_gst + ov_discount) - alloc,6) != 0) ";
173 _("Type") => array('fun'=>'systype_name'),
174 _("#") => array('fun'=>'view_link', 'ord'=>''),
176 _("Supplier") => array('ord'=>''),
178 _("Date") => array('name'=>'tran_date', 'type'=>'date', 'ord'=>'asc'),
179 _("Due Date") => array('fun'=>'due_date'),
180 _("Currency") => array('align'=>'center'),
181 _("Debit") => array('align'=>'right', 'fun'=>'fmt_debit'),
182 _("Credit") => array('align'=>'right', 'insert'=>true, 'fun'=>'fmt_credit'),
183 _("Allocated") => 'amount',
184 _("Balance") => array('type'=>'amount', 'insert'=>true, 'fun'=>'fmt_balance'),
185 array('insert'=>true, 'fun'=>'alloc_link')
188 if ($_POST['supplier_id'] != reserved_words::get_all()) {
189 $cols[_("Supplier")] = 'skip';
190 $cols[_("Currency")] = 'skip';
192 //------------------------------------------------------------------------------------------------
194 $table =& new_db_pager('doc_tbl', $sql, $cols);
195 $table->set_marker('check_overdue', _("Marked items are overdue."));
197 if (get_post('RefreshInquiry')) {
198 $table->set_sql($sql);
199 $table->set_columns($cols);
201 $table->width = "90%";
204 display_db_pager($table);