Customer Payment, Supplier Payment: early discount support.
[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 ($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 if (list_updated('supplier_id')) {
61         $_POST['amount'] = price_format(0);
62         $_SESSION['alloc']->person_id = get_post('supplier_id');
63         $Ajax->activate('amount');
64 } elseif (list_updated('bank_account'))
65         $Ajax->activate('alloc_tbl');
66
67 //----------------------------------------------------------------------------------------
68
69 if (!isset($_POST['bank_account'])) { // first page call
70         $_SESSION['alloc'] = new allocation(ST_SUPPAYMENT, 0, get_post('supplier_id'));
71
72         if (isset($_GET['PInvoice'])) {
73                 //  get date and supplier
74                 $inv = get_supp_trans($_GET['PInvoice'], $_GET['trans_type']);
75                 if ($inv) {
76                         $_SESSION['alloc']->person_id = $_POST['supplier_id'] = $inv['supplier_id'];
77                         $_SESSION['alloc']->read();
78                         $_POST['DatePaid'] = sql2date($inv['tran_date']);
79                         $_POST['memo_'] = $inv['supp_reference'];
80                         foreach($_SESSION['alloc']->allocs as $line => $trans) {
81                                 if ($trans->type == $_GET['trans_type'] && $trans->type_no == $_GET['PInvoice']) {
82                                         $un_allocated = abs($trans->amount) - $trans->amount_allocated;
83                                         $_SESSION['alloc']->amount = $_SESSION['alloc']->allocs[$line]->current_allocated = $un_allocated;
84                                         $_POST['amount'] = $_POST['amount'.$line] = price_format($un_allocated);
85                                         break;
86                                 }
87                         }
88                         unset($inv);
89                 } else
90                         display_error(_("Invalid purchase invoice number."));
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         submenu_view(_("View this Payment"), ST_SUPPAYMENT, $payment_id);
102     display_note(get_gl_view_str(ST_SUPPAYMENT, $payment_id, _("View the GL &Journal Entries for this Payment")), 0, 1);
103
104         submenu_option(_("Enter another supplier &payment"), "/purchasing/supplier_payment.php?supplier_id=".$_POST['supplier_id']);
105         submenu_option(_("Enter Other &Payment"), "/gl/gl_bank.php?NewPayment=Yes");
106         submenu_option(_("Enter &Customer Payment"), "/sales/customer_payments.php");
107         submenu_option(_("Enter Other &Deposit"), "/gl/gl_bank.php?NewDeposit=Yes");
108         submenu_option(_("Bank Account &Transfer"), "/gl/bank_transfer.php");
109
110         display_footer_exit();
111 }
112
113 //----------------------------------------------------------------------------------------
114
115 function get_default_supplier_payment_bank_account($supplier_id, $date)
116 {
117         $previous_payment = get_supp_payment_before($supplier_id, date2sql($date));
118         if ($previous_payment)
119         {
120                 return $previous_payment['bank_id'];
121         }
122         return get_default_supplier_bank_account($supplier_id);
123 }
124 //----------------------------------------------------------------------------------------
125
126 function check_inputs()
127 {
128         global $Refs;
129
130         if (!get_post('supplier_id')) 
131         {
132                 display_error(_("There is no supplier selected."));
133                 set_focus('supplier_id');
134                 return false;
135         } 
136         
137         if (@$_POST['amount'] == "") 
138         {
139                 $_POST['amount'] = price_format(0);
140         }
141
142         if (!check_num('amount', 0))
143         {
144                 display_error(_("The entered amount is invalid or less than zero."));
145                 set_focus('amount');
146                 return false;
147         }
148
149         if (isset($_POST['charge']) && !check_num('charge', 0)) {
150                 display_error(_("The entered amount is invalid or less than zero."));
151                 set_focus('charge');
152                 return false;
153         }
154
155         if (isset($_POST['charge']) && input_num('charge') > 0) {
156                 $charge_acct = get_bank_charge_account($_POST['bank_account']);
157                 if (get_gl_account($charge_acct) == false) {
158                         display_error(_("The Bank Charge Account has not been set in System and General GL Setup."));
159                         set_focus('charge');
160                         return false;
161                 }       
162         }
163
164         if (input_num('amount') <= 0) 
165         {
166                 display_error(_("The total of the amount and the discount is zero or negative. Please enter positive values."));
167                 set_focus('amount');
168                 return false;
169         }
170
171         if (isset($_POST['bank_amount']) && input_num('bank_amount')<=0)
172         {
173                 display_error(_("The entered bank amount is zero or negative."));
174                 set_focus('bank_amount');
175                 return false;
176         }
177
178
179         if (!is_date($_POST['DatePaid']))
180         {
181                 display_error(_("The entered date is invalid."));
182                 set_focus('DatePaid');
183                 return false;
184         } 
185         elseif (!is_date_in_fiscalyear($_POST['DatePaid'])) 
186         {
187                 display_error(_("The entered date is out of fiscal year or is closed for further data entry."));
188                 set_focus('DatePaid');
189                 return false;
190         }
191
192         $limit = get_bank_account_limit($_POST['bank_account'], $_POST['DatePaid']);
193
194         if (($limit !== null) && (floatcmp($limit, input_num('amount')) < 0))
195         {
196                 display_error(sprintf(_("The total bank amount exceeds allowed limit (%s)."), price_format($limit)));
197                 set_focus('amount');
198                 return false;
199         }
200
201         if (!check_reference($_POST['ref'], ST_SUPPAYMENT))
202         {
203                 set_focus('ref');
204                 return false;
205         }
206
207         if (!db_has_currency_rates(get_supplier_currency($_POST['supplier_id']), $_POST['DatePaid'], true))
208                 return false;
209
210         $_SESSION['alloc']->amount = -input_num('amount');
211
212         if (isset($_POST["TotalNumberOfAllocs"]))
213                 return check_allocations();
214         else
215                 return true;
216 }
217
218 //----------------------------------------------------------------------------------------
219
220 function handle_add_payment()
221 {
222         $payment_id = save_supp_payment($_SESSION['alloc'], $_POST['supplier_id'], $_POST['bank_account'],
223                 $_POST['DatePaid'], $_POST['ref'], input_num('amount'), $_POST['memo_'], 
224                 input_num('charge'), input_num('bank_amount', input_num('amount')));
225         new_doc_date($_POST['DatePaid']);
226
227         unset($_POST['bank_account']);
228         unset($_POST['DatePaid']);
229         unset($_POST['currency']);
230         unset($_POST['memo_']);
231         unset($_POST['amount']);
232         unset($_POST['discount']);
233         unset($_POST['ProcessSuppPayment']);
234
235         meta_forward($_SERVER['PHP_SELF'], "AddedID=$payment_id&supplier_id=".$_POST['supplier_id']);
236 }
237
238 //----------------------------------------------------------------------------------------
239
240 if (isset($_POST['ProcessSuppPayment']))
241 {
242          /*First off  check for valid inputs */
243     if (check_inputs() == true) 
244     {
245         handle_add_payment();
246         end_page();
247         exit;
248     }
249 }
250
251 //----------------------------------------------------------------------------------------
252
253 start_form();
254
255         start_outer_table(TABLESTYLE2, "width='60%'", 5);
256
257         table_section(1);
258
259     supplier_list_row(_("Payment To:"), 'supplier_id', null, false, true);
260
261         if (list_updated('supplier_id') || list_updated('bank_account')) {
262           $_SESSION['alloc']->read();
263           $_POST['memo_'] = $_POST['amount'] = '';
264           $Ajax->activate('alloc_tbl');
265         }
266
267         set_global_supplier($_POST['supplier_id']);
268
269         if (!list_updated('bank_account') && !get_post('__ex_rate_changed'))
270         {
271                 $_POST['bank_account'] = get_default_supplier_payment_bank_account($_POST['supplier_id'], $_POST['DatePaid']);
272         } else
273         {
274                 $_POST['amount'] = price_format(0);
275         }
276
277     bank_accounts_list_row(_("From Bank Account:"), 'bank_account', null, true);
278
279         bank_balance_row($_POST['bank_account']);
280
281         table_section(2);
282
283     date_row(_("Date Paid") . ":", 'DatePaid', '', true, 0, 0, 0, null, true);
284
285     ref_row(_("Reference:"), 'ref', '', $Refs->get_next(ST_SUPPAYMENT, null, 
286         array('supplier'=>get_post('supplier_id'), 'date'=>get_post('DatePaid'))), false, ST_SUPPAYMENT);
287
288
289         table_section(3);
290
291         $comp_currency = get_company_currency();
292         $supplier_currency = $_SESSION['alloc']->set_person($_POST['supplier_id'], PT_SUPPLIER);
293         if (!$supplier_currency)
294                         $supplier_currency = $comp_currency;
295         $_SESSION['alloc']->currency = $bank_currency = get_bank_account_currency($_POST['bank_account']);
296
297         if ($bank_currency != $supplier_currency) 
298         {
299                 amount_row(_("Bank Amount:"), 'bank_amount', null, '', $bank_currency);
300         }
301
302         amount_row(_("Bank Charge:"), 'charge', null, '', $bank_currency);
303
304
305         end_outer_table(1);
306
307         div_start('alloc_tbl');
308         show_allocatable(false);
309         div_end();
310
311         start_table(TABLESTYLE, "width='60%'");
312         label_row(_("Total Discount:"), price_format(input_num('discount')), '', '', 0, 'discount');
313         amount_row(_("Amount of Payment:"), 'amount', null, '', $supplier_currency);
314         textarea_row(_("Memo:"), 'memo_', null, 22, 4);
315         end_table(1);
316
317         hidden('discount', null);
318
319         submit_center('ProcessSuppPayment',_("Enter Payment"), true, '', 'default');
320
321 end_form();
322
323 end_page();