Right align numbers in inquiries and lists.
[fa-stable.git] / purchasing / allocations / supplier_allocation_main.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_SUPPLIERALLOC';
13 $path_to_root = "../..";
14 include($path_to_root . "/includes/db_pager.inc");
15 include_once($path_to_root . "/includes/session.inc");
16
17 include_once($path_to_root . "/includes/date_functions.inc");
18
19 include_once($path_to_root . "/includes/ui.inc");
20 include_once($path_to_root . "/includes/banking.inc");
21
22 include_once($path_to_root . "/sales/includes/sales_db.inc");
23 $js = "";
24 if ($SysPrefs->use_popup_windows)
25         $js .= get_js_open_window(900, 500);
26 page(_($help_context = "Supplier Allocations"), false, false, "", $js);
27
28 //--------------------------------------------------------------------------------
29
30 start_form();
31
32         /* show all outstanding receipts and credits to be allocated */
33     if (!isset($_POST['supplier_id']))
34         $_POST['supplier_id'] = get_global_supplier();
35
36     echo "<center>" . _("Select a Supplier: ") . "&nbsp;&nbsp;";
37         echo supplier_list('supplier_id', $_POST['supplier_id'], true, true);
38     echo "<br>";
39     check(_("Show Settled Items:"), 'ShowSettled', null, true);
40         echo "</center><br><br>";
41         set_global_supplier($_POST['supplier_id']);
42
43         if (isset($_POST['supplier_id']) && ($_POST['supplier_id'] == ALL_TEXT)) 
44         {
45                 unset($_POST['supplier_id']);
46         }
47
48         $settled = false;
49         if (check_value('ShowSettled'))
50                 $settled = true;
51         $supplier_id = null;
52         if (isset($_POST['supplier_id']))
53                 $supplier_id = $_POST['supplier_id'];
54
55 //--------------------------------------------------------------------------------
56 function systype_name($dummy, $type)
57 {
58         global $systypes_array;
59
60         return $systypes_array[$type];
61 }
62
63 function trans_view($trans)
64 {
65         return get_trans_view_str($trans["type"], $trans["trans_no"]);
66 }
67
68 function alloc_link($row)
69 {
70         return pager_link(_("Allocate"),
71                 "/purchasing/allocations/supplier_allocate.php?trans_no="
72                         .$row["trans_no"] . "&trans_type=" . $row["type"]. "&supplier_id=" . $row["supplier_id"], ICON_ALLOC);
73 }
74
75 function amount_left($row)
76 {
77         return price_format($row['type'] == ST_JOURNAL ?  abs($row["Total"])-$row["alloc"] : -$row["Total"]-$row["alloc"]);
78 }
79
80 function amount_total($row)
81 {
82         return price_format(-$row["Total"]);
83 }
84
85 function check_settled($row)
86 {
87         return $row['settled'] == 1;
88 }
89
90
91 $sql = get_allocatable_from_supp_sql($supplier_id, $settled);
92
93 $cols = array(
94         _("Transaction Type") => array('fun'=>'systype_name'),
95         _("#") => array('fun'=>'trans_view', 'align'=>'right'),
96         _("Reference"), 
97         _("Date") => array('name'=>'tran_date', 'type'=>'date', 'ord'=>'asc'),
98         _("Supplier") => array('ord'=>''),
99         _("Currency") => array('align'=>'center'),
100         _("Total") => array('align'=>'right', 'fun'=>'amount_total'), 
101         _("Left to Allocate") => array('align'=>'right','insert'=>true, 'fun'=>'amount_left'), 
102         array('insert'=>true, 'fun'=>'alloc_link')
103         );
104
105 if (isset($_POST['customer_id'])) {
106         $cols[_("Supplier")] = 'skip';
107         $cols[_("Currency")] = 'skip';
108 }
109
110 $table =& new_db_pager('alloc_tbl', $sql, $cols);
111 $table->set_marker('check_settled', _("Marked items are settled."), 'settledbg', 'settledfg');
112
113 $table->width = "80%";
114
115 display_db_pager($table);
116
117 end_form();
118 end_page();