5 include_once($path_to_root . "/includes/session.inc");
7 include_once($path_to_root . "/sales/includes/sales_ui.inc");
8 include_once($path_to_root . "/sales/includes/sales_db.inc");
11 if ($use_popup_windows)
12 $js .= get_js_open_window(900, 500);
13 page(_("Customer Allocation Inquiry"), false, false, "", $js);
15 if (isset($_GET['customer_id']))
17 $_POST['customer_id'] = $_GET['customer_id'];
20 //------------------------------------------------------------------------------------------------
22 if (!isset($_POST['customer_id']))
23 $_POST['customer_id'] = get_global_customer();
25 start_form(false, true);
27 start_table("class='tablestyle_noborder'");
30 customer_list_cells(_("Select a customer: "), 'customer_id', $_POST['customer_id'], true);
32 date_cells(_("from:"), 'TransAfterDate', null, -30);
33 date_cells(_("to:"), 'TransToDate', null, 1);
35 cust_allocations_list_cells(_("Type:"), 'filterType', null);
37 check_cells(" " . _("show settled:"), 'showSettled', null);
39 submit_cells('Refresh Inquiry', _("Search"));
41 set_global_customer($_POST['customer_id']);
47 //------------------------------------------------------------------------------------------------
49 function get_transactions()
51 $data_after = date2sql($_POST['TransAfterDate']);
52 $date_to = date2sql($_POST['TransToDate']);
54 $sql = "SELECT ".TB_PREF."debtor_trans.*,
55 ".TB_PREF."debtors_master.name AS CustName, ".TB_PREF."debtors_master.curr_code AS CustCurrCode,
56 (".TB_PREF."debtor_trans.ov_amount + ".TB_PREF."debtor_trans.ov_gst + ".TB_PREF."debtor_trans.ov_freight + ".TB_PREF."debtor_trans.ov_discount)
58 ".TB_PREF."debtor_trans.alloc AS Allocated,
59 ((".TB_PREF."debtor_trans.type = 10)
60 AND ".TB_PREF."debtor_trans.due_date < '" . date2sql(Today()) . "') AS OverDue
61 FROM ".TB_PREF."debtor_trans, ".TB_PREF."debtors_master
62 WHERE ".TB_PREF."debtors_master.debtor_no = ".TB_PREF."debtor_trans.debtor_no
63 AND (".TB_PREF."debtor_trans.ov_amount + ".TB_PREF."debtor_trans.ov_gst + ".TB_PREF."debtor_trans.ov_freight + ".TB_PREF."debtor_trans.ov_discount != 0)
64 AND ".TB_PREF."debtor_trans.tran_date >= '$data_after'
65 AND ".TB_PREF."debtor_trans.tran_date <= '$date_to'";
67 if ($_POST['customer_id'] != reserved_words::get_all())
68 $sql .= " AND ".TB_PREF."debtor_trans.debtor_no = '" . $_POST['customer_id'] . "'";
70 if (isset($_POST['filterType']) && $_POST['filterType'] != reserved_words::get_all())
72 if ($_POST['filterType'] == '1' || $_POST['filterType'] == '2')
74 $sql .= " AND ".TB_PREF."debtor_trans.type = 10 ";
76 elseif ($_POST['filterType'] == '3')
78 $sql .= " AND ".TB_PREF."debtor_trans.type = " . systypes::cust_payment();
80 elseif ($_POST['filterType'] == '4')
82 $sql .= " AND ".TB_PREF."debtor_trans.type = 11 ";
85 if ($_POST['filterType'] == '2')
87 $today = date2sql(Today());
88 $sql .= " AND ".TB_PREF."debtor_trans.due_date < '$today'
89 AND (round(abs(".TB_PREF."debtor_trans.ov_amount + ".TB_PREF."debtor_trans.ov_gst + ".TB_PREF."debtor_trans.ov_freight + ".TB_PREF."debtor_trans.ov_discount) - ".TB_PREF."debtor_trans.alloc,6) > 0) ";
93 if (!check_value('showSettled'))
95 $sql .= " AND (round(abs(".TB_PREF."debtor_trans.ov_amount + ".TB_PREF."debtor_trans.ov_gst + ".TB_PREF."debtor_trans.ov_freight + ".TB_PREF."debtor_trans.ov_discount) - ".TB_PREF."debtor_trans.alloc,6) != 0) ";
98 $sql .= " ORDER BY ".TB_PREF."debtor_trans.tran_date";
100 return db_query($sql,"No transactions were returned");
103 //------------------------------------------------------------------------------------------------
105 $result = get_transactions();
107 if (db_num_rows($result) == 0)
109 display_note(_("The selected customer has no transactions for the given dates."), 1, 1);
114 //------------------------------------------------------------------------------------------------
116 start_table("$table_style width='80%'");
118 if ($_POST['customer_id'] == reserved_words::get_all())
119 $th = array(_("Type"), _("Number"), _("Reference"), _("Order"), _("Date"), _("Due Date"),
120 _("Customer"), _("Currency"), _("Debit"), _("Credit"), _("Allocated"), _("Balance"), "");
122 $th = array(_("Type"), _("Number"), _("Reference"), _("Order"), _("Date"), _("Due Date"),
123 _("Debit"), _("Credit"), _("Allocated"), _("Balance"), "");
129 $k = 0; //row colour counter
131 while ($myrow = db_fetch($result))
134 if ($myrow['OverDue'] == 1 && (abs($myrow["TotalAmount"]) - $myrow["Allocated"] != 0))
136 start_row("class='overduebg'");
140 alt_table_row_color($k);
142 $date = sql2date($myrow["tran_date"]);
144 if ($myrow["order_"] > 0)
145 $preview_order_str = get_customer_trans_view_str(systypes::sales_order(), $myrow["order_"]);
147 $preview_order_str = "";
149 $allocations_str = "";
151 $allocations = "<a href='$path_to_root/sales/allocations/customer_allocate.php?trans_no=" . $myrow["trans_no"] ."&trans_type=" . $myrow["type"] ."'>" . _("Allocation") . "</a>";
155 if ($myrow["type"] == 10)
156 $due_date_str = sql2date($myrow["due_date"]);
157 elseif ($myrow["type"] == 11 && $myrow['TotalAmount'] < 0)
159 /*its a credit note which could have an allocation */
160 $allocations_str = $allocations;
163 elseif ($myrow["type"] == systypes::cust_payment() &&
164 ($myrow['TotalAmount'] + $myrow['Allocated']) < 0)
166 /*its a receipt which could have an allocation*/
167 $allocations_str = $allocations;
170 elseif ($myrow["type"] == systypes::cust_payment() && $myrow['TotalAmount'] > 0)
172 /*its a negative receipt */
175 label_cell(systypes::name($myrow["type"]));
177 label_cell(get_customer_trans_view_str($myrow["type"], $myrow["trans_no"]));
178 label_cell($myrow["reference"]);
179 label_cell($preview_order_str);
180 label_cell(sql2date($myrow["tran_date"]), "nowrap");
181 label_cell($due_date_str, "nowrap");
182 if ($_POST['customer_id'] == reserved_words::get_all())
184 label_cell($myrow["CustName"]);
185 label_cell($myrow["CustCurrCode"]);
187 display_debit_or_credit_cells($myrow["TotalAmount"]);
188 amount_cell(abs($myrow["Allocated"]));
189 amount_cell(abs($myrow["TotalAmount"]) - $myrow["Allocated"]);
190 label_cell($allocations_str);
201 //end of page full new headings if
207 display_note(_("Marked items are overdue."), 0, 1, "class='overduefg'");