-
- $debtor = get_customer_trans($trans_no, $type);
-
- $_SESSION['alloc'] = new allocation($trans_no, $type, $debtor["debtor_no"],
- $debtor["DebtorName"], $debtor["Total"], sql2date($debtor["tran_date"]));
-
- /* Now populate the array of possible (and previous actual) allocations for this customer */
- /*First get the transactions that have outstanding balances ie Total-alloc >0 */
-
- $trans_items = get_allocatable_to_cust_transactions($_SESSION['alloc']->person_id);
-
- while ($myrow = db_fetch($trans_items))
- {
- $_SESSION['alloc']->add_item($myrow["type"], $myrow["trans_no"],
- sql2date($myrow["tran_date"]), sql2date($myrow["due_date"]),
- $myrow["Total"], // trans total
- $myrow["alloc"], // trans total allocated
- 0); // this allocation
- }
-
-
- /* Now get trans that might have previously been allocated to by this trans
- NB existing entries where still some of the trans outstanding entered from
- above logic will be overwritten with the prev alloc detail below */
-
- $trans_items = get_allocatable_to_cust_transactions($_SESSION['alloc']->person_id, $trans_no, $type);
-
- while ($myrow = db_fetch($trans_items))
- {
- $_SESSION['alloc']->add_or_update_item ($myrow["type"], $myrow["trans_no"],
- sql2date($myrow["tran_date"]), sql2date($myrow["due_date"]),
- $myrow["Total"], $myrow["alloc"] - $myrow["amt"], $myrow["amt"]);
- }
-
-}
-
-//--------------------------------------------------------------------------------
-
-function edit_allocations_for_transaction($type, $trans_no)
-{
- global $table_style;
-
- display_heading(sprintf(_("Allocation of %s # %d"), systypes::name($_SESSION['alloc']->type),$_SESSION['alloc']->trans_no));
-
- display_heading($_SESSION['alloc']->person_name);
-
- display_heading2(_("Date:") . " <b>" . $_SESSION['alloc']->date_ . "</b>");
- display_heading2(_("Total:") . " <b>" . price_format($_SESSION['alloc']->amount) . "</b>");
-
- echo "<br>";
-
- start_form(false, true);
-
- if (count($_SESSION['alloc']->allocs) > 0)
- {
- start_table($table_style);
-
- $th = array(_("Transaction Type"), _("#"), _("Date"), _("Due Date"), _("Amount"),
- _("Other Allocations"), _("This Allocation"), _("Left to Allocate"), "", "");
-
- table_header($th);
-
- $k = $counter = $total_allocated = 0;
-
- foreach ($_SESSION['alloc']->allocs as $allocn_item)
- {
- alt_table_row_color($k);
-
- label_cell(systypes::name($allocn_item->type));
- label_cell(get_trans_view_str($allocn_item->type, $allocn_item->type_no));
- label_cell($allocn_item->date_, "align=right");
- label_cell($allocn_item->due_date, "align=right");
- amount_cell($allocn_item->amount);
- amount_cell($allocn_item->amount_allocated);
-
- if (!check_num('amount' . $counter))
- $_POST['amount' . $counter] = price_format($allocn_item->current_allocated);
- amount_cells(null, 'amount' . $counter, $_POST['amount' . $counter]);
-
- $un_allocated = round($allocn_item->amount - $allocn_item->amount_allocated, 6);
- //hidden("un_allocated" . $counter, $un_allocated);
- amount_cell($un_allocated);
-
- label_cell("<a href='#' name='Alloc$counter' onclick='allocate_all(this.name.substr(5));return true;'>"
- . _("All") . "</a>");
- //label_cell("<a href='#' name='DeAll$counter' onclick='allocate_none(this.name.substr(5));return true;'>"
- // . _("None") . "</a>");
- label_cell("<a href='#' name='DeAll$counter' onclick='allocate_none(this.name.substr(5));return true;'>"
- . _("None") . "</a>".hidden("un_allocated" . $counter, $un_allocated, false));
- end_row();
-
- $total_allocated += input_num('amount' . $counter);
- $counter++;
- }
-
- label_row(_("Total Allocated"), price_format($total_allocated),
- "colspan=6 align=right", "nowrap align=right id='total_allocated'");
- if ($_SESSION['alloc']->amount - $total_allocated < 0)
- {
- $font1 = "<font color=red>";
- $font2 = "</font>";
- }
- else
- $font1 = $font2 = "";
- $left_to_allocate = $_SESSION['alloc']->amount - $total_allocated;
- $left_to_allocate = price_format($left_to_allocate);
- label_row(_("Left to Allocate"), $font1 . $left_to_allocate . $font2,
- "colspan=6 align=right ", "nowrap align=right id='left_to_allocate'");
- end_table(1);
-
- hidden('TotalNumberOfAllocs', $counter);
-// hidden('left_to_allocate', $left_to_allocate);
- submit_center_first('UpdateDisplay', _("Update"));
- submit('Process', _("Process"));
- submit_center_last('Cancel', _("Back to Allocations"));
- }
- else
- {
- display_note(_("There are no unsettled transactions to allocate."), 0, 1);
- submit_center('Cancel', _("Back to Allocations"));
- }
-
- end_form();