New journal inquiry.
authorJanusz Dobrowolski <janusz@frontaccounting.eu>
Fri, 8 May 2009 10:26:16 +0000 (10:26 +0000)
committerJanusz Dobrowolski <janusz@frontaccounting.eu>
Fri, 8 May 2009 10:26:16 +0000 (10:26 +0000)
gl/inquiry/journal_inquiry.php [new file with mode: 0644]

diff --git a/gl/inquiry/journal_inquiry.php b/gl/inquiry/journal_inquiry.php
new file mode 100644 (file)
index 0000000..a0ad749
--- /dev/null
@@ -0,0 +1,161 @@
+<?php
+/**********************************************************************
+    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 = 8;
+$path_to_root="../..";
+
+include($path_to_root . "/includes/db_pager.inc");
+include_once($path_to_root . "/includes/session.inc");
+
+include_once($path_to_root . "/includes/date_functions.inc");
+include_once($path_to_root . "/includes/ui.inc");
+$js = "";
+if ($use_popup_windows)
+       $js .= get_js_open_window(800, 500);
+if ($use_date_picker)
+       $js .= get_js_date_picker();
+
+page(_("Journal Inquiry"), false, false, "", $js);
+
+//-----------------------------------------------------------------------------------
+// Ajax updates
+//
+if (get_post('Search'))
+{
+       $Ajax->activate('journal_tbl');
+}
+//--------------------------------------------------------------------------------------
+if (!isset($_POST['filterType']))
+       $_POST['filterType'] = -1;
+
+start_form();
+
+start_table("class='tablestyle_noborder'");
+start_row();
+
+ref_cells(_("Reference:"), 'Ref', '',null, _('Enter reference fragment or leave empty'));
+
+journal_types_list_cells(_("Transaction Type:"), "filterType");
+date_cells(_("From:"), 'FromDate', '', null, 0, 0, -1);
+date_cells(_("To:"), 'ToDate');
+
+submit_cells('Search', _("Search"), '', '', 'default');
+
+end_row();
+end_table();
+
+end_form();
+
+function systype_name($dummy, $type)
+{
+       return systypes::name($type);
+}
+
+function view_link($row) 
+{
+       return get_trans_view_str($row["type"], $row["type_no"]);
+}
+
+function gl_link($row) 
+{
+       return get_gl_view_str($row["type"], $row["type_no"]);
+}
+
+function is_closed($row)
+{
+       return $row['gl_seq'] ? _('Yes') : _('No');
+}
+
+$editors = array(
+       0 => "/gl/gl_journal.php?ModifyGL=Yes&trans_no=%d&trans_type=%d",
+//     1=> Bank Payment,
+//     2=> Bank Deposit,
+//     4=> Funds Transfer,
+   10=> "/sales/customer_invoice.php?ModifyInvoice=%d",
+//   11=>
+// free hand (debtors_trans.order_==0)
+//     "/sales/credit_note_entry.php?ModifyCredit=%d"
+// credit invoice
+//     "/sales/customer_credit_invoice.php?ModifyCredit=%d"
+//      12=> Customer Payment,
+   13=> "/sales/customer_delivery.php?ModifyDelivery=%d",
+//   16=> Location Transfer,
+//   17=> Inventory Adjustment,
+//   20=> Supplier Invoice,
+//   21=> Supplier Credit Note,
+//   22=> Supplier Payment,
+//   25=> Purchase Order Delivery,
+//   28=> Work Order Issue,
+//   29=> Work Order Production",
+//   35=> Cost Update,
+);
+
+function edit_link($row)
+{
+       global $editors;
+
+       return isset($editors[$row["type"]]) ? 
+               pager_link(_("Edit"), 
+                       sprintf($editors[$row["type"]], $row["type_no"], $row["type"]),
+                       ICON_EDIT) : '';
+}
+
+$sql = "SELECT gl.tran_date,
+                               gl.type,
+                               gl.type_no,
+                               refs.reference,
+                               SUM(IF(gl.amount>0, gl.amount,0)) as amount,"
+                               ."com.memo_"
+               ." FROM ". TB_PREF."gl_trans as gl"
+               ." LEFT JOIN ". TB_PREF."comments as com ON 
+                       (gl.type=com.type AND gl.type_no=com.id)"
+               ." LEFT JOIN ". TB_PREF."refs as refs ON 
+                       (gl.type=refs.type AND gl.type_no=refs.id)
+               WHERE gl.tran_date >= '" . date2sql($_POST['FromDate']) . "'
+       AND gl.tran_date <= '" . date2sql($_POST['ToDate']) . "'
+       AND gl.amount!=0";
+
+if (isset($_POST['Ref']) && $_POST['Ref'] != "") {
+       $sql .= " AND reference LIKE '%". $_POST['Ref'] . "%'";
+}
+if (get_post('filterType') != -1) {
+       $sql .= " AND gl.type=".get_post('filterType');
+}
+
+$sql .= " GROUP BY gl.type, gl.type_no";
+
+$cols = array(
+       _("Date") =>array('name'=>'tran_date','type'=>'date','ord'=>'desc'),
+       _("Type") => array('fun'=>'systype_name'), 
+       _("Trans #") => array('fun'=>'view_link'), 
+       _("Reference"), 
+       _("Amount") => array('type'=>'amount'),
+       _("Memo"),
+       _("View") => array('insert'=>true, 'fun'=>'gl_link'),
+       array('insert'=>true, 'fun'=>'edit_link')
+);
+
+$table =& new_db_pager('journal_tbl', $sql, $cols);
+
+if (get_post('Search')) {
+       $table->set_sql($sql);
+       $table->set_columns($cols);
+}
+$table->width = "80%";
+start_form();
+
+display_db_pager($table);
+
+end_form();
+end_page();
+
+?>