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 ($SysPrefs->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 $settled = false;
  46 if (check_value('ShowSettled'))
  47         $settled = true;
  48
  49 $customer_id = null;
  50 if (isset($_POST['customer_id']))
  51         $customer_id = $_POST['customer_id'];
  52
  53 //--------------------------------------------------------------------------------
  54 function systype_name($dummy, $type)
  55 {
  56         global $systypes_array;
  57
  58         return $systypes_array[$type];
  59 }
  60
  61 function trans_view($trans)
  62 {
  63         return get_trans_view_str($trans["type"], $trans["trans_no"]);
  64 }
  65
  66 function alloc_link($row)
  67 {
  68         return pager_link(_("Allocate"),
  69                 "/sales/allocations/customer_allocate.php?trans_no="
  70                         .$row["trans_no"] . "&trans_type=" . $row["type"]. "&debtor_no=" . $row["debtor_no"], ICON_ALLOC);
  71 }
  72
  73 function amount_total($row)
  74 {
  75         return price_format($row['type'] == ST_JOURNAL && $row["Total"] < 0 ? -$row["Total"] : $row["Total"]);
  76 }
  77
  78 function amount_left($row)
  79 {
  80         return price_format(($row['type'] == ST_JOURNAL && $row["Total"] < 0 ? -$row["Total"] : $row["Total"])-$row["alloc"]);
  81 }
  82
  83 function check_settled($row)
  84 {
  85         return $row['settled'] == 1;
  86 }
  87
  88
  89 $sql = get_allocatable_from_cust_sql($customer_id, $settled);
  90
  91 $cols = array(
  92         _("Transaction Type") => array('fun'=>'systype_name'),
  93         _("#") => array('fun'=>'trans_view', 'align'=>'right'),
  94         _("Reference"),
  95         _("Date") => array('name'=>'tran_date', 'type'=>'date', 'ord'=>'asc'),
  96         _("Customer") => array('ord'=>''),
  97         _("Currency") => array('align'=>'center'),
  98         _("Total") => array('align'=>'right','fun'=>'amount_total'),
  99         _("Left to Allocate") => array('align'=>'right','insert'=>true, 'fun'=>'amount_left'),
 100         array('insert'=>true, 'fun'=>'alloc_link')
 101         );
 102
 103 if (isset($_POST['customer_id'])) {
 104         $cols[_("Customer")] = 'skip';
 105         $cols[_("Currency")] = 'skip';
 106 }
 107
 108 $table =& new_db_pager('alloc_tbl', $sql, $cols);
 109 $table->set_marker('check_settled', _("Marked items are settled."), 'settledbg', 'settledfg');
 110
 111 $table->width = "75%";
 112
 113 display_db_pager($table);
 114 end_form();
 115
 116 end_page();