. ***********************************************************************/ $page_security = 'SA_SUPPTRANSVIEW'; $path_to_root = "../.."; include($path_to_root . "/purchasing/includes/po_class.inc"); include($path_to_root . "/includes/session.inc"); include($path_to_root . "/purchasing/includes/purchasing_ui.inc"); $js = ""; if ($SysPrefs->use_popup_windows) $js .= get_js_open_window(900, 500); page(_($help_context = "View Purchase Order"), true, false, "", $js); if (!isset($_GET['trans_no'])) { die ("
" . _("This page must be called with a purchase order number to review.")); } display_heading(_("Purchase Order") . " #" . $_GET['trans_no']); $purchase_order = new purch_order; read_po($_GET['trans_no'], $purchase_order); echo "
"; display_po_summary($purchase_order, true); start_table(TABLESTYLE, "width='90%'", 6); echo ""; // outer table display_heading2(_("Line Details")); start_table(TABLESTYLE, "width='100%'"); $th = array(_("Item Code"), _("Item Description"), _("Quantity"), _("Unit"), _("Price"), _("Requested By"), _("Line Total"), _("Quantity Received"), _("Quantity Invoiced")); table_header($th); $total = $k = 0; $overdue_items = false; foreach ($purchase_order->line_items as $stock_item) { $line_total = $stock_item->quantity * $stock_item->price; // if overdue and outstanding quantities, then highlight as so if (($stock_item->quantity - $stock_item->qty_received > 0) && date1_greater_date2(Today(), $stock_item->req_del_date)) { start_row("class='overduebg'"); $overdue_items = true; } else { alt_table_row_color($k); } label_cell($stock_item->stock_id); label_cell($stock_item->item_description); $dec = get_qty_dec($stock_item->stock_id); qty_cell($stock_item->quantity, false, $dec); label_cell($stock_item->units); amount_decimal_cell($stock_item->price); label_cell($stock_item->req_del_date); amount_cell($line_total); qty_cell($stock_item->qty_received, false, $dec); qty_cell($stock_item->qty_inv, false, $dec); end_row(); $total += $line_total; } $display_sub_tot = number_format2($total,user_price_dec()); label_row(_("Sub Total"), $display_sub_tot, "align=right colspan=6", "nowrap align=right",2); $taxes = $purchase_order->get_taxes(); $tax_total = display_edit_tax_items($taxes, 6, $purchase_order->tax_included,2); $display_total = price_format(($total + $tax_total)); start_row(); label_cells(_("Amount Total"), $display_total, "colspan=6 align='right'","align='right'"); label_cell('', "colspan=2"); end_row(); end_table(); if ($overdue_items) display_note(_("Marked items are overdue."), 0, 0, "class='overduefg'"); //---------------------------------------------------------------------------------------------------- $k = 0; $grns_result = get_po_grns($_GET['trans_no']); if (db_num_rows($grns_result) > 0) { echo ""; // outer table display_heading2(_("Deliveries")); start_table(TABLESTYLE); $th = array(_("#"), _("Reference"), _("Delivered On")); table_header($th); while ($myrow = db_fetch($grns_result)) { alt_table_row_color($k); label_cell(get_trans_view_str(ST_SUPPRECEIVE,$myrow["id"])); label_cell($myrow["reference"]); label_cell(sql2date($myrow["delivery_date"])); end_row(); } end_table();; } $invoice_result = get_po_invoices_credits($_GET['trans_no']); $k = 0; if (db_num_rows($invoice_result) > 0) { echo ""; // outer table display_heading2(_("Invoices/Credits")); start_table(TABLESTYLE); $th = array(_("#"), _("Date"), _("Total")); table_header($th); while ($myrow = db_fetch($invoice_result)) { alt_table_row_color($k); label_cell(get_trans_view_str($myrow["type"],$myrow["trans_no"])); label_cell(sql2date($myrow["tran_date"])); amount_cell($myrow["Total"]); end_row(); } end_table(); } echo ""; end_table(1); // outer table //_vd($purchase_order); display_allocations_to(PT_SUPPLIER, $purchase_order->supplier_id, ST_PURCHORDER, $purchase_order->order_no, $total + $tax_total); //---------------------------------------------------------------------------------------------------- end_page(true, false, false, ST_PURCHORDER, $_GET['trans_no']);