Merged changes from main branch up to 2.1.3.
[fa-stable.git] / purchasing / supplier_credit.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
14 include_once($path_to_root . "/purchasing/includes/supp_trans_class.inc");
15
16 $page_security=5;
17
18 include_once($path_to_root . "/includes/session.inc");
19
20 include_once($path_to_root . "/includes/data_checks.inc");
21
22 include_once($path_to_root . "/purchasing/includes/purchasing_db.inc");
23 include_once($path_to_root . "/purchasing/includes/purchasing_ui.inc");
24 $js = "";
25 if ($use_popup_windows)
26         $js .= get_js_open_window(900, 500);
27 if ($use_date_picker)
28         $js .= get_js_date_picker();
29 page(_("Supplier Credit Note"), false, false, "", $js);
30
31 //----------------------------------------------------------------------------------------
32
33 check_db_has_suppliers(_("There are no suppliers defined in the system."));
34
35 //---------------------------------------------------------------------------------------------------------------
36 if ($ret = context_restore()) {
37  // return from supplier editor
38         copy_from_trans($_SESSION['supp_trans']);
39         if(isset($ret['supplier_id']))
40                 $_POST['supplier_id'] = $ret['supplier_id'];
41 }
42 if (isset($_POST['_supplier_id_editor'])) {
43         copy_to_trans($_SESSION['supp_trans']);
44         context_call($path_to_root.'/purchasing/manage/suppliers.php?supplier_id='.$_POST['supplier_id'], 'supp_trans');
45 }
46
47 //---------------------------------------------------------------------------------------------------------------
48
49 if (isset($_GET['AddedID'])) 
50 {
51         $invoice_no = $_GET['AddedID'];
52         $trans_type = 21;
53
54
55     echo "<center>";
56     display_notification_centered(_("Supplier credit note has been processed."));
57     display_note(get_trans_view_str($trans_type, $invoice_no, _("View this Credit Note")));
58
59         display_note(get_gl_view_str($trans_type, $invoice_no, _("View the GL Journal Entries for this Credit Note")), 1);
60
61     hyperlink_params($_SERVER['PHP_SELF'], _("Enter Another Credit Note"), "New=1");
62         hyperlink_params("$path_to_root/admin/attachments.php", _("Add an Attachment"), "filterType=$trans_type&trans_no=$invoice_no");
63         
64         display_footer_exit();
65 }
66
67 //---------------------------------------------------------------------------------------------------
68
69 if (isset($_GET['New']))
70 {
71         if (isset( $_SESSION['supp_trans']))
72         {
73                 unset ($_SESSION['supp_trans']->grn_items);
74                 unset ($_SESSION['supp_trans']->gl_codes);
75                 unset ($_SESSION['supp_trans']);
76         }
77
78         $_SESSION['supp_trans'] = new supp_trans;
79         $_SESSION['supp_trans']->is_invoice = false;
80         if (isset($_GET['invoice_no']))
81         {
82                 $_SESSION['supp_trans']->supp_reference = $_POST['invoice_no'] = $_GET['invoice_no'];
83         }
84 }
85
86 function clear_fields()
87 {
88         global $Ajax;
89         
90         unset($_POST['gl_code']);
91         unset($_POST['dimension_id']);
92         unset($_POST['dimension2_id']);
93         unset($_POST['amount']);
94         unset($_POST['memo_']);
95         unset($_POST['AddGLCodeToTrans']);
96         $Ajax->activate('gl_items');
97         set_focus('gl_code');
98 }
99 //------------------------------------------------------------------------------------------------
100 //      GL postings are often entered in the same form to two accounts
101 //  so fileds are cleared only on user demand.
102 //
103 if (isset($_POST['ClearFields']))
104 {
105         clear_fields();
106 }
107
108 if (isset($_POST['AddGLCodeToTrans'])){
109
110         $Ajax->activate('gl_items');
111         $input_error = false;
112
113         $sql = "SELECT account_code, account_name FROM ".TB_PREF."chart_master WHERE account_code='" . $_POST['gl_code'] . "'";
114         $result = db_query($sql,"get account information");
115         if (db_num_rows($result) == 0)
116         {
117                 display_error(_("The account code entered is not a valid code, this line cannot be added to the transaction."));
118                 set_focus('gl_code');
119                 $input_error = true;
120         }
121         else
122         {
123                 $myrow = db_fetch_row($result);
124                 $gl_act_name = $myrow[1];
125                 if (!check_num('amount'))
126                 {
127                         display_error(_("The amount entered is not numeric. This line cannot be added to the transaction."));
128                         set_focus('amount');
129                         $input_error = true;
130                 }
131         }
132
133         if (!is_tax_gl_unique(get_post('gl_code'))) {
134                 display_error(_("Cannot post to GL account used by more than one tax type."));
135                 set_focus('gl_code');
136                 $input_error = true;
137         }
138
139         if ($input_error == false)
140         {
141                 $_SESSION['supp_trans']->add_gl_codes_to_trans($_POST['gl_code'], $gl_act_name,
142                         $_POST['dimension_id'], $_POST['dimension2_id'], 
143                         input_num('amount'), $_POST['memo_']);
144                 set_focus('gl_code');
145         }
146 }
147
148
149 //---------------------------------------------------------------------------------------------------
150
151 function check_data()
152 {
153         global $total_grn_value, $total_gl_value;
154         
155         if (!$_SESSION['supp_trans']->is_valid_trans_to_post())
156         {
157                 display_error(_("The credit note cannot be processed because the there are no items or values on the invoice.  Credit notes are expected to have a charge."));
158                 set_focus('');
159                 return false;
160         }
161
162         if (!references::is_valid($_SESSION['supp_trans']->reference)) 
163         {
164                 display_error(_("You must enter an credit note reference."));
165                 set_focus('reference');
166                 return false;
167         }
168
169         if (!is_new_reference($_SESSION['supp_trans']->reference, 21)) 
170         {
171                 display_error(_("The entered reference is already in use."));
172                 set_focus('reference');
173                 return false;
174         }
175
176         if (!references::is_valid($_SESSION['supp_trans']->supp_reference)) 
177         {
178                 display_error(_("You must enter a supplier's credit note reference."));
179                 set_focus('supp_reference');
180                 return false;
181         }
182
183         if (!is_date($_SESSION['supp_trans']->tran_date))
184         {
185                 display_error(_("The credit note as entered cannot be processed because the date entered is not valid."));
186                 set_focus('tran_date');
187                 return false;
188         } 
189         elseif (!is_date_in_fiscalyear($_SESSION['supp_trans']->tran_date)) 
190         {
191                 display_error(_("The entered date is not in fiscal year."));
192                 set_focus('tran_date');
193                 return false;
194         }
195         if (!is_date( $_SESSION['supp_trans']->due_date))
196         {
197                 display_error(_("The invoice as entered cannot be processed because the due date is in an incorrect format."));
198                 set_focus('due_date');
199                 return false;
200         }
201
202         if ($_SESSION['supp_trans']->ov_amount < ($total_gl_value + $total_grn_value))
203         {
204                 display_error(_("The credit note total as entered is less than the sum of the the general ledger entires (if any) and the charges for goods received. There must be a mistake somewhere, the credit note as entered will not be processed."));
205                 return false;
206         }
207
208         return true;
209 }
210
211 //---------------------------------------------------------------------------------------------------
212
213 function handle_commit_credit_note()
214 {
215         copy_to_trans($_SESSION['supp_trans']);
216
217         if (!check_data())
218                 return;
219
220         if (isset($_POST['invoice_no']))
221                 $invoice_no = add_supp_invoice($_SESSION['supp_trans'], $_POST['invoice_no']);
222         else
223                 $invoice_no = add_supp_invoice($_SESSION['supp_trans']);
224
225     $_SESSION['supp_trans']->clear_items();
226     unset($_SESSION['supp_trans']);
227
228         meta_forward($_SERVER['PHP_SELF'], "AddedID=$invoice_no");
229 }
230
231 //--------------------------------------------------------------------------------------------------
232
233 if (isset($_POST['PostCreditNote']))
234 {
235         handle_commit_credit_note();
236 }
237
238 function check_item_data($n)
239 {
240         if (!check_num('This_QuantityCredited'.$n, 0))
241         {
242                 display_error(_("The quantity to credit must be numeric and greater than zero."));
243                 set_focus('This_QuantityCredited'.$n);
244                 return false;
245         }
246
247         if (!check_num('ChgPrice'.$n, 0))
248         {
249                 display_error(_("The price is either not numeric or negative."));
250                 set_focus('ChgPrice'.$n);
251                 return false;
252         }
253
254         return true;
255 }
256
257 function commit_item_data($n)
258 {
259         if (check_item_data($n))
260         {
261                 $complete = False;
262
263                 $_SESSION['supp_trans']->add_grn_to_trans($n,
264                 $_POST['po_detail_item'.$n], $_POST['item_code'.$n],
265                 $_POST['item_description'.$n], $_POST['qty_recd'.$n],
266                 $_POST['prev_quantity_inv'.$n], input_num('This_QuantityCredited'.$n),
267                 $_POST['order_price'.$n], input_num('ChgPrice'.$n), $complete,
268                 $_POST['std_cost_unit'.$n], "");
269         }
270 }
271
272 //-----------------------------------------------------------------------------------------
273
274 $id = find_submit('grn_item_id');
275 if ($id != -1)
276 {
277         commit_item_data($id);
278 }
279
280 if (isset($_POST['InvGRNAll']))
281 {
282         foreach($_POST as $postkey=>$postval )
283     {
284                 if (strpos($postkey, "qty_recd") === 0)
285                 {
286                         $id = substr($postkey, strlen("qty_recd"));
287                         $id = (int)$id;
288                         commit_item_data($id);
289                 }
290     }
291 }       
292
293
294 //--------------------------------------------------------------------------------------------------
295 $id3 = find_submit('Delete');
296 if ($id3 != -1)
297 {
298         $_SESSION['supp_trans']->remove_grn_from_trans($id3);
299         $Ajax->activate('grn_items');
300         $Ajax->activate('inv_tot');
301 }
302
303 $id4 = find_submit('Delete2');
304 if ($id4 != -1)
305 {
306         $_SESSION['supp_trans']->remove_gl_codes_from_trans($id4);
307         clear_fields();
308         $Ajax->activate('gl_items');
309         $Ajax->activate('inv_tot');
310 }
311 if (isset($_POST['RefreshInquiry']))
312 {
313         $Ajax->activate('grn_items');
314         $Ajax->activate('inv_tot');
315 }
316
317 if (isset($_POST['go']))
318 {
319         $Ajax->activate('gl_items');
320         display_quick_entries($_SESSION['supp_trans'], $_POST['qid'], input_num('totamount'), QE_SUPPINV);
321         $_POST['totamount'] = price_format(0); $Ajax->activate('totamount');
322         $Ajax->activate('inv_tot');
323 }
324
325
326 //--------------------------------------------------------------------------------------------------
327
328 start_form();
329
330 invoice_header($_SESSION['supp_trans']);
331 if ($_POST['supplier_id']=='') 
332         display_error('No supplier found for entered search text');
333 else {
334         start_outer_table("$table_style2 width=98%", 5);
335
336         $total_grn_value = display_grn_items($_SESSION['supp_trans'], 1);
337
338         $total_gl_value = display_gl_items($_SESSION['supp_trans'], 1);
339
340         div_start('inv_tot');
341         invoice_totals($_SESSION['supp_trans']);
342         div_end();
343
344         end_outer_table(0, false);
345 }
346
347 if ($id != -1)
348 {
349         $Ajax->activate('grn_items');
350         $Ajax->activate('inv_tot');
351 }
352
353 if (get_post('AddGLCodeToTrans'))
354         $Ajax->activate('inv_tot');
355
356 br();
357 submit_center('PostCreditNote', _("Enter Credit Note"), true, '', 'default');
358 br();
359
360 end_form();
361 end_page();
362 ?>