supplier_name);
echo "
";
//-----------------------------------------------------------------------------------------
function check_data()
{
if (!is_numeric($_POST['This_QuantityCredited']))
{
display_error(_("The quantity to credit must be numeric."));
return false;
}
if ($_POST['This_QuantityCredited'] <= 0)
{
display_error(_("The quantity to credit must be greater than zero."));
return false;
}
if (!is_numeric($_POST['ChgPrice']) || $_POST['ChgPrice'] < 0)
{
display_error(_("The price is either not numeric or negative."));
return false;
}
return true;
}
//-----------------------------------------------------------------------------------------
if (isset($_POST['AddGRNToTrans']))
{
if (check_data())
{
$complete = False;
//$_SESSION['supp_trans']->add_grn_to_trans($_POST['GRNNumber'],
// $_POST['po_detail_item'], $_POST['item_code'],
// $_POST['item_description'], $_POST['qty_recd'],
// $_POST['prev_quantity_inv'], $_POST['This_QuantityCredited'],
// $_POST['order_price'], $_POST['ChgPrice'], $complete,
// $_POST['std_cost_unit'], $_POST['gl_code']);
$_SESSION['supp_trans']->add_grn_to_trans($_POST['GRNNumber'],
$_POST['po_detail_item'], $_POST['item_code'],
$_POST['item_description'], $_POST['qty_recd'],
$_POST['prev_quantity_inv'], $_POST['This_QuantityCredited'],
$_POST['order_price'], $_POST['ChgPrice'], $complete,
$_POST['std_cost_unit'], "");
}
}
//-----------------------------------------------------------------------------------------
if (isset($_GET['Delete']))
{
$_SESSION['supp_trans']->remove_grn_from_trans($_GET['Delete']);
}
//-----------------------------------------------------------------------------------------
display_grn_items($_SESSION['supp_trans'], 1);
echo "
";
hyperlink_no_params("$path_to_root/purchasing/supplier_credit.php", _("Return to Credit Note Entry"));
echo "
";
//-----------------------------------------------------------------------------------------
// get the supplier grns that have been invoiced
$result = get_grn_items(0, $_SESSION['supp_trans']->supplier_id, false, true);
if (db_num_rows($result) == 0)
{
display_note(_("There are no received items for the selected supplier that have been invoiced."));
display_note(_("Credits can only be applied to invoiced items."));
echo "
";
end_page();
exit;
}
/*Set up a table to show the GRN items outstanding for selection */
start_form(false, true);
start_table("$table_style width=95%");
$th = array(_("Delivery"), _("Sequence #"), _("Order"), _("Item Code"), _("Description"),
_("Delivered"), _("Total Qty Received"), _("Qty Already Invoiced"),
_("Qty Yet To Invoice"), _("Order Price"), _("Line Value"));
table_header($th);
$i = $k =0;
while ($myrow = db_fetch($result))
{
$grn_already_on_credit = False;
foreach ($_SESSION['supp_trans']->grn_items as $entered_grn)
{
if ($entered_grn->id == $myrow["id"])
{
$grn_already_on_credit = True;
}
}
if ($grn_already_on_credit == False)
{
alt_table_row_color($k);
label_cell(get_trans_view_str(25, $myrow["grn_batch_id"]));
submit_cells('grn_item_id', $myrow["id"]);
label_cell(get_trans_view_str(systypes::po(), $myrow["purch_order_no"]));
label_cell($myrow["item_code"]);
label_cell($myrow["description"]);
label_cell(sql2date($myrow["delivery_date"]));
qty_cell($myrow["qty_recd"]);
qty_cell($myrow["quantity_inv"]);
qty_cell($myrow["qty_recd"] - $myrow["quantity_inv"]);
amount_cell($myrow["unit_price"]);
amount_cell($myrow["unit_price"] * $myrow["quantity_inv"]);
end_row();
$i++;
if ($i > 15)
{
$i = 0;
table_header($th);
}
}
}
end_table();
//-----------------------------------------------------------------------------------------
if (isset($_POST['grn_item_id']) && $_POST['grn_item_id'] != "")
{
$myrow = get_grn_item_detail($_POST['grn_item_id']);
echo "
";
display_heading2(_("Delivery Item Selected For Adding To A Supplier Credit Note"));
start_table("$table_style width=80%");
$th = array(_("Sequence #"), _("Item"), _("Qty Already Invoiced"),
_("Quantity to Credit"), _("Order Price"), _("Credit Price"));
table_header($th);
start_row();
label_cell($_POST['grn_item_id']);
label_cell($myrow['item_code'] . " " . $myrow['description']);
qty_cell($myrow["quantity_inv"]);
text_cells(null, 'This_QuantityCredited', max($myrow['quantity_inv'], 0), 13, 15);
amount_cell($myrow['unit_price']);
text_cells(null, 'ChgPrice', $myrow['unit_price'], 13, 15);
end_row();
end_table(1);
submit_center('AddGRNToTrans', _("Add to Credit Note"));
hidden('GRNNumber', $_POST['grn_item_id']);
hidden('item_code', $myrow['item_code']);;
hidden('item_description', $myrow['description']);
hidden('qty_recd', $myrow['qty_recd']);
hidden('prev_quantity_inv', $myrow['quantity_inv']);
hidden('order_price', $myrow['unit_price']);
hidden('std_cost_unit', $myrow['std_cost_unit']);
hidden('po_detail_item', $myrow['po_detail_item']);
}
end_form();
end_page();
?>