Bug 5678: Customer/Supplier Transactions Ageing Display Calculates Incorrectly (inclu...
[fa-stable.git] / purchasing / inquiry / supplier_inquiry.php
index bb6aa4403538aec2d2016fd64072ca186b463b02..f3c3141e648c6bc72f488739cfd4ef42fe3b60b3 100644 (file)
@@ -1,19 +1,33 @@
 <?php
-
-$page_security=2;
-$path_to_root="../..";
-include($path_to_root . "/includes/session.inc");
-
-include($path_to_root . "/purchasing/includes/purchasing_ui.inc");
+/**********************************************************************
+    Copyright (C) FrontAccounting, LLC.
+       Released under the terms of the GNU General Public License, GPL, 
+       as published by the Free Software Foundation, either version 3 
+       of the License, or (at your option) any later version.
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  
+    See the License here <http://www.gnu.org/licenses/gpl-3.0.html>.
+***********************************************************************/
+$page_security = 'SA_SUPPTRANSVIEW';
+$path_to_root = "../..";
+include_once($path_to_root . "/includes/db_pager.inc");
+include_once($path_to_root . "/includes/session.inc");
+
+include_once($path_to_root . "/purchasing/includes/purchasing_ui.inc");
+include_once($path_to_root . "/reporting/includes/reporting.inc");
 
 $js = "";
-if ($use_popup_windows)
+if ($SysPrefs->use_popup_windows)
        $js .= get_js_open_window(900, 500);
-page(_("Supplier Inquiry"), false, false, "", $js);
+if (user_use_date_picker())
+       $js .= get_js_date_picker();
+page(_($help_context = "Supplier Inquiry"), isset($_GET['supplier_id']), false, "", $js);
 
 if (isset($_GET['supplier_id'])){
        $_POST['supplier_id'] = $_GET['supplier_id'];
 }
+
 if (isset($_GET['FromDate'])){
        $_POST['TransAfterDate'] = $_GET['FromDate'];
 }
@@ -23,36 +37,8 @@ if (isset($_GET['ToDate'])){
 
 //------------------------------------------------------------------------------------------------
 
-start_form(false, true);
-
-if (!isset($_POST['supplier_id']))
-       $_POST['supplier_id'] = get_global_supplier();
-
-start_table("class='tablestyle_noborder'");
-start_row();
-
-supplier_list_cells(_("Select a supplier:"), 'supplier_id', null, true);
-
-date_cells(_("From:"), 'TransAfterDate', null, -30);
-date_cells(_("To:"), 'TransToDate');
-
-supp_allocations_list_cells("filterType", null);
-
-submit_cells('Refresh Inquiry', _("Search"));
-
-end_row();
-end_table();
-
-end_form();
-
-set_global_supplier($_POST['supplier_id']);
-
-//------------------------------------------------------------------------------------------------
-
 function display_supplier_summary($supplier_record)
 {
-       global $table_style;
-
        $past1 = get_company_pref('past_due_days');
        $past2 = 2 * $past1;
        $nowdue = "1-" . $past1 . " " . _('Days');
@@ -60,7 +46,7 @@ function display_supplier_summary($supplier_record)
        $pastdue2 = _('Over') . " " . $past2 . " " . _('Days');
        
 
-    start_table("width=80% $table_style");
+    start_table(TABLESTYLE, "width='80%'");
     $th = array(_("Currency"), _("Terms"), _("Current"), $nowdue,
        $pastdue1, $pastdue2, _("Total Balance"));
 
@@ -76,149 +62,147 @@ function display_supplier_summary($supplier_record)
     end_row();
     end_table(1);
 }
-
 //------------------------------------------------------------------------------------------------
+function systype_name($dummy, $type)
+{
+       global $systypes_array;
+       return $systypes_array[$type];
+}
 
-function get_transactions()
+function trans_view($trans)
 {
-       global $db;
-
-    $date_after = date2sql($_POST['TransAfterDate']);
-    $date_to = date2sql($_POST['TransToDate']);
-
-    // Sherifoz 22.06.03 Also get the description
-    $sql = "SELECT ".TB_PREF."supp_trans.type, ".TB_PREF."supp_trans.trans_no,
-       ".TB_PREF."supp_trans.tran_date, ".TB_PREF."supp_trans.reference, ".TB_PREF."supp_trans.supp_reference,
-       (".TB_PREF."supp_trans.ov_amount + ".TB_PREF."supp_trans.ov_gst  + ".TB_PREF."supp_trans.ov_discount) AS TotalAmount, ".TB_PREF."supp_trans.alloc AS Allocated,
-               ((".TB_PREF."supp_trans.type = 20 OR ".TB_PREF."supp_trans.type = 21) AND ".TB_PREF."supp_trans.due_date < '" . date2sql(Today()) . "') AS OverDue,
-       (ABS(".TB_PREF."supp_trans.ov_amount + ".TB_PREF."supp_trans.ov_gst  + ".TB_PREF."supp_trans.ov_discount - ".TB_PREF."supp_trans.alloc) <= 0.005) AS Settled,
-               ".TB_PREF."suppliers.curr_code, ".TB_PREF."suppliers.supp_name, ".TB_PREF."supp_trans.due_date
-       FROM ".TB_PREF."supp_trans, ".TB_PREF."suppliers
-       WHERE ".TB_PREF."suppliers.supplier_id = ".TB_PREF."supp_trans.supplier_id
-       AND ".TB_PREF."supp_trans.tran_date >= '$date_after'
-       AND ".TB_PREF."supp_trans.tran_date <= '$date_to'";
-       if ($_POST['supplier_id'] != reserved_words::get_all())
-               $sql .= " AND ".TB_PREF."supp_trans.supplier_id = '" . $_POST['supplier_id'] . "'";
-       if (isset($_POST['filterType']) && $_POST['filterType'] != reserved_words::get_all())
-       {
-               if (($_POST['filterType'] == '1')) 
-               {
-                       $sql .= " AND (".TB_PREF."supp_trans.type = 20 OR ".TB_PREF."supp_trans.type = 2)";
-               } 
-               elseif (($_POST['filterType'] == '2')) 
-               {
-                       $sql .= " AND ".TB_PREF."supp_trans.type = 20 ";
-               } 
-               elseif ($_POST['filterType'] == '3') 
-               {
-                       $sql .= " AND (".TB_PREF."supp_trans.type = 22 OR ".TB_PREF."supp_trans.type = 1) ";
-               } 
-               elseif (($_POST['filterType'] == '4') || ($_POST['filterType'] == '5')) 
-               {
-                       $sql .= " AND ".TB_PREF."supp_trans.type = 21  ";
-               }
-
-               if (($_POST['filterType'] == '2') || ($_POST['filterType'] == '5')) 
-               {
-                       $today =  date2sql(Today());
-                       $sql .= " AND ".TB_PREF."supp_trans.due_date < '$today' ";
-               }
-       }
-
-    $sql .= " ORDER BY ".TB_PREF."supp_trans.tran_date";
-
-    return db_query($sql,"No supplier transactions were returned");
+       return get_trans_view_str($trans["type"], $trans["trans_no"]);
 }
 
-//------------------------------------------------------------------------------------------------
+function due_date($row)
+{
+       return ($row["type"]== ST_SUPPINVOICE) || ($row["type"]== ST_SUPPCREDIT) ? $row["due_date"] : '';
+}
 
-if (($_POST['supplier_id'] != "") && ($_POST['supplier_id'] != reserved_words::get_all()))
+function gl_view($row)
 {
-       $supplier_record = get_supplier_details($_POST['supplier_id']);
-    display_supplier_summary($supplier_record);
+       return get_gl_view_str($row["type"], $row["trans_no"]);
 }
 
-//------------------------------------------------------------------------------------------------
+function credit_link($row)
+{
+       global $page_nested;
+
+       if ($page_nested)
+               return '';
+       return $row['type'] == ST_SUPPINVOICE && $row["TotalAmount"] - $row["Allocated"] > 0 ?
+               pager_link(_("Credit This"),
+                       "/purchasing/supplier_credit.php?New=1&invoice_no=".
+                       $row['trans_no'], ICON_CREDIT)
+                       : '';
+}
 
-$result = get_transactions();
+function fmt_amount($row)
+{
+       $value = $row["TotalAmount"];
+       return price_format($value);
+}
+
+function prt_link($row)
+{
+       if ($row['type'] == ST_SUPPAYMENT || $row['type'] == ST_BANKPAYMENT || $row['type'] == ST_SUPPCREDIT) 
+               return print_document_link($row['trans_no']."-".$row['type'], _("Print Remittance"), true, ST_SUPPAYMENT, ICON_PRINT);
+}
 
-if (db_num_rows($result) == 0)
+function check_overdue($row)
 {
-       display_note(_("There are no transactions to display for the given dates."), 1, 1);
-       end_page();
-       exit;
+       return $row['OverDue'] == 1
+               && (abs($row["TotalAmount"]) - $row["Allocated"] != 0);
 }
 
+function edit_link($row)
+{
+       global $page_nested;
+
+       if ($page_nested)
+               return '';
+       return trans_editor_link($row['type'], $row['trans_no']);
+}
 //------------------------------------------------------------------------------------------------
 
-/*show a table of the transactions returned by the sql */
+start_form();
+
+if (!isset($_POST['supplier_id']))
+       $_POST['supplier_id'] = get_global_supplier();
+
+start_table(TABLESTYLE_NOBORDER);
+start_row();
+
+if (!$page_nested)
+       supplier_list_cells(_("Select a supplier:"), 'supplier_id', null, true, true, false, true);
+
+supp_transactions_list_cell("filterType", null, true);
 
-start_table("$table_style width=80%");
-if ($_POST['supplier_id'] == reserved_words::get_all())
-       $th = array(_("Type"), _("#"), _("Reference"), _("Supplier"),
-               _("Supplier's Reference"), _("Date"), _("Due Date"), _("Currency"),
-               _("Debit"), _("Credit"), "");
-else           
-       $th = array(_("Type"), _("#"), _("Reference"),
-               _("Supplier's Reference"), _("Date"), _("Due Date"),
-               _("Debit"), _("Credit"), "");
-table_header($th);
-
-$j = 1;
-$k = 0; //row colour counter
-$over_due = false;
-while ($myrow = db_fetch($result)) 
+if ($_POST['filterType'] != '2')
 {
+       date_cells(_("From:"), 'TransAfterDate', '', null, -user_transaction_days());
+       date_cells(_("To:"), 'TransToDate');
+}
 
-       if ($myrow['OverDue'] == 1)
-       {
-               start_row("class='overduebg'");
-               $over_due = true;
-       } 
-       else 
-       {
-               alt_table_row_color($k);
-       }
+submit_cells('RefreshInquiry', _("Search"),'',_('Refresh Inquiry'), 'default');
 
-       $date = sql2date($myrow["tran_date"]);
+end_row();
+end_table();
+set_global_supplier($_POST['supplier_id']);
 
-       $duedate = ((($myrow["type"]== 20) || ($myrow["type"]== 21))?sql2date($myrow["due_date"]):"");
+//------------------------------------------------------------------------------------------------
 
+div_start('totals_tbl');
 
-       label_cell(systypes::name($myrow["type"]));
-       label_cell(get_trans_view_str($myrow["type"],$myrow["trans_no"]));      
-       label_cell(get_trans_view_str($myrow["type"],$myrow["trans_no"], $myrow["reference"]));
-       if ($_POST['supplier_id'] == reserved_words::get_all())
-               label_cell($myrow["supp_name"]);
-       label_cell($myrow["supp_reference"]);
-       label_cell($date);
-       label_cell($duedate);
-    if ($_POST['supplier_id'] == reserved_words::get_all())
-       label_cell($myrow["curr_code"]);
-    if ($myrow["TotalAmount"] >= 0)
-       label_cell("");
-       amount_cell(abs($myrow["TotalAmount"]));
-       if ($myrow["TotalAmount"] < 0)
-               label_cell("");
+if ($_POST['supplier_id'] != "" && $_POST['supplier_id'] != ALL_TEXT)
+{
+       $supplier_record = get_supplier_details(get_post('supplier_id'), get_post('TransToDate'), false);
+    display_supplier_summary($supplier_record);
+}
+div_end();
 
-       label_cell(get_gl_view_str($myrow["type"], $myrow["trans_no"]));
+if (get_post('RefreshInquiry') || list_updated('filterType'))
+{
+       $Ajax->activate('_page_body');
+}
 
-       end_row();
+//------------------------------------------------------------------------------------------------
 
-       $j++;
-       If ($j == 12)
-       {
-               $j=1;
-               table_header($th);
-       }
-//end of page full new headings if
+$sql = get_sql_for_supplier_inquiry(get_post('filterType'), get_post('TransAfterDate'), get_post('TransToDate'), get_post('supplier_id'));
+
+$cols = array(
+                       _("Type") => array('fun'=>'systype_name', 'ord'=>''), 
+                       _("#") => array('fun'=>'trans_view', 'ord'=>'', 'align'=>'right'), 
+                       _("Reference"), 
+                       _("Supplier"),
+                       _("Supplier's Reference"), 
+                       _("Date") => array('name'=>'tran_date', 'type'=>'date', 'ord'=>'desc'), 
+                       _("Due Date") => array('type'=>'date', 'fun'=>'due_date'), 
+                       _("Currency") => array('align'=>'center'),
+                       _("Amount") => array('align'=>'right', 'fun'=>'fmt_amount'), 
+                       _("Balance") => array('align'=>'right', 'type'=>'amount'),
+                       array('insert'=>true, 'fun'=>'gl_view'),
+                       array('insert'=>true, 'fun'=>'edit_link'),
+                       array('insert'=>true, 'fun'=>'credit_link'),
+                       array('insert'=>true, 'fun'=>'prt_link')
+                       );
+
+if ($_POST['supplier_id'] != ALL_TEXT)
+{
+       $cols[_("Supplier")] = 'skip';
+       $cols[_("Currency")] = 'skip';
 }
-//end of while loop
+if ($_POST['filterType'] != '2')
+       $cols[_("Balance")] = 'skip';
 
-end_table(1);
-if ($over_due)
-       display_note(_("Marked items are overdue."), 0, 1, "class='overduefg'");
+/*show a table of the transactions returned by the sql */
+$table =& new_db_pager('trans_tbl', $sql, $cols);
+$table->set_marker('check_overdue', _("Marked items are overdue."));
+
+$table->width = "85%";
 
+display_db_pager($table);
 
+end_form();
 end_page();
-?>
+