X-Git-Url: https://delta.frontaccounting.com/gitweb/?a=blobdiff_plain;f=includes%2Fui%2Fallocation_cart.inc;h=864d117f12e32e7c2d27e51d2f071aa99a44d774;hb=9a6be31598b20ab95541e4c89db43ff56a105cc2;hp=e8f5233ff43c9c221f8f166eab0cca769a52ae63;hpb=818719f38b8327cdca616d58b13913dbd174d96a;p=fa-stable.git diff --git a/includes/ui/allocation_cart.inc b/includes/ui/allocation_cart.inc index e8f5233f..864d117f 100644 --- a/includes/ui/allocation_cart.inc +++ b/includes/ui/allocation_cart.inc @@ -1,13 +1,13 @@ . + See the License here . ***********************************************************************/ /* definition of the Debtor Receipt/Credit note allocation class */ @@ -117,6 +117,222 @@ class allocation_item } } +//-------------------------------------------------------------------------------- +function get_allocations_for_transaction($type, $trans_no) +{ + $sup = $type == 21 || $type == 22; + + if ($trans_no) { + $trans = $sup ? get_supp_trans($trans_no, $type) + : get_customer_trans($trans_no, $type); + + $_SESSION['alloc'] = new allocation($trans_no, $type, + $trans[$sup ? 'supplier_id':'debtor_no'], + $trans[$sup ? "supplier_name":"DebtorName"], + $trans["Total"], sql2date($trans["tran_date"])); + } else { + $_SESSION['alloc'] = new allocation($trans_no, $type, + $_POST[$sup ? 'supplier_id':'customer_id'], '', 0, + $_POST[$sup ? 'DatePaid':'DateBanked'] ); + } + + /* Now populate the array of possible (and previous actual) allocations for this customer/supplier */ + /*First get the transactions that have outstanding balances ie Total-alloc >0 */ + + if ($sup) + $trans_items = get_allocatable_to_supp_transactions($_SESSION['alloc']->person_id); + else + $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 + } + + if ($trans_no == 0) return; // this is new payment + + /* 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 */ + + if ($sup) + $trans_items = get_allocatable_to_supp_transactions($_SESSION['alloc']->person_id, $trans_no, $type); + else + $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 show_allocatable($show_totals) { + + global $table_style; + + $k = $counter = $total_allocated = 0; + + if (count($_SESSION['alloc']->allocs)) + { + start_table($table_style); + $th = array(_("Transaction Type"), _("#"), _("Date"), _("Due Date"), _("Amount"), + _("Other Allocations"), _("This Allocation"), _("Left to Allocate"),'',''); + table_header($th); + + foreach ($_SESSION['alloc']->allocs as $alloc_item) + { + alt_table_row_color($k); + label_cell(systypes::name($alloc_item->type)); + label_cell(get_trans_view_str($alloc_item->type, $alloc_item->type_no)); + label_cell($alloc_item->date_, "align=right"); + label_cell($alloc_item->due_date, "align=right"); + amount_cell($alloc_item->amount); + amount_cell($alloc_item->amount_allocated); + + $_POST['amount' . $counter] = price_format($alloc_item->current_allocated); + amount_cells(null, "amount" . $counter, price_format('amount' . $counter)); + + $un_allocated = round($alloc_item->amount - $alloc_item->amount_allocated, 6); + amount_cell($un_allocated); + label_cell("" + . _("All") . ""); + label_cell("" + . _("None") . "".hidden("un_allocated" . $counter, + price_format($un_allocated), false)); + end_row(); + + $total_allocated += input_num('amount' . $counter); + $counter++; + } + if ($show_totals) { + label_row(_("Total Allocated"), price_format($total_allocated), + "colspan=6 align=right", "align=right id='total_allocated'", 3); + $amount = $_SESSION['alloc']->amount; + + if ($_SESSION['alloc']->type == 21 || $_SESSION['alloc']->type == 22) + $amount = -$amount; + + if ($amount - $total_allocated < 0) + { + $font1 = ""; + $font2 = ""; + } + else + $font1 = $font2 = ""; + $left_to_allocate = price_format($amount - $total_allocated); + label_row(_("Left to Allocate"), $font1 . $left_to_allocate . $font2, + "colspan=6 align=right", "nowrap align=right id='left_to_allocate'", + 3); + } + end_table(1); + } + hidden('TotalNumberOfAllocs', $counter); +} +//-------------------------------------------------------------------------------- + +function check_allocations() +{ + $total_allocated = 0; + + for ($counter = 0; $counter < $_POST["TotalNumberOfAllocs"]; $counter++) + { + if (!check_num('amount' . $counter, 0)) + { + display_error(_("The entry for one or more amounts is invalid or negative.")); + set_focus('amount'.$counter); + return false; + } + + /*Now check to see that the AllocAmt is no greater than the + amount left to be allocated against the transaction under review */ + if (input_num('amount' . $counter) > get_post('un_allocated' . $counter)) + { + //$_POST['amount' . $counter] = $_POST['un_allocated' . $counter]; + } + + $_SESSION['alloc']->allocs[$counter]->current_allocated = input_num('amount' . $counter); + + $total_allocated += input_num('amount' . $counter); + } + + $amount = $_SESSION['alloc']->amount; + if ($_SESSION['alloc']->type == 21 || $_SESSION['alloc']->type == 22) + $amount = -$amount; + + if ($total_allocated - $amount > sys_prefs::allocation_settled_allowance()) + { + display_error(_("These allocations cannot be processed because the amount allocated is more than the total amount left to allocate.")); + return false; + } + + return true; +} //----------------------------------------------------------------------------------- +function handle_allocate() +{ + $sup = $_SESSION['alloc']->type == 21 || $_SESSION['alloc']->type == 22; + + begin_transaction(); + + if ($sup) + clear_supp_alloctions($_SESSION['alloc']->type, $_SESSION['alloc']->trans_no, $_SESSION['alloc']->date_); + else + clear_cust_alloctions($_SESSION['alloc']->type, $_SESSION['alloc']->trans_no, $_SESSION['alloc']->date_); + + // now add the new allocations + $total_allocated = 0; + foreach ($_SESSION['alloc']->allocs as $alloc_item) + { + if ($alloc_item->current_allocated > 0) + { + if ($sup) { + add_supp_allocation($alloc_item->current_allocated, + $_SESSION['alloc']->type, $_SESSION['alloc']->trans_no, + $alloc_item->type, $alloc_item->type_no, $_SESSION['alloc']->date_); + + update_supp_trans_allocation($alloc_item->type, $alloc_item->type_no, + $alloc_item->current_allocated); + } else { + add_cust_allocation($alloc_item->current_allocated, + $_SESSION['alloc']->type, $_SESSION['alloc']->trans_no, + $alloc_item->type, $alloc_item->type_no, $_SESSION['alloc']->date_); + + update_debtor_trans_allocation($alloc_item->type, $alloc_item->type_no, + $alloc_item->current_allocated); + } + // Exchange Variations Joe Hunt 2008-09-20 //////////////////////////////////////// + + exchange_variation($_SESSION['alloc']->type, $_SESSION['alloc']->trans_no, + $alloc_item->type, $alloc_item->type_no, $_SESSION['alloc']->date_, + $alloc_item->current_allocated, + $sup ? payment_person_types::supplier() :payment_person_types::customer()); + + + /////////////////////////////////////////////////////////////////////////// + $total_allocated += $alloc_item->current_allocated; + } + + } /*end of the loop through the array of allocations made */ + if ($sup) + update_supp_trans_allocation($_SESSION['alloc']->type, + $_SESSION['alloc']->trans_no, $total_allocated); + else + update_debtor_trans_allocation($_SESSION['alloc']->type, + $_SESSION['alloc']->trans_no, $total_allocated); + + commit_transaction(); + +} ?>