5 include_once($path_to_root . "/purchasing/includes/supp_trans_class.inc");
9 include_once($path_to_root . "/includes/session.inc");
11 include_once($path_to_root . "/includes/data_checks.inc");
13 include_once($path_to_root . "/purchasing/includes/purchasing_db.inc");
14 include_once($path_to_root . "/purchasing/includes/purchasing_ui.inc");
16 if ($use_popup_windows)
17 $js .= get_js_open_window(900, 500);
19 $js .= get_js_date_picker();
20 page(_("Supplier Credit Note"), false, false, "", $js);
22 //----------------------------------------------------------------------------------------
24 check_db_has_suppliers(_("There are no suppliers defined in the system."));
26 //---------------------------------------------------------------------------------------------------------------
27 if ($ret = context_restore()) {
28 // return from supplier editor
29 copy_from_trans($_SESSION['supp_trans']);
30 if(isset($ret['supplier_id']))
31 $_POST['supplier_id'] = $ret['supplier_id'];
33 if (isset($_POST['_supplier_id_editor'])) {
34 copy_to_trans($_SESSION['supp_trans']);
35 context_call($path_to_root.'/purchasing/manage/suppliers.php?supplier_id='.$_POST['supplier_id'], 'supp_trans');
38 //---------------------------------------------------------------------------------------------------------------
40 if (isset($_GET['AddedID']))
42 $invoice_no = $_GET['AddedID'];
47 display_notification_centered(_("Supplier credit note has been processed."));
48 display_note(get_trans_view_str($trans_type, $invoice_no, _("View this Credit Note")));
50 display_note(get_gl_view_str($trans_type, $invoice_no, _("View the GL Journal Entries for this Credit Note")), 1);
52 hyperlink_params($_SERVER['PHP_SELF'], _("Enter Another Credit Note"), "New=1");
54 display_footer_exit();
57 //---------------------------------------------------------------------------------------------------
59 if (isset($_GET['New']))
61 if (isset( $_SESSION['supp_trans']))
63 unset ($_SESSION['supp_trans']->grn_items);
64 unset ($_SESSION['supp_trans']->gl_codes);
65 unset ($_SESSION['supp_trans']);
68 $_SESSION['supp_trans'] = new supp_trans;
69 $_SESSION['supp_trans']->is_invoice = false;
72 function clear_fields()
76 unset($_POST['gl_code']);
77 unset($_POST['dimension_id']);
78 unset($_POST['dimension2_id']);
79 unset($_POST['amount']);
80 unset($_POST['memo_']);
81 unset($_POST['AddGLCodeToTrans']);
82 $Ajax->activate('gl_items');
85 //------------------------------------------------------------------------------------------------
86 // GL postings are often entered in the same form to two accounts
87 // so fileds are cleared only on user demand.
89 if (isset($_POST['ClearFields']))
94 if (isset($_POST['AddGLCodeToTrans'])){
96 $Ajax->activate('gl_items');
99 $sql = "SELECT account_code, account_name FROM ".TB_PREF."chart_master WHERE account_code='" . $_POST['gl_code'] . "'";
100 $result = db_query($sql,"get account information");
101 if (db_num_rows($result) == 0)
103 display_error(_("The account code entered is not a valid code, this line cannot be added to the transaction."));
104 set_focus('gl_code');
109 $myrow = db_fetch_row($result);
110 $gl_act_name = $myrow[1];
111 if (!check_num('amount'))
113 display_error(_("The amount entered is not numeric. This line cannot be added to the transaction."));
119 if ($input_error == false)
121 $_SESSION['supp_trans']->add_gl_codes_to_trans($_POST['gl_code'], $gl_act_name,
122 $_POST['dimension_id'], $_POST['dimension2_id'],
123 input_num('amount'), $_POST['memo_']);
124 set_focus('gl_code');
129 //---------------------------------------------------------------------------------------------------
131 function check_data()
133 global $total_grn_value, $total_gl_value;
135 if (!$_SESSION['supp_trans']->is_valid_trans_to_post())
137 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."));
142 if (!references::is_valid($_SESSION['supp_trans']->reference))
144 display_error(_("You must enter an credit note reference."));
145 set_focus('reference');
149 if (!is_new_reference($_SESSION['supp_trans']->reference, 21))
151 display_error(_("The entered reference is already in use."));
152 set_focus('reference');
156 if (!references::is_valid($_SESSION['supp_trans']->supp_reference))
158 display_error(_("You must enter a supplier's credit note reference."));
159 set_focus('supp_reference');
163 if (!is_date($_SESSION['supp_trans']->tran_date))
165 display_error(_("The credit note as entered cannot be processed because the date entered is not valid."));
166 set_focus('tran_date');
169 elseif (!is_date_in_fiscalyear($_SESSION['supp_trans']->tran_date))
171 display_error(_("The entered date is not in fiscal year."));
172 set_focus('tran_date');
175 if (!is_date( $_SESSION['supp_trans']->due_date))
177 display_error(_("The invoice as entered cannot be processed because the due date is in an incorrect format."));
178 set_focus('due_date');
182 if ($_SESSION['supp_trans']->ov_amount < ($total_gl_value + $total_grn_value))
184 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."));
191 //---------------------------------------------------------------------------------------------------
193 function handle_commit_credit_note()
195 copy_to_trans($_SESSION['supp_trans']);
200 $invoice_no = add_supp_invoice($_SESSION['supp_trans']);
202 $_SESSION['supp_trans']->clear_items();
203 unset($_SESSION['supp_trans']);
205 meta_forward($_SERVER['PHP_SELF'], "AddedID=$invoice_no");
208 //--------------------------------------------------------------------------------------------------
210 if (isset($_POST['PostCreditNote']))
212 handle_commit_credit_note();
215 function check_item_data($n)
217 if (!check_num('This_QuantityCredited'.$n, 0))
219 display_error(_("The quantity to credit must be numeric and greater than zero."));
220 set_focus('This_QuantityCredited'.$n);
224 if (!check_num('ChgPrice'.$n, 0))
226 display_error(_("The price is either not numeric or negative."));
227 set_focus('ChgPrice'.$n);
234 function commit_item_data($n)
236 if (check_item_data($n))
240 $_SESSION['supp_trans']->add_grn_to_trans($n,
241 $_POST['po_detail_item'.$n], $_POST['item_code'.$n],
242 $_POST['item_description'.$n], $_POST['qty_recd'.$n],
243 $_POST['prev_quantity_inv'.$n], input_num('This_QuantityCredited'.$n),
244 $_POST['order_price'.$n], input_num('ChgPrice'.$n), $complete,
245 $_POST['std_cost_unit'.$n], "");
249 //-----------------------------------------------------------------------------------------
251 $id = find_submit('grn_item_id');
254 commit_item_data($id);
257 if (isset($_POST['InvGRNAll']))
259 foreach($_POST as $postkey=>$postval )
261 if (strpos($postkey, "qty_recd") === 0)
263 $id = substr($postkey, strlen("qty_recd"));
265 commit_item_data($id);
271 //--------------------------------------------------------------------------------------------------
272 $id3 = find_submit('Delete');
275 $_SESSION['supp_trans']->remove_grn_from_trans($id3);
276 $Ajax->activate('grn_items');
277 $Ajax->activate('inv_tot');
280 $id4 = find_submit('Delete2');
283 $_SESSION['supp_trans']->remove_gl_codes_from_trans($id4);
285 $Ajax->activate('gl_items');
286 $Ajax->activate('inv_tot');
290 //--------------------------------------------------------------------------------------------------
292 start_form(false, true);
294 start_table("$table_style width=98%", 8);
295 echo "<tr><td valign=center>"; // outer table
299 invoice_header($_SESSION['supp_trans']);
300 if ($_POST['supplier_id']=='')
301 display_error('No supplier found for entered search text');
303 echo "</td></tr><tr><td valign=center>"; // outer table
305 $total_grn_value = display_grn_items($_SESSION['supp_trans'], 1);
307 $total_gl_value = display_gl_items($_SESSION['supp_trans'], 1);
309 echo "</td></tr><tr><td align=center colspan=2>"; // outer table
310 div_start('inv_tot');
311 invoice_totals($_SESSION['supp_trans']);
316 end_table(1); // outer table
320 $Ajax->activate('grn_items');
321 $Ajax->activate('inv_tot');
324 if (get_post('AddGLCodeToTrans'))
325 $Ajax->activate('inv_tot');
328 submit_center('PostCreditNote', _("Enter Credit Note"), true, '', true);