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