5 include_once($path_to_root . "/purchasing/includes/supp_trans_class.inc");
7 include_once($path_to_root . "/includes/session.inc");
9 include_once($path_to_root . "/purchasing/includes/purchasing_ui.inc");
10 include_once($path_to_root . "/purchasing/includes/purchasing_db.inc");
14 $js .= get_js_date_picker();
15 page(_("Select Received Items to Add"), false, false, "", $js);
18 if (!isset($_SESSION['supp_trans']))
20 display_note("To enter supplier transactions the supplier must first be selected from the supplier selection screen, then the link to enter a supplier credit note must be clicked on.", 1, 0);;
24 //-----------------------------------------------------------------------------------------
26 display_heading($_SESSION['supp_trans']->supplier_name);
30 //-----------------------------------------------------------------------------------------
34 global $check_price_charged_vs_order_price,
35 $check_qty_charged_vs_del_qty;
36 if (!check_num('this_quantity_inv', 0) || input_num('this_quantity_inv')==0)
38 display_error( _("The quantity to invoice must be numeric and greater than zero."));
42 if (!check_num('ChgPrice'))
44 display_error( _("The price is not numeric."));
48 if ($check_price_charged_vs_order_price == True)
50 if ($_POST['order_price']!=input_num('ChgPrice')) {
51 if ($_POST['order_price']==0 ||
52 input_num('ChgPrice')/$_POST['order_price'] >
53 (1 + (sys_prefs::over_charge_allowance() / 100)))
55 display_error(_("The price being invoiced is more than the purchase order price by more than the allowed over-charge percentage. The system is set up to prohibit this. See the system administrator to modify the set up parameters if necessary.") .
56 _("The over-charge percentage allowance is :") . sys_prefs::over_charge_allowance() . "%");
62 if ($check_qty_charged_vs_del_qty == True)
64 if (input_num('this_quantity_inv') / ($_POST['qty_recd'] - $_POST['prev_quantity_inv']) >
65 (1+ (sys_prefs::over_charge_allowance() / 100)))
67 display_error( _("The quantity being invoiced is more than the outstanding quantity by more than the allowed over-charge percentage. The system is set up to prohibit this. See the system administrator to modify the set up parameters if necessary.")
68 . _("The over-charge percentage allowance is :") . sys_prefs::over_charge_allowance() . "%");
76 //-----------------------------------------------------------------------------------------
78 if (isset($_POST['AddGRNToTrans']))
83 if (input_num('this_quantity_inv') >= ($_POST['qty_recd'] - $_POST['prev_quantity_inv']))
92 $_SESSION['supp_trans']->add_grn_to_trans($_POST['GRNNumber'], $_POST['po_detail_item'],
93 $_POST['item_code'], $_POST['item_description'], $_POST['qty_recd'],
94 $_POST['prev_quantity_inv'], input_num('this_quantity_inv'),
95 $_POST['order_price'], input_num('ChgPrice'), $complete,
96 $_POST['std_cost_unit'], "");
100 //-----------------------------------------------------------------------------------------
102 if (isset($_GET['Delete']))
104 $_SESSION['supp_trans']->remove_grn_from_trans($_GET['Delete']);
107 //-----------------------------------------------------------------------------------------
109 display_grn_items($_SESSION['supp_trans'], 1);
112 hyperlink_no_params("$path_to_root/purchasing/supplier_invoice.php", _("Back to Supplier Invoice Entry"));
115 //-----------------------------------------------------------------------------------------
117 function display_grn_items_for_selection()
121 $result = get_grn_items(0, $_SESSION['supp_trans']->supplier_id, true);
123 if (db_num_rows($result) == 0)
125 display_note(_("There are no outstanding items received from this supplier that have not been invoiced by them."), 0, 1);
130 /*Set up a table to show the outstanding GRN items for selection */
131 start_form(false, true);
133 display_heading2(_("Items Received Yet to be Invoiced"));
135 start_table("$table_style colspan=7 width=95%");
136 $th = array(_("Delivery"), _("Sequence #"), _("P.O."), _("Item"), _("Description"),
137 _("Received On"), _("Quantity Received"), _("Quantity Invoiced"),
138 _("Uninvoiced Quantity"), _("Order Price"), _("Total"));
142 while ($myrow = db_fetch($result))
145 $grn_already_on_invoice = False;
147 foreach ($_SESSION['supp_trans']->grn_items as $entered_grn)
149 if ($entered_grn->id == $myrow["id"])
151 $grn_already_on_invoice = True;
154 if ($grn_already_on_invoice == False)
157 alt_table_row_color($k);
159 label_cell(get_trans_view_str(25, $myrow["grn_batch_id"]));
160 //text_cells(null, 'grn_item_id', $myrow["id"]);
161 submit_cells('grn_item_id', $myrow["id"]);
162 label_cell(get_trans_view_str(systypes::po(), $myrow["purch_order_no"]));
163 label_cell($myrow["item_code"]);
164 label_cell($myrow["description"]);
165 label_cell(sql2date($myrow["delivery_date"]));
166 qty_cell($myrow["qty_recd"]);
167 qty_cell($myrow["quantity_inv"]);
168 qty_cell($myrow["qty_recd"] - $myrow["quantity_inv"]);
169 amount_cell($myrow["unit_price"]);
170 amount_cell(round($myrow["unit_price"] * ($myrow["qty_recd"] - $myrow["quantity_inv"]),
186 //-----------------------------------------------------------------------------------------
188 display_grn_items_for_selection();
190 //-----------------------------------------------------------------------------------------
192 if (isset($_POST['grn_item_id']) && $_POST['grn_item_id'] != "")
195 $myrow = get_grn_item_detail($_POST['grn_item_id']);
198 display_heading2(_("Delivery Item Selected For Adding To A Supplier Invoice"));
199 start_table("$table_style width=80%");
200 $th = array(_("Sequence #"), _("Item"), _("Description"), _("Quantity Outstanding"),
201 _("Quantity to Invoice"), _("Order Price"), _("Actual Price"));
205 label_cell($_POST['grn_item_id']);
206 label_cell($myrow['item_code']);
207 label_cell($myrow['description']);
208 qty_cell($myrow['QtyOstdg']);
209 qty_cells(null, 'this_quantity_inv', qty_format($myrow['QtyOstdg']));
210 amount_cell($myrow['unit_price']);
211 small_amount_cells(null, 'ChgPrice', price_format($myrow['unit_price']));
215 submit_center('AddGRNToTrans', _("Add to Invoice"));
217 hidden('GRNNumber', $_POST['grn_item_id']);
218 hidden('item_code', $myrow['item_code']);
219 hidden('item_description', $myrow['description']);;
220 hidden('qty_recd', $myrow['qty_recd']);
221 hidden('prev_quantity_inv', $myrow['quantity_inv']);
222 hidden('order_price', $myrow['unit_price']);
223 hidden('std_cost_unit', $myrow['std_cost_unit']);
225 hidden('po_detail_item', $myrow['po_detail_item']);
228 //----------------------------------------------------------------------------------------