Merged changes from mai trunk up to 2.3.1
[fa-stable.git] / 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 ($use_popup_windows)
25         $js .= get_js_open_window(900, 500);
26 if ($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 if (list_updated('supplier_id') || list_updated('bank_account')) {
61   $_SESSION['alloc']->read();
62   $Ajax->activate('alloc_tbl');
63 }
64 //----------------------------------------------------------------------------------------
65
66 if (!isset($_POST['bank_account'])) { // first page call
67           $_SESSION['alloc'] = new allocation(ST_SUPPAYMENT, 0);
68
69         if (isset($_GET['PInvoice'])) {
70                 //  get date and supplier
71                 $inv = get_supp_trans($_GET['PInvoice'], ST_SUPPINVOICE);
72                 if($inv) {
73                         $_POST['supplier_id'] = $inv['supplier_id'];
74                         $_POST['DatePaid'] = sql2date($inv['tran_date']);
75 //                      $_POST['discount'] = price_format(0);
76 //              $_POST['bank_account'], $_POST['ref']
77                         $_POST['memo_'] = $inv['supp_reference'];
78                         foreach($_SESSION['alloc']->allocs as $line => $trans) {
79                                 if ($trans->type == ST_SUPPINVOICE && $trans->type_no == $_GET['PInvoice']) {
80                                         $_POST['amount'] = 
81                                                 $_SESSION['alloc']->amount = price_format($_SESSION['alloc']->allocs[$line]->amount);
82                                         $_SESSION['alloc']->allocs[$line]->current_allocated =
83                                                 $_SESSION['alloc']->allocs[$line]->amount;
84                                         break;
85                                 }
86                         }
87                         unset($inv);
88                 } else
89                         display_error(_("Invalid purchase invoice number."));
90
91         }
92 }
93 if (isset($_GET['AddedID'])) {
94         $payment_id = $_GET['AddedID'];
95
96         display_notification_centered( _("Payment has been sucessfully entered"));
97
98         submenu_print(_("&Print This Remittance"), ST_SUPPAYMENT, $payment_id."-".ST_SUPPAYMENT, 'prtopt');
99         submenu_print(_("&Email This Remittance"), ST_SUPPAYMENT, $payment_id."-".ST_SUPPAYMENT, null, 1);
100
101     display_note(get_gl_view_str(ST_SUPPAYMENT, $payment_id, _("View the GL &Journal Entries for this Payment")));
102
103 //    hyperlink_params($path_to_root . "/purchasing/allocations/supplier_allocate.php", _("&Allocate this Payment"), "trans_no=$payment_id&trans_type=22");
104
105         hyperlink_params($_SERVER['PHP_SELF'], _("Enter another supplier &payment"), "supplier_id=" . $_POST['supplier_id']);
106
107         display_footer_exit();
108 }
109
110 //----------------------------------------------------------------------------------------
111
112 function check_inputs()
113 {
114         global $Refs;
115
116         if (!get_post('supplier_id')) 
117         {
118                 display_error(_("There is no supplier selected."));
119                 set_focus('supplier_id');
120                 return false;
121         } 
122         
123         if ($_POST['amount'] == "") 
124         {
125                 $_POST['amount'] = price_format(0);
126         }
127
128         if (!check_num('amount', 0))
129         {
130                 display_error(_("The entered amount is invalid or less than zero."));
131                 set_focus('amount');
132                 return false;
133         }
134
135         if (isset($_POST['charge']) && !check_num('charge', 0)) {
136                 display_error(_("The entered amount is invalid or less than zero."));
137                 set_focus('charge');
138                 return false;
139         }
140
141         if (isset($_POST['charge']) && input_num('charge') > 0) {
142                 $charge_acct = get_company_pref('bank_charge_act');
143                 if (get_gl_account($charge_acct) == false) {
144                         display_error(_("The Bank Charge Account has not been set in System and General GL Setup."));
145                         set_focus('charge');
146                         return false;
147                 }       
148         }
149
150         if (isset($_POST['_ex_rate']) && !check_num('_ex_rate', 0.000001))
151         {
152                 display_error(_("The exchange rate must be numeric and greater than zero."));
153                 set_focus('_ex_rate');
154                 return false;
155         }
156
157         if ($_POST['discount'] == "") 
158         {
159                 $_POST['discount'] = 0;
160         }
161
162         if (!check_num('discount', 0))
163         {
164                 display_error(_("The entered discount is invalid or less than zero."));
165                 set_focus('amount');
166                 return false;
167         }
168
169         //if (input_num('amount') - input_num('discount') <= 0) 
170         if (input_num('amount') <= 0) 
171         {
172                 display_error(_("The total of the amount and the discount is zero or negative. Please enter positive values."));
173                 set_focus('amount');
174                 return false;
175         }
176
177         if (!is_date($_POST['DatePaid']))
178         {
179                 display_error(_("The entered date is invalid."));
180                 set_focus('DatePaid');
181                 return false;
182         } 
183         elseif (!is_date_in_fiscalyear($_POST['DatePaid'])) 
184         {
185                 display_error(_("The entered date is not in fiscal year."));
186                 set_focus('DatePaid');
187                 return false;
188         }
189
190         $limit = get_bank_account_limit($_POST['bank_account'], $_POST['DatePaid']);
191
192         if ($limit != null && ($limit < input_num('amount')))
193         {
194                 display_error(sprintf(_("The total bank amount exceeds allowed limit (%s)."), price_format($limit)));
195                 set_focus('amount');
196                 return false;
197         }
198
199     if (!$Refs->is_valid($_POST['ref'])) 
200     {
201                 display_error(_("You must enter a reference."));
202                 set_focus('ref');
203                 return false;
204         }
205
206         if (!is_new_reference($_POST['ref'], ST_SUPPAYMENT)) 
207         {
208                 display_error(_("The entered reference is already in use."));
209                 set_focus('ref');
210                 return false;
211         }
212
213         $_SESSION['alloc']->amount = -input_num('amount');
214
215         if (isset($_POST["TotalNumberOfAllocs"]))
216                 return check_allocations();
217         else
218                 return true;
219 }
220
221 //----------------------------------------------------------------------------------------
222
223 function handle_add_payment()
224 {
225         $supp_currency = get_supplier_currency($_POST['supplier_id']);
226         $bank_currency = get_bank_account_currency($_POST['bank_account']);
227         $comp_currency = get_company_currency();
228         if ($comp_currency != $bank_currency && $bank_currency != $supp_currency)
229                 $rate = 0;
230         else
231                 $rate = input_num('_ex_rate');
232
233         $payment_id = add_supp_payment($_POST['supplier_id'], $_POST['DatePaid'],
234                 $_POST['bank_account'], input_num('amount'), input_num('discount'), 
235                 $_POST['ref'], $_POST['memo_'], $rate, input_num('charge'));
236         new_doc_date($_POST['DatePaid']);
237
238         $_SESSION['alloc']->trans_no = $payment_id;
239         $_SESSION['alloc']->write();
240         //unset($_POST['supplier_id']);
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         set_global_supplier($_POST['supplier_id']);
276         
277     bank_accounts_list_row(_("From Bank Account:"), 'bank_account', null, true);
278
279         table_section(2);
280
281     ref_row(_("Reference:"), 'ref', '', $Refs->get_next(ST_SUPPAYMENT));
282
283     date_row(_("Date Paid") . ":", 'DatePaid', '', true, 0, 0, 0, null, true);
284
285         table_section(3);
286
287         $supplier_currency = get_supplier_currency($_POST['supplier_id']);
288         $bank_currency = get_bank_account_currency($_POST['bank_account']);
289         if ($bank_currency != $supplier_currency) 
290         {
291                 exchange_rate_display($bank_currency, $supplier_currency, $_POST['DatePaid'], true);
292         }
293
294         amount_row(_("Bank Charge:"), 'charge');
295
296
297         end_outer_table(1); // outer table
298
299         if ($bank_currency == $supplier_currency) {
300         div_start('alloc_tbl');
301                 show_allocatable(false);
302         div_end();
303         }
304
305         start_table(TABLESTYLE, "width=60%");
306         amount_row(_("Amount of Discount:"), 'discount');
307         amount_row(_("Amount of Payment:"), 'amount');
308         textarea_row(_("Memo:"), 'memo_', null, 22, 4);
309         end_table(1);
310         
311         if ($bank_currency != $supplier_currency) 
312         {
313                 display_note(_("The amount and discount are in the bank account's currency."), 0, 1);
314         }
315
316         submit_center('ProcessSuppPayment',_("Enter Payment"), true, '', 'default');
317
318 end_form();
319
320 end_page();
321 ?>