purchasing/allocations/supplier_allocate.php

   1 <?php
   2
   3 $path_to_root="../..";
   4 include($path_to_root . "/includes/ui/allocation_cart.inc");
   5 $page_security = 3;
   6
   7 include_once($path_to_root . "/includes/session.inc");
   8
   9 include_once($path_to_root . "/includes/date_functions.inc");
  10
  11 include_once($path_to_root . "/includes/ui.inc");
  12 include_once($path_to_root . "/includes/banking.inc");
  13
  14 include_once($path_to_root . "/sales/includes/sales_db.inc");
  15 $js = "";
  16 if ($use_popup_windows)
  17         $js .= get_js_open_window(900, 500);
  18
  19 add_js_file('allocate.js');
  20
  21 page(_("Allocate Supplier Payment or Credit Note"), false, false, "", $js);
  22
  23
  24 //--------------------------------------------------------------------------------
  25
  26 function clear_allocations()
  27 {
  28         if (isset($_SESSION['alloc']))
  29         {
  30                 unset($_SESSION['alloc']->allocs);
  31                 unset($_SESSION['alloc']);
  32         }
  33
  34         session_register("alloc");
  35 }
  36
  37 //--------------------------------------------------------------------------------
  38
  39 function check_data()
  40 {
  41         $total_allocated = 0;
  42
  43         for ($counter=0; $counter < $_POST["TotalNumberOfAllocs"]; $counter++)
  44         {
  45
  46                 if (!check_num('amount' . $counter, 0))
  47                 {
  48                         display_error(_("The entry for one or more amounts is invalid or negative."));
  49                         set_focus('amount');
  50                         return false;
  51                  }
  52
  53                   /*Now check to see that the AllocAmt is no greater than the
  54                  amount left to be allocated against the transaction under review */
  55                  if (input_num('amount' . $counter) > $_POST['un_allocated' . $counter])
  56                  {
  57                      //$_POST['amount' . $counter] = $_POST['un_allocated' . $counter];
  58                  }
  59
  60                  $_SESSION['alloc']->allocs[$counter]->current_allocated = input_num('amount' . $counter);
  61
  62                  $total_allocated += input_num('amount' . $counter);
  63         }
  64
  65         if ($total_allocated + $_SESSION['alloc']->amount > sys_prefs::allocation_settled_allowance())
  66         {
  67                 display_error(_("These allocations cannot be processed because the amount allocated is more than the total amount left to allocate."));
  68            //echo  _("Total allocated:") . " " . $total_allocated ;
  69            //echo "  " . _("Total amount that can be allocated:") . " " . -$_SESSION['alloc']->TransAmt . "<BR>";
  70                 return false;
  71         }
  72
  73         return true;
  74 }
  75
  76 //-----------------------------------------------------------------------------------
  77
  78 function handle_process()
  79 {
  80         begin_transaction();
  81
  82         // clear all the allocations for this payment/credit
  83         clear_supp_alloctions($_SESSION['alloc']->type, $_SESSION['alloc']->trans_no);
  84
  85         // now add the new allocations
  86         $total_allocated = 0;
  87         foreach ($_SESSION['alloc']->allocs as $alloc_item)
  88         {
  89                 if ($alloc_item->current_allocated > 0)
  90                 {
  91                         add_supp_allocation($alloc_item->current_allocated,
  92                                 $_SESSION['alloc']->type, $_SESSION['alloc']->trans_no,
  93                         $alloc_item->type, $alloc_item->type_no, $_SESSION['alloc']->date_);
  94
  95                         update_supp_trans_allocation($alloc_item->type, $alloc_item->type_no,
  96                                 $alloc_item->current_allocated);
  97                         $total_allocated += $alloc_item->current_allocated;
  98                 }
  99
 100         }  /*end of the loop through the array of allocations made */
 101         update_supp_trans_allocation($_SESSION['alloc']->type,
 102                 $_SESSION['alloc']->trans_no, $total_allocated);
 103
 104         commit_transaction();
 105
 106         clear_allocations();
 107 }
 108
 109 //--------------------------------------------------------------------------------
 110
 111 if (isset($_POST['Process']))
 112 {
 113         if (check_data())
 114         {
 115                 handle_process();
 116                 $_POST['Cancel'] = 1;
 117         }
 118 }
 119
 120 //--------------------------------------------------------------------------------
 121
 122 if (isset($_POST['Cancel']))
 123 {
 124         clear_allocations();
 125         meta_forward($path_to_root . "/purchasing/allocations/supplier_allocation_main.php");
 126         exit;
 127 }
 128
 129 //--------------------------------------------------------------------------------
 130
 131 function get_allocations_for_transaction($type, $trans_no)
 132 {
 133         clear_allocations();
 134
 135         $supptrans = get_supp_trans($trans_no, $type);
 136
 137         $_SESSION['alloc'] = new allocation($trans_no, $type,
 138                 $supptrans["supplier_id"], $supptrans["supplier_name"],
 139                 $supptrans["Total"], sql2date($supptrans["tran_date"]));
 140
 141         /* Now populate the array of possible (and previous actual) allocations for this supplier */
 142         /*First get the transactions that have outstanding balances ie Total-alloc >0 */
 143
 144         $trans_items = get_allocatable_to_supp_transactions($_SESSION['alloc']->person_id);
 145
 146         while ($myrow = db_fetch($trans_items))
 147         {
 148                 $_SESSION['alloc']->add_item($myrow["type"], $myrow["trans_no"],
 149                         sql2date($myrow["tran_date"]),
 150                         sql2date($myrow["due_date"]),
 151                         $myrow["Total"], // trans total
 152                         $myrow["alloc"], // trans total allocated
 153                         0); // this allocation
 154         }
 155
 156
 157         /* Now get trans that might have previously been allocated to by this trans
 158         NB existing entries where still some of the trans outstanding entered from
 159         above logic will be overwritten with the prev alloc detail below */
 160
 161         $trans_items = get_allocatable_to_supp_transactions($_SESSION['alloc']->person_id, $trans_no, $type);
 162
 163         while ($myrow = db_fetch($trans_items))
 164         {
 165                 $_SESSION['alloc']->add_or_update_item ($myrow["type"], $myrow["trans_no"],
 166                         sql2date($myrow["tran_date"]),
 167                         sql2date($myrow["due_date"]),
 168                         $myrow["Total"],
 169                         $myrow["alloc"] - $myrow["amt"], $myrow["amt"]);
 170         }
 171 }
 172
 173 //--------------------------------------------------------------------------------
 174
 175 function edit_allocations_for_transaction($type, $trans_no)
 176 {
 177         global $table_style;
 178
 179         start_form(false, true);
 180
 181     display_heading(_("Allocation of") . " " . systypes::name($_SESSION['alloc']->type) . " # " . $_SESSION['alloc']->trans_no);
 182
 183         display_heading($_SESSION['alloc']->person_name);
 184
 185     display_heading2(_("Date:") . " <b>" . $_SESSION['alloc']->date_ . "</b>");
 186     display_heading2(_("Total:") . " <b>" . price_format(-$_SESSION['alloc']->amount) . "</b>");
 187
 188     echo "<br>";
 189
 190     if (count($_SESSION['alloc']->allocs) > 0)
 191     {
 192                 start_table($table_style);
 193                 $th = array(_("Transaction Type"), _("#"), _("Date"), _("Due Date"), _("Amount"),
 194                         _("Other Allocations"), _("This Allocation"), _("Left to Allocate"),'');
 195                 table_header($th);
 196
 197         $k = $counter = $total_allocated = 0;
 198
 199         foreach ($_SESSION['alloc']->allocs as $alloc_item)
 200         {
 201                 alt_table_row_color($k);
 202
 203             label_cell(systypes::name($alloc_item->type));
 204                 label_cell(get_trans_view_str($alloc_item->type, $alloc_item->type_no));
 205                 label_cell($alloc_item->date_, "align=right");
 206                 label_cell($alloc_item->due_date, "align=right");
 207                 amount_cell($alloc_item->amount);
 208                 amount_cell($alloc_item->amount_allocated);
 209
 210             if (!isset($_POST['amount' . $counter]) || $_POST['amount' . $counter] == "")
 211                 $_POST['amount' . $counter] = price_format($alloc_item->current_allocated);
 212             amount_cells(null, "amount" . $counter, price_format('amount' . $counter));
 213
 214                 $un_allocated = round($alloc_item->amount - $alloc_item->amount_allocated, 6);
 215                 //hidden("un_allocated" . $counter, $un_allocated);
 216                 amount_cell($un_allocated);
 217                         label_cell("<a href='#' name=Alloc$counter onclick='allocate_all(this.name.substr(5));return true;'>"
 218                                          . _("All") . "</a>");
 219                         label_cell("<a href='#' name=DeAll$counter onclick='allocate_none(this.name.substr(5));return true;'>"
 220                                          . _("None") . "</a>".hidden("un_allocated" . $counter, $un_allocated, false));
 221
 222 //                      label_cell("<a href='#' onclick='forms[0].amount$counter.value=forms[0].un_allocated$counter.value; return true;'>" . _("All") . "</a>");
 223 //                      label_cell("<a href='#' onclick='forms[0].amount$counter.value=0; return true;'>" . _("None") . "</a>");
 224                         end_row();
 225
 226             $total_allocated += input_num('amount' . $counter);
 227             $counter++;
 228         }
 229
 230         label_row(_("Total Allocated"), number_format2($total_allocated,user_price_dec()),
 231                 "colspan=6 align=right", "align=right id='total_allocated'");
 232         if (-$_SESSION['alloc']->amount - $total_allocated < 0)
 233         {
 234                 $font1 = "<font color=red>";
 235                 $font2 = "</font>";
 236         }
 237         else
 238                 $font1 = $font2 = "";
 239                 $left_to_allocate = price_format(-$_SESSION['alloc']->amount - $total_allocated);
 240         label_row(_("Left to Allocate"), $font1 . $left_to_allocate . $font2, "colspan=6 align=right",
 241                 "nowrap align=right id='left_to_allocate'");
 242                 end_table();
 243
 244                 hidden('TotalNumberOfAllocs', $counter);
 245 //              hidden('left_to_allocate', $left_to_allocate);
 246         echo "<br><center>";
 247         submit('UpdateDisplay', _("Update"));
 248         echo "&nbsp;";
 249         submit('Process', _("Process"));
 250         echo "&nbsp;";
 251         }
 252         else
 253         {
 254         display_note(_("There are no unsettled transactions to allocate."), 0, 1);
 255         echo "<center>";
 256     }
 257
 258         submit('Cancel', _("Back to Allocations"));
 259         echo "</center><br><br>";
 260
 261         end_form();
 262 }
 263
 264 //--------------------------------------------------------------------------------
 265
 266 if (isset($_GET['trans_no']) && isset($_GET['trans_type']))
 267 {
 268         get_allocations_for_transaction($_GET['trans_type'], $_GET['trans_no']);
 269 }
 270
 271 if (isset($_SESSION['alloc']))
 272 {
 273         edit_allocations_for_transaction($_SESSION['alloc']->type, $_SESSION['alloc']->trans_no);
 274 }
 275
 276 //--------------------------------------------------------------------------------
 277
 278 end_page();
 279
 280 ?>