purchasing/supplier_payment.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_SUPPLIERPAYMNT';
  13 $path_to_root = "..";
  14 include_once($path_to_root . "/includes/ui/allocation_cart.inc");
  15 include_once($path_to_root . "/includes/session.inc");
  16 include_once($path_to_root . "/includes/date_functions.inc");
  17 include_once($path_to_root . "/includes/ui.inc");
  18 include_once($path_to_root . "/includes/banking.inc");
  19 include_once($path_to_root . "/includes/data_checks.inc");
  20 include_once($path_to_root . "/purchasing/includes/purchasing_db.inc");
  21 include_once($path_to_root . "/reporting/includes/reporting.inc");
  22
  23 $js = "";
  24 if ($SysPrefs->use_popup_windows)
  25         $js .= get_js_open_window(900, 500);
  26 if (user_use_date_picker())
  27         $js .= get_js_date_picker();
  28
  29 add_js_file('payalloc.js');
  30
  31 page(_($help_context = "Supplier Payment Entry"), false, false, "", $js);
  32
  33 if (isset($_GET['supplier_id']))
  34 {
  35         $_POST['supplier_id'] = $_GET['supplier_id'];
  36 }
  37
  38 //----------------------------------------------------------------------------------------
  39
  40 check_db_has_suppliers(_("There are no suppliers defined in the system."));
  41
  42 check_db_has_bank_accounts(_("There are no bank accounts defined in the system."));
  43
  44 //----------------------------------------------------------------------------------------
  45
  46 if (!isset($_POST['supplier_id']))
  47         $_POST['supplier_id'] = get_global_supplier(false);
  48
  49 if (!isset($_POST['DatePaid']))
  50 {
  51         $_POST['DatePaid'] = new_doc_date();
  52         if (!is_date_in_fiscalyear($_POST['DatePaid']))
  53                 $_POST['DatePaid'] = end_fiscalyear();
  54 }
  55
  56 if (isset($_POST['_DatePaid_changed'])) {
  57   $Ajax->activate('_ex_rate');
  58 }
  59
  60 //----------------------------------------------------------------------------------------
  61
  62 if (!isset($_POST['bank_account'])) { // first page call
  63         $_SESSION['alloc'] = new allocation(ST_SUPPAYMENT, 0, get_post('supplier_id'));
  64
  65         if (isset($_GET['PInvoice'])) {
  66                 $supp = isset($_POST['supplier_id']) ? $_POST['supplier_id'] : null;
  67                 //  get date and supplier
  68                 $inv = get_supp_trans($_GET['PInvoice'], $_GET['trans_type'], $supp);
  69                 if ($inv) {
  70                         $_SESSION['alloc']->person_id = $_POST['supplier_id'] = $inv['supplier_id'];
  71                         $_SESSION['alloc']->read();
  72                         $_POST['DatePaid'] = sql2date($inv['tran_date']);
  73                         $_POST['memo_'] = $inv['supp_reference'];
  74                         foreach($_SESSION['alloc']->allocs as $line => $trans) {
  75                                 if ($trans->type == $_GET['trans_type'] && $trans->type_no == $_GET['PInvoice']) {
  76                                         $un_allocated = abs($trans->amount) - $trans->amount_allocated;
  77                                         $_SESSION['alloc']->amount = $_SESSION['alloc']->allocs[$line]->current_allocated = $un_allocated;
  78                                         $_POST['amount'] = $_POST['amount'.$line] = price_format($un_allocated);
  79                                         break;
  80                                 }
  81                         }
  82                         unset($inv);
  83                 } else
  84                         display_error(_("Invalid purchase invoice number."));
  85         }
  86 }
  87 if (isset($_GET['AddedID'])) {
  88         $payment_id = $_GET['AddedID'];
  89
  90         display_notification_centered( _("Payment has been sucessfully entered"));
  91
  92         submenu_print(_("&Print This Remittance"), ST_SUPPAYMENT, $payment_id."-".ST_SUPPAYMENT, 'prtopt');
  93         submenu_print(_("&Email This Remittance"), ST_SUPPAYMENT, $payment_id."-".ST_SUPPAYMENT, null, 1);
  94
  95         submenu_view(_("View this Payment"), ST_SUPPAYMENT, $payment_id);
  96     display_note(get_gl_view_str(ST_SUPPAYMENT, $payment_id, _("View the GL &Journal Entries for this Payment")), 0, 1);
  97
  98         submenu_option(_("Enter another supplier &payment"), "/purchasing/supplier_payment.php?supplier_id=".$_POST['supplier_id']);
  99
 100         submenu_option(_("Enter direct &Invoice"), "/purchasing/po_entry_items.php?NewInvoice=Yes");
 101
 102         submenu_option(_("Enter Other &Payment"), "/gl/gl_bank.php?NewPayment=Yes");
 103         submenu_option(_("Enter &Customer Payment"), "/sales/customer_payments.php");
 104         submenu_option(_("Enter Other &Deposit"), "/gl/gl_bank.php?NewDeposit=Yes");
 105         submenu_option(_("Bank Account &Transfer"), "/gl/bank_transfer.php");
 106
 107         display_footer_exit();
 108 }
 109
 110 //----------------------------------------------------------------------------------------
 111
 112 function get_default_supplier_payment_bank_account($supplier_id, $date)
 113 {
 114         $previous_payment = get_supp_payment_before($supplier_id, date2sql($date));
 115         if ($previous_payment)
 116         {
 117                 return $previous_payment['bank_id'];
 118         }
 119         return get_default_supplier_bank_account($supplier_id);
 120 }
 121 //----------------------------------------------------------------------------------------
 122
 123 function check_inputs()
 124 {
 125         global $Refs;
 126
 127         if (!get_post('supplier_id'))
 128         {
 129                 display_error(_("There is no supplier selected."));
 130                 set_focus('supplier_id');
 131                 return false;
 132         }
 133
 134         if (@$_POST['amount'] == "")
 135         {
 136                 $_POST['amount'] = price_format(0);
 137         }
 138
 139         if (!check_num('amount', 0))
 140         {
 141                 display_error(_("The entered amount is invalid or less than zero."));
 142                 set_focus('amount');
 143                 return false;
 144         }
 145
 146         if (isset($_POST['charge']) && !check_num('charge', 0)) {
 147                 display_error(_("The entered amount is invalid or less than zero."));
 148                 set_focus('charge');
 149                 return false;
 150         }
 151
 152         if (isset($_POST['charge']) && input_num('charge') > 0) {
 153                 $charge_acct = get_bank_charge_account($_POST['bank_account']);
 154                 if (get_gl_account($charge_acct) == false) {
 155                         display_error(_("The Bank Charge Account has not been set in System and General GL Setup."));
 156                         set_focus('charge');
 157                         return false;
 158                 }
 159         }
 160
 161         if (@$_POST['discount'] == "")
 162         {
 163                 $_POST['discount'] = 0;
 164         }
 165
 166         if (!check_num('discount', 0))
 167         {
 168                 display_error(_("The entered discount is invalid or less than zero."));
 169                 set_focus('amount');
 170                 return false;
 171         }
 172
 173         //if (input_num('amount') - input_num('discount') <= 0)
 174         if (input_num('amount') <= 0)
 175         {
 176                 display_error(_("The total of the amount and the discount is zero or negative. Please enter positive values."));
 177                 set_focus('amount');
 178                 return false;
 179         }
 180
 181         if (isset($_POST['bank_amount']) && input_num('bank_amount')<=0)
 182         {
 183                 display_error(_("The entered bank amount is zero or negative."));
 184                 set_focus('bank_amount');
 185                 return false;
 186         }
 187
 188
 189         if (!is_date($_POST['DatePaid']))
 190         {
 191                 display_error(_("The entered date is invalid."));
 192                 set_focus('DatePaid');
 193                 return false;
 194         }
 195         elseif (!is_date_in_fiscalyear($_POST['DatePaid']))
 196         {
 197                 display_error(_("The entered date is out of fiscal year or is closed for further data entry."));
 198                 set_focus('DatePaid');
 199                 return false;
 200         }
 201
 202         $limit = get_bank_account_limit($_POST['bank_account'], $_POST['DatePaid']);
 203
 204         if (($limit !== null) && (floatcmp($limit, input_num('amount')) < 0))
 205         {
 206                 display_error(sprintf(_("The total bank amount exceeds allowed limit (%s)."), price_format($limit)));
 207                 set_focus('amount');
 208                 return false;
 209         }
 210
 211         if (!check_reference($_POST['ref'], ST_SUPPAYMENT))
 212         {
 213                 set_focus('ref');
 214                 return false;
 215         }
 216
 217         if (!db_has_currency_rates(get_supplier_currency($_POST['supplier_id']), $_POST['DatePaid'], true))
 218                 return false;
 219
 220         $_SESSION['alloc']->amount = -input_num('amount');
 221
 222         if (isset($_POST["TotalNumberOfAllocs"]))
 223                 return check_allocations();
 224         else
 225                 return true;
 226 }
 227
 228 //----------------------------------------------------------------------------------------
 229
 230 function handle_add_payment()
 231 {
 232         $payment_id = write_supp_payment(0, $_POST['supplier_id'], $_POST['bank_account'],
 233                 $_POST['DatePaid'], $_POST['ref'], input_num('amount'), input_num('discount'), $_POST['memo_'],
 234                 input_num('charge'), input_num('bank_amount', input_num('amount')), $_POST['dimension_id'], $_POST['dimension2_id']);
 235         new_doc_date($_POST['DatePaid']);
 236
 237         $_SESSION['alloc']->trans_no = $payment_id;
 238         $_SESSION['alloc']->date_ = $_POST['DatePaid'];
 239         $_SESSION['alloc']->write();
 240
 241         unset($_POST['bank_account']);
 242         unset($_POST['DatePaid']);
 243         unset($_POST['currency']);
 244         unset($_POST['memo_']);
 245         unset($_POST['amount']);
 246         unset($_POST['discount']);
 247         unset($_POST['ProcessSuppPayment']);
 248
 249         meta_forward($_SERVER['PHP_SELF'], "AddedID=$payment_id&supplier_id=".$_POST['supplier_id']);
 250 }
 251
 252 //----------------------------------------------------------------------------------------
 253
 254 if (isset($_POST['ProcessSuppPayment']))
 255 {
 256          /*First off  check for valid inputs */
 257     if (check_inputs() == true)
 258     {
 259         handle_add_payment();
 260         end_page();
 261         exit;
 262     }
 263 }
 264
 265 //----------------------------------------------------------------------------------------
 266
 267 start_form();
 268
 269         start_outer_table(TABLESTYLE2, "width='60%'", 5);
 270
 271         table_section(1);
 272
 273     supplier_list_row(_("Payment To:"), 'supplier_id', null, false, true);
 274
 275         if (list_updated('supplier_id')) {
 276                 $_POST['amount'] = price_format(0);
 277                 $_SESSION['alloc']->person_id = get_post('supplier_id');
 278                 $Ajax->activate('amount');
 279         } elseif (list_updated('bank_account'))
 280                 $Ajax->activate('alloc_tbl');
 281
 282         if (list_updated('supplier_id') || list_updated('bank_account')) {
 283           $_SESSION['alloc']->read();
 284           $_POST['memo_'] = $_POST['amount'] = '';
 285           $Ajax->activate('alloc_tbl');
 286         }
 287
 288         set_global_supplier($_POST['supplier_id']);
 289
 290         if (!list_updated('bank_account') && !get_post('__ex_rate_changed'))
 291         {
 292                 $_POST['bank_account'] = get_default_supplier_payment_bank_account($_POST['supplier_id'], $_POST['DatePaid']);
 293         } else
 294         {
 295                 $_POST['amount'] = price_format(0);
 296         }
 297
 298     bank_accounts_list_row(_("From Bank Account:"), 'bank_account', null, true);
 299
 300         bank_balance_row($_POST['bank_account']);
 301
 302         table_section(2);
 303
 304     date_row(_("Date Paid") . ":", 'DatePaid', '', true, 0, 0, 0, null, true);
 305
 306     ref_row(_("Reference:"), 'ref', '', $Refs->get_next(ST_SUPPAYMENT, null,
 307         array('supplier'=>get_post('supplier_id'), 'date'=>get_post('DatePaid'))), false, ST_SUPPAYMENT);
 308
 309
 310         table_section(3);
 311
 312         $comp_currency = get_company_currency();
 313         $supplier_currency = $_SESSION['alloc']->set_person($_POST['supplier_id'], PT_SUPPLIER);
 314         if (!$supplier_currency)
 315                         $supplier_currency = $comp_currency;
 316         $_SESSION['alloc']->currency = $bank_currency = get_bank_account_currency($_POST['bank_account']);
 317
 318         if ($bank_currency != $supplier_currency)
 319         {
 320                 amount_row(_("Bank Amount:"), 'bank_amount', null, '', $bank_currency);
 321         }
 322
 323         amount_row(_("Bank Charge:"), 'charge', null, '', $bank_currency);
 324
 325         $row = get_supplier($_POST['supplier_id']);
 326         $_POST['dimension_id'] = @$row['dimension_id'];
 327         $_POST['dimension2_id'] = @$row['dimension2_id'];
 328         $dim = get_company_pref('use_dimension');
 329         if ($dim > 0)
 330                 dimensions_list_row(_("Dimension").":", 'dimension_id',
 331                         null, true, ' ', false, 1, false);
 332         else
 333                 hidden('dimension_id', 0);
 334         if ($dim > 1)
 335                 dimensions_list_row(_("Dimension")." 2:", 'dimension2_id',
 336                         null, true, ' ', false, 2, false);
 337         else
 338                 hidden('dimension2_id', 0);
 339
 340         end_outer_table(1);
 341
 342         div_start('alloc_tbl');
 343         show_allocatable(false);
 344         div_end();
 345
 346         start_table(TABLESTYLE, "width='60%'");
 347         amount_row(_("Amount of Discount:"), 'discount', null, '', $supplier_currency);
 348         amount_row(_("Amount of Payment:"), 'amount', null, '', $supplier_currency);
 349         textarea_row(_("Memo:"), 'memo_', null, 22, 4);
 350         end_table(1);
 351
 352         submit_center('ProcessSuppPayment',_("Enter Payment"), true, '', 'default');
 353
 354 end_form();
 355
 356 end_page();