[0000297] Added balance limit check on payments made from cash type accounts.
[fa-stable.git] / gl / gl_bank.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 $path_to_root = "..";
13 include_once($path_to_root . "/includes/ui/items_cart.inc");
14 include_once($path_to_root . "/includes/session.inc");
15 $page_security = isset($_GET['NewPayment']) || 
16         @($_SESSION['pay_items']->trans_type==ST_BANKPAYMENT)
17  ? 'SA_PAYMENT' : 'SA_DEPOSIT';
18
19 include_once($path_to_root . "/includes/date_functions.inc");
20 include_once($path_to_root . "/includes/data_checks.inc");
21
22 include_once($path_to_root . "/gl/includes/ui/gl_bank_ui.inc");
23 include_once($path_to_root . "/gl/includes/gl_db.inc");
24 include_once($path_to_root . "/gl/includes/gl_ui.inc");
25
26 $js = '';
27 if ($use_popup_windows)
28         $js .= get_js_open_window(800, 500);
29 if ($use_date_picker)
30         $js .= get_js_date_picker();
31
32 if (isset($_GET['NewPayment'])) {
33         $_SESSION['page_title'] = _($help_context = "Bank Account Payment Entry");
34         create_cart(ST_BANKPAYMENT, 0);
35 } else if(isset($_GET['NewDeposit'])) {
36         $_SESSION['page_title'] = _($help_context = "Bank Account Deposit Entry");
37         create_cart(ST_BANKDEPOSIT, 0);
38 } else if(isset($_GET['ModifyPayment'])) {
39         $_SESSION['page_title'] = _($help_context = "Modify Bank Account Entry")." #".$_GET['trans_no'];
40         create_cart(ST_BANKPAYMENT, $_GET['trans_no']);
41 } else if(isset($_GET['ModifyDeposit'])) {
42         $_SESSION['page_title'] = _($help_context = "Modify Bank Deposit Entry")." #".$_GET['trans_no'];
43         create_cart(ST_BANKDEPOSIT, $_GET['trans_no']);
44 }
45 page($_SESSION['page_title'], false, false, '', $js);
46
47 //-----------------------------------------------------------------------------------------------
48 check_db_has_bank_accounts(_("There are no bank accounts defined in the system."));
49
50 //----------------------------------------------------------------------------------------
51 if (list_updated('PersonDetailID')) {
52         $br = get_branch(get_post('PersonDetailID'));
53         $_POST['person_id'] = $br['debtor_no'];
54         $Ajax->activate('person_id');
55 }
56
57 //--------------------------------------------------------------------------------------------------
58 function line_start_focus() {
59   global        $Ajax;
60
61   $Ajax->activate('items_table');
62   set_focus('_code_id_edit');
63 }
64
65 //-----------------------------------------------------------------------------------------------
66
67 if (isset($_GET['AddedID']))
68 {
69         $trans_no = $_GET['AddedID'];
70         $trans_type = ST_BANKPAYMENT;
71
72         display_notification_centered(_("Payment $trans_no has been entered"));
73
74         display_note(get_gl_view_str($trans_type, $trans_no, _("&View the GL Postings for this Payment")));
75
76         hyperlink_params($_SERVER['PHP_SELF'], _("Enter Another &Payment"), "NewPayment=yes");
77
78         hyperlink_params($_SERVER['PHP_SELF'], _("Enter A &Deposit"), "NewDeposit=yes");
79
80         display_footer_exit();
81 }
82
83 if (isset($_GET['UpdatedID']))
84 {
85         $trans_no = $_GET['UpdatedID'];
86         $trans_type = ST_BANKPAYMENT;
87
88         display_notification_centered(_("Payment $trans_no has been modified"));
89
90         display_note(get_gl_view_str($trans_type, $trans_no, _("&View the GL Postings for this Payment")));
91
92         hyperlink_params($_SERVER['PHP_SELF'], _("Enter Another &Payment"), "NewPayment=yes");
93
94         hyperlink_params($_SERVER['PHP_SELF'], _("Enter A &Deposit"), "NewDeposit=yes");
95
96         display_footer_exit();
97 }
98
99 if (isset($_GET['AddedDep']))
100 {
101         $trans_no = $_GET['AddedDep'];
102         $trans_type = ST_BANKDEPOSIT;
103
104         display_notification_centered(_("Deposit $trans_no has been entered"));
105
106         display_note(get_gl_view_str($trans_type, $trans_no, _("View the GL Postings for this Deposit")));
107
108         hyperlink_params($_SERVER['PHP_SELF'], _("Enter Another Deposit"), "NewDeposit=yes");
109
110         hyperlink_params($_SERVER['PHP_SELF'], _("Enter A Payment"), "NewPayment=yes");
111
112         display_footer_exit();
113 }
114 if (isset($_GET['UpdatedDep']))
115 {
116         $trans_no = $_GET['UpdatedDep'];
117         $trans_type = ST_BANKDEPOSIT;
118
119         display_notification_centered(_("Deposit $trans_no has been modified"));
120
121         display_note(get_gl_view_str($trans_type, $trans_no, _("&View the GL Postings for this Deposit")));
122
123         hyperlink_params($_SERVER['PHP_SELF'], _("Enter Another &Deposit"), "NewDeposit=yes");
124
125         hyperlink_params($_SERVER['PHP_SELF'], _("Enter A &Payment"), "NewPayment=yes");
126
127         display_footer_exit();
128 }
129
130 if (isset($_POST['_date__changed'])) {
131         $Ajax->activate('_ex_rate');
132 }
133 //--------------------------------------------------------------------------------------------------
134
135 function create_cart($type, $trans_no)
136 {
137         global $Refs;
138
139         if (isset($_SESSION['pay_items']))
140         {
141                 unset ($_SESSION['pay_items']);
142         }
143         
144         $cart = new items_cart($type);
145     $cart->order_id = $trans_no;
146
147         if ($trans_no) {
148
149                 $bank_trans = db_fetch(get_bank_trans($type, $trans_no));
150                 $_POST['bank_account'] = $bank_trans["bank_act"];
151                 $_POST['PayType'] = $bank_trans["person_type_id"];
152                 
153                 if ($bank_trans["person_type_id"] == PT_CUSTOMER)
154                 {
155                         $trans = get_customer_trans($trans_no, $type);  
156                         $_POST['person_id'] = $trans["debtor_no"];
157                         $_POST['PersonDetailID'] = $trans["branch_code"];
158                 }
159                 elseif ($bank_trans["person_type_id"] == PT_SUPPLIER)
160                 {
161                         $trans = get_supp_trans($trans_no, $type);
162                         $_POST['person_id'] = $trans["supplier_id"];
163                 }
164                 elseif ($bank_trans["person_type_id"] == PT_MISC)
165                         $_POST['person_id'] = $bank_trans["person_id"];
166                 elseif ($bank_trans["person_type_id"] == PT_QUICKENTRY)
167                         $_POST['person_id'] = $bank_trans["person_id"];
168                 else 
169                         $_POST['person_id'] = $bank_trans["person_id"];
170
171                 $cart->memo_ = get_comments_string($type, $trans_no);
172                 $cart->tran_date = sql2date($bank_trans['trans_date']);
173                 $cart->reference = $Refs->get($type, $trans_no);
174
175                 $gl_amount = 0;
176                 $result = get_gl_trans($type, $trans_no);
177                 if ($result) {
178                         while ($row = db_fetch($result)) {
179                                 if (is_bank_account($row['account'])) {
180                                         // date exchange rate is currenly not stored in bank transaction,
181                                         // so we have to restore it from original gl amounts
182                                         $ex_rate = $bank_trans['amount']/$row['amount'];
183                                 } else {
184                                         $date = $row['tran_date'];
185                                         $cart->add_gl_item( $row['account'], $row['dimension_id'],
186                                                 $row['dimension2_id'], $row['amount'], $row['memo_']);
187                                         $gl_amount += $row['amount'];
188                                 }
189                         }
190                 }
191                 // apply exchange rate
192                 foreach($cart->gl_items as $line_no => $line)
193                         $cart->gl_items[$line_no]->amount *= $ex_rate;
194                 
195         } else {
196                 $cart->reference = $Refs->get_next($cart->trans_type);
197                 $cart->tran_date = new_doc_date();
198                 if (!is_date_in_fiscalyear($cart->tran_date))
199                         $cart->tran_date = end_fiscalyear();
200         }
201
202         $_POST['memo_'] = $cart->memo_;
203         $_POST['ref'] = $cart->reference;
204         $_POST['date_'] = $cart->tran_date;
205
206         $_SESSION['pay_items'] = &$cart;
207 }
208 //-----------------------------------------------------------------------------------------------
209
210 if (isset($_POST['Process']))
211 {
212
213         $input_error = 0;
214
215         if ($_SESSION['pay_items']->count_gl_items() < 1) {
216                 display_error(_("You must enter at least one payment line."));
217                 set_focus('code_id');
218                 $input_error = 1;
219         }
220
221         if ($_SESSION['pay_items']->gl_items_total() == 0.0) {
222                 display_error(_("The total bank amount cannot be 0."));
223                 set_focus('code_id');
224                 $input_error = 1;
225         }
226
227         $limit = get_bank_account_limit($_POST['bank_account'], $_POST['date_']);
228
229         if ($limit != null && ($limit < $_SESSION['pay_items']->gl_items_total()))
230         {
231                 display_error(sprintf(_("The total bank amount exceeds allowed limit (%s)."), price_format($limit)));
232                 set_focus('code_id');
233                 $input_error = 1;
234         }
235
236         if (!$Refs->is_valid($_POST['ref']))
237         {
238                 display_error( _("You must enter a reference."));
239                 set_focus('ref');
240                 $input_error = 1;
241         }
242         elseif ($_POST['ref'] != $_SESSION['pay_items']->reference && !is_new_reference($_POST['ref'], $_SESSION['pay_items']->trans_type))
243         {
244                 display_error( _("The entered reference is already in use."));
245                 set_focus('ref');
246                 $input_error = 1;
247         }
248         if (!is_date($_POST['date_']))
249         {
250                 display_error(_("The entered date for the payment is invalid."));
251                 set_focus('date_');
252                 $input_error = 1;
253         }
254         elseif (!is_date_in_fiscalyear($_POST['date_']))
255         {
256                 display_error(_("The entered date is not in fiscal year."));
257                 set_focus('date_');
258                 $input_error = 1;
259         } 
260
261         if (get_post('PayType')==PT_CUSTOMER && (!get_post('person_id') || !get_post('PersonDetailID'))) {
262                 display_error(_("You have to select customer and customer branch."));
263                 set_focus('person_id');
264                 $input_error = 1;
265         } elseif (get_post('PayType')==PT_SUPPLIER && (!get_post('person_id'))) {
266                 display_error(_("You have to select supplier."));
267                 set_focus('person_id');
268                 $input_error = 1;
269         }
270
271         if ($input_error == 1)
272                 unset($_POST['Process']);
273 }
274
275 if (isset($_POST['Process']))
276 {
277         begin_transaction();
278         
279         $_SESSION['pay_items'] = &$_SESSION['pay_items'];
280         $new = $_SESSION['pay_items']->order_id == 0;
281
282         $trans = write_bank_transaction(
283                 $_SESSION['pay_items']->trans_type, $_SESSION['pay_items']->order_id, $_POST['bank_account'],
284                 $_SESSION['pay_items'], $_POST['date_'],
285                 $_POST['PayType'], $_POST['person_id'], get_post('PersonDetailID'),
286                 $_POST['ref'], $_POST['memo_'], false);
287
288         $trans_type = $trans[0];
289         $trans_no = $trans[1];
290         new_doc_date($_POST['date_']);
291
292         $_SESSION['pay_items']->clear_items();
293         unset($_SESSION['pay_items']);
294         
295         commit_transaction();
296         
297         if ($new)
298                 meta_forward($_SERVER['PHP_SELF'], $trans_type==ST_BANKPAYMENT ?
299                         "AddedID=$trans_no" : "AddedDep=$trans_no");
300         else
301                 meta_forward($_SERVER['PHP_SELF'], $trans_type==ST_BANKPAYMENT ?
302                         "UpdatedID=$trans_no" : "UpdatedDep=$trans_no");
303
304 }
305
306 //-----------------------------------------------------------------------------------------------
307
308 function check_item_data()
309 {
310         if (!check_num('amount', 0))
311         {
312                 display_error( _("The amount entered is not a valid number or is less than zero."));
313                 set_focus('amount');
314                 return false;
315         }
316
317         return true;
318 }
319
320 //-----------------------------------------------------------------------------------------------
321
322 function handle_update_item()
323 {
324         $amount = ($_SESSION['pay_items']->trans_type==ST_BANKPAYMENT ? 1:-1) * input_num('amount');
325     if($_POST['UpdateItem'] != "" && check_item_data())
326     {
327         $_SESSION['pay_items']->update_gl_item($_POST['Index'], $_POST['code_id'], 
328             $_POST['dimension_id'], $_POST['dimension2_id'], $amount , $_POST['LineMemo']);
329     }
330         line_start_focus();
331 }
332
333 //-----------------------------------------------------------------------------------------------
334
335 function handle_delete_item($id)
336 {
337         $_SESSION['pay_items']->remove_gl_item($id);
338         line_start_focus();
339 }
340
341 //-----------------------------------------------------------------------------------------------
342
343 function handle_new_item()
344 {
345         if (!check_item_data())
346                 return;
347         $amount = ($_SESSION['pay_items']->trans_type==ST_BANKPAYMENT ? 1:-1) * input_num('amount');
348
349         $_SESSION['pay_items']->add_gl_item($_POST['code_id'], $_POST['dimension_id'],
350                 $_POST['dimension2_id'], $amount, $_POST['LineMemo']);
351         line_start_focus();
352 }
353 //-----------------------------------------------------------------------------------------------
354 $id = find_submit('Delete');
355 if ($id != -1)
356         handle_delete_item($id);
357
358 if (isset($_POST['AddItem']))
359         handle_new_item();
360
361 if (isset($_POST['UpdateItem']))
362         handle_update_item();
363
364 if (isset($_POST['CancelItemChanges']))
365         line_start_focus();
366
367 if (isset($_POST['go']))
368 {
369         display_quick_entries($_SESSION['pay_items'], $_POST['person_id'], input_num('totamount'), 
370                 $_SESSION['pay_items']->trans_type==ST_BANKPAYMENT ? QE_PAYMENT : QE_DEPOSIT);
371         $_POST['totamount'] = price_format(0); $Ajax->activate('totamount');
372         line_start_focus();
373 }
374 //-----------------------------------------------------------------------------------------------
375
376 start_form();
377
378 display_bank_header($_SESSION['pay_items']);
379
380 start_table(TABLESTYLE2, "width=90%", 10);
381 start_row();
382 echo "<td>";
383 display_gl_items($_SESSION['pay_items']->trans_type==ST_BANKPAYMENT ?
384         _("Payment Items"):_("Deposit Items"), $_SESSION['pay_items']);
385 gl_options_controls();
386 echo "</td>";
387 end_row();
388 end_table(1);
389
390 submit_center_first('Update', _("Update"), '', null);
391 submit_center_last('Process', $_SESSION['pay_items']->trans_type==ST_BANKPAYMENT ?
392         _("Process Payment"):_("Process Deposit"), '', 'default');
393
394 end_form();
395
396 //------------------------------------------------------------------------------------------------
397
398 end_page();
399
400 ?>