Bug 5678: Customer/Supplier Transactions Ageing Display Calculates Incorrectly (inclu...
[fa-stable.git] / purchasing / inquiry / supplier_inquiry.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_SUPPTRANSVIEW';
13 $path_to_root = "../..";
14 include_once($path_to_root . "/includes/db_pager.inc");
15 include_once($path_to_root . "/includes/session.inc");
16
17 include_once($path_to_root . "/purchasing/includes/purchasing_ui.inc");
18 include_once($path_to_root . "/reporting/includes/reporting.inc");
19
20 $js = "";
21 if ($SysPrefs->use_popup_windows)
22         $js .= get_js_open_window(900, 500);
23 if (user_use_date_picker())
24         $js .= get_js_date_picker();
25 page(_($help_context = "Supplier Inquiry"), isset($_GET['supplier_id']), false, "", $js);
26
27 if (isset($_GET['supplier_id'])){
28         $_POST['supplier_id'] = $_GET['supplier_id'];
29 }
30
31 if (isset($_GET['FromDate'])){
32         $_POST['TransAfterDate'] = $_GET['FromDate'];
33 }
34 if (isset($_GET['ToDate'])){
35         $_POST['TransToDate'] = $_GET['ToDate'];
36 }
37
38 //------------------------------------------------------------------------------------------------
39
40 function display_supplier_summary($supplier_record)
41 {
42         $past1 = get_company_pref('past_due_days');
43         $past2 = 2 * $past1;
44         $nowdue = "1-" . $past1 . " " . _('Days');
45         $pastdue1 = $past1 + 1 . "-" . $past2 . " " . _('Days');
46         $pastdue2 = _('Over') . " " . $past2 . " " . _('Days');
47         
48
49     start_table(TABLESTYLE, "width='80%'");
50     $th = array(_("Currency"), _("Terms"), _("Current"), $nowdue,
51         $pastdue1, $pastdue2, _("Total Balance"));
52
53         table_header($th);
54     start_row();
55         label_cell($supplier_record["curr_code"]);
56     label_cell($supplier_record["terms"]);
57     amount_cell($supplier_record["Balance"] - $supplier_record["Due"]);
58     amount_cell($supplier_record["Due"] - $supplier_record["Overdue1"]);
59     amount_cell($supplier_record["Overdue1"] - $supplier_record["Overdue2"]);
60     amount_cell($supplier_record["Overdue2"]);
61     amount_cell($supplier_record["Balance"]);
62     end_row();
63     end_table(1);
64 }
65 //------------------------------------------------------------------------------------------------
66 function systype_name($dummy, $type)
67 {
68         global $systypes_array;
69         return $systypes_array[$type];
70 }
71
72 function trans_view($trans)
73 {
74         return get_trans_view_str($trans["type"], $trans["trans_no"]);
75 }
76
77 function due_date($row)
78 {
79         return ($row["type"]== ST_SUPPINVOICE) || ($row["type"]== ST_SUPPCREDIT) ? $row["due_date"] : '';
80 }
81
82 function gl_view($row)
83 {
84         return get_gl_view_str($row["type"], $row["trans_no"]);
85 }
86
87 function credit_link($row)
88 {
89         global $page_nested;
90
91         if ($page_nested)
92                 return '';
93         return $row['type'] == ST_SUPPINVOICE && $row["TotalAmount"] - $row["Allocated"] > 0 ?
94                 pager_link(_("Credit This"),
95                         "/purchasing/supplier_credit.php?New=1&invoice_no=".
96                         $row['trans_no'], ICON_CREDIT)
97                         : '';
98 }
99
100 function fmt_amount($row)
101 {
102         $value = $row["TotalAmount"];
103         return price_format($value);
104 }
105
106 function prt_link($row)
107 {
108         if ($row['type'] == ST_SUPPAYMENT || $row['type'] == ST_BANKPAYMENT || $row['type'] == ST_SUPPCREDIT) 
109                 return print_document_link($row['trans_no']."-".$row['type'], _("Print Remittance"), true, ST_SUPPAYMENT, ICON_PRINT);
110 }
111
112 function check_overdue($row)
113 {
114         return $row['OverDue'] == 1
115                 && (abs($row["TotalAmount"]) - $row["Allocated"] != 0);
116 }
117
118 function edit_link($row)
119 {
120         global $page_nested;
121
122         if ($page_nested)
123                 return '';
124         return trans_editor_link($row['type'], $row['trans_no']);
125 }
126 //------------------------------------------------------------------------------------------------
127
128 start_form();
129
130 if (!isset($_POST['supplier_id']))
131         $_POST['supplier_id'] = get_global_supplier();
132
133 start_table(TABLESTYLE_NOBORDER);
134 start_row();
135
136 if (!$page_nested)
137         supplier_list_cells(_("Select a supplier:"), 'supplier_id', null, true, true, false, true);
138
139 supp_transactions_list_cell("filterType", null, true);
140
141 if ($_POST['filterType'] != '2')
142 {
143         date_cells(_("From:"), 'TransAfterDate', '', null, -user_transaction_days());
144         date_cells(_("To:"), 'TransToDate');
145 }
146
147 submit_cells('RefreshInquiry', _("Search"),'',_('Refresh Inquiry'), 'default');
148
149 end_row();
150 end_table();
151 set_global_supplier($_POST['supplier_id']);
152
153 //------------------------------------------------------------------------------------------------
154
155 div_start('totals_tbl');
156
157 if ($_POST['supplier_id'] != "" && $_POST['supplier_id'] != ALL_TEXT)
158 {
159         $supplier_record = get_supplier_details(get_post('supplier_id'), get_post('TransToDate'), false);
160     display_supplier_summary($supplier_record);
161 }
162 div_end();
163
164 if (get_post('RefreshInquiry') || list_updated('filterType'))
165 {
166         $Ajax->activate('_page_body');
167 }
168
169 //------------------------------------------------------------------------------------------------
170
171 $sql = get_sql_for_supplier_inquiry(get_post('filterType'), get_post('TransAfterDate'), get_post('TransToDate'), get_post('supplier_id'));
172
173 $cols = array(
174                         _("Type") => array('fun'=>'systype_name', 'ord'=>''), 
175                         _("#") => array('fun'=>'trans_view', 'ord'=>'', 'align'=>'right'), 
176                         _("Reference"), 
177                         _("Supplier"),
178                         _("Supplier's Reference"), 
179                         _("Date") => array('name'=>'tran_date', 'type'=>'date', 'ord'=>'desc'), 
180                         _("Due Date") => array('type'=>'date', 'fun'=>'due_date'), 
181                         _("Currency") => array('align'=>'center'),
182                         _("Amount") => array('align'=>'right', 'fun'=>'fmt_amount'), 
183                         _("Balance") => array('align'=>'right', 'type'=>'amount'),
184                         array('insert'=>true, 'fun'=>'gl_view'),
185                         array('insert'=>true, 'fun'=>'edit_link'),
186                         array('insert'=>true, 'fun'=>'credit_link'),
187                         array('insert'=>true, 'fun'=>'prt_link')
188                         );
189
190 if ($_POST['supplier_id'] != ALL_TEXT)
191 {
192         $cols[_("Supplier")] = 'skip';
193         $cols[_("Currency")] = 'skip';
194 }
195 if ($_POST['filterType'] != '2')
196         $cols[_("Balance")] = 'skip';
197
198 /*show a table of the transactions returned by the sql */
199 $table =& new_db_pager('trans_tbl', $sql, $cols);
200 $table->set_marker('check_overdue', _("Marked items are overdue."));
201
202 $table->width = "85%";
203
204 display_db_pager($table);
205
206 end_form();
207 end_page();
208