function edit_allocations_for_transaction($type, $trans_no)
{
global $systypes_array;
$cart = $_SESSION['alloc'];
display_heading(sprintf(_("Allocation of %s # %d"), $systypes_array[$cart->type], $cart->trans_no));
display_heading($cart->person_name);
display_heading2(_("Date:") . " <b>" . $cart->date_ . "</b>");
display_heading2(_("Total:") . " <b>" . price_format($cart->bank_amount) . ' ' . $cart->currency . "</b>");
if ($cart->currency != $cart->person_curr) {
$total = _("Total in clearing currency:") . " <b>" . price_format($cart->amount) . "</b>" . sprintf(" %s (%s %s/%s)", $cart->person_curr, exrate_format($cart->bank_amount / $cart->amount), $cart->currency, $cart->person_curr);
display_heading2($total);
}
echo "<br>";
start_form();
div_start('alloc_tbl');
if (count($cart->allocs) > 0) {
show_allocatable(true);
submit_center_first('UpdateDisplay', _("Refresh"), _('Start again allocation of selected amount'), true);
submit('Process', _("Process"), true, _('Process allocations'), 'default');
submit_center_last('Cancel', _("Back to Allocations"), _('Abandon allocations and return to selection of allocatable amounts'), 'cancel');
} else {
display_note(_("There are no unsettled transactions to allocate."), 0, 1);
submit_center('Cancel', _("Back to Allocations"), true, _('Abandon allocations and return to selection of allocatable amounts'), 'cancel');
}
div_end();
end_form();
}
function display_grn_items_for_selection()
{
global $table_style;
$result = get_grn_items(0, $_SESSION['supp_trans']->supplier_id, true);
if (db_num_rows($result) == 0) {
display_note(tr("There are no outstanding items received from this supplier that have not been invoiced by them."), 0, 1);
end_page();
exit;
}
/*Set up a table to show the outstanding GRN items for selection */
start_form(false, true);
display_heading2(tr("Items Received Yet to be Invoiced"));
start_table("{$table_style} colspan=7 width=95%");
$th = array(tr("Delivery"), tr("Sequence #"), tr("P.O."), tr("Item"), tr("Description"), tr("Received On"), tr("Quantity Received"), tr("Quantity Invoiced"), tr("Uninvoiced Quantity"), tr("Order Price"), tr("Total"));
table_header($th);
$i = $k = 0;
while ($myrow = db_fetch($result)) {
$grn_already_on_invoice = False;
foreach ($_SESSION['supp_trans']->grn_items as $entered_grn) {
if ($entered_grn->id == $myrow["id"]) {
$grn_already_on_invoice = True;
}
}
if ($grn_already_on_invoice == False) {
alt_table_row_color($k);
label_cell(get_trans_view_str(25, $myrow["grn_batch_id"]));
//text_cells(null, 'grn_item_id', $myrow["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(round($myrow["unit_price"] * ($myrow["qty_recd"] - $myrow["quantity_inv"]), user_price_dec()));
end_row();
$i++;
if ($i > 15) {
$i = 0;
table_header($th);
}
}
}
end_table();
}
function edit_allocations_for_transaction($type, $trans_no)
{
global $systypes_array;
start_form();
display_heading(_("Allocation of") . " " . $systypes_array[$_SESSION['alloc']->type] . " # " . $_SESSION['alloc']->trans_no);
display_heading($_SESSION['alloc']->person_name);
display_heading2(_("Date:") . " <b>" . $_SESSION['alloc']->date_ . "</b>");
display_heading2(_("Total:") . " <b>" . price_format(-$_SESSION['alloc']->amount) . "</b>");
echo "<br>";
div_start('alloc_tbl');
if (count($_SESSION['alloc']->allocs) > 0) {
show_allocatable(true);
submit_center_first('UpdateDisplay', _("Refresh"), _('Start again allocation of selected amount'), true);
submit('Process', _("Process"), true, _('Process allocations'), 'default');
submit_center_last('Cancel', _("Back to Allocations"), _('Abandon allocations and return to selection of allocatable amounts'), 'cancel');
} else {
display_note(_("There are no unsettled transactions to allocate."), 0, 1);
submit_center('Cancel', _("Back to Allocations"), true, _('Abandon allocations and return to selection of allocatable amounts'), 'cancel');
}
div_end();
end_form();
}
}
label_cells(_("Deposit Type"), $bank_transfer_types[$to_trans['account_type']], "class='tableheader2'");
end_row();
start_row();
label_cells(_("Reference"), $to_trans['ref'], "class='tableheader2'", "colspan={$colspan2}");
end_row();
comments_display_row(ST_BANKDEPOSIT, $trans_no);
end_table(1);
is_voided_display(ST_BANKDEPOSIT, $trans_no, _("This deposit has been voided."));
$items = get_gl_trans(ST_BANKDEPOSIT, $trans_no);
if (db_num_rows($items) == 0) {
display_note(_("There are no items for this deposit."));
} else {
display_heading2(_("Items for this Deposit"));
if ($show_currencies) {
display_heading2(_("Item Amounts are Shown in:") . " " . $company_currency);
}
start_table(TABLESTYLE, "width=80%");
$dim = get_company_pref('use_dimension');
if ($dim == 2) {
$th = array(_("Account Code"), _("Account Description"), _("Dimension") . " 1", _("Dimension") . " 2", _("Amount"), _("Memo"));
} else {
if ($dim == 1) {
$th = array(_("Account Code"), _("Account Description"), _("Dimension"), _("Amount"), _("Memo"));
} else {
$th = array(_("Account Code"), _("Account Description"), _("Amount"), _("Memo"));
}
}
table_header($th);
$k = 0;
//row colour counter
}
echo "<center>";
// display the WO requirements
br(1);
if ($myrow["released"] == false) {
display_heading2(_("BOM for item:") . " " . $myrow["StockItemName"]);
display_bom($myrow["stock_id"]);
} else {
display_heading2(_("Work Order Requirements"));
display_wo_requirements($woid, $myrow["units_reqd"]);
if ($myrow["type"] == WO_ADVANCED) {
echo "<br><table cellspacing=7><tr valign=top><td>";
display_heading2(_("Issues"));
display_wo_issues($woid);
echo "</td><td>";
display_heading2(_("Productions"));
display_wo_productions($woid);
echo "</td><td>";
display_heading2(_("Additional Costs"));
display_wo_payments($woid);
echo "</td></tr></table>";
} else {
echo "<br><table cellspacing=7><tr valign=top><td>";
display_heading2(_("Additional Costs"));
display_wo_payments($woid);
echo "</td></tr></table>";
}
}
echo "<br></center>";
is_voided_display(ST_WORKORDER, $woid, _("This work order has been voided."));
end_page(true, false, false, ST_WORKORDER, $woid);
label_cell($credits_row["reference"]);
label_cell(sql2date($credits_row["tran_date"]));
amount_cell(-$this_total);
end_row();
}
}
label_row(null, "<font color=red>" . price_format(-$credits_total) . "</font>", " ", "colspan=4 align=right");
end_table();
echo "</td></tr>";
end_table();
}
echo "<center>";
if ($_SESSION['View']->so_type == 1) {
display_note(_("This Sales Order is used as a Template."), 0, 0, "class='currentfg'");
}
display_heading2(_("Line Details"));
start_table(TABLESTYLE, "colspan=9 width=95%");
$th = array(_("Item Code"), _("Item Description"), _("Quantity"), _("Unit"), _("Price"), _("Discount"), _("Total"), _("Quantity Delivered"));
table_header($th);
$k = 0;
//row colour counter
foreach ($_SESSION['View']->line_items as $stock_item) {
$line_total = round2($stock_item->quantity * $stock_item->price * (1 - $stock_item->discount_percent), user_price_dec());
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_cell($stock_item->price);
amount_cell($stock_item->discount_percent * 100);
function edit_allocations_for_transaction($type, $trans_no)
{
global $table_style;
start_form(false, true);
display_heading(sprintf(tr("Allocation of %s # %d"), systypes::name($_SESSION['alloc']->type), $_SESSION['alloc']->trans_no));
display_heading($_SESSION['alloc']->person_name);
display_heading2(tr("Date:") . " <b>" . $_SESSION['alloc']->date_ . "</b>");
display_heading2(tr("Total:") . " <b>" . price_format($_SESSION['alloc']->amount) . "</b>");
echo "<br>";
if (count($_SESSION['alloc']->allocs) > 0) {
start_table($table_style);
$th = array(tr("Transaction Type"), tr("#"), tr("Date"), tr("Due Date"), tr("Amount"), tr("Other Allocations"), tr("This Allocation"), tr("Left to Allocate"), "", "");
table_header($th);
$k = $counter = $total_allocated = 0;
foreach ($_SESSION['alloc']->allocs as $allocn_item) {
alt_table_row_color($k);
label_cell(systypes::name($allocn_item->type));
label_cell(get_trans_view_str($allocn_item->type, $allocn_item->type_no));
label_cell($allocn_item->date_, "align=right");
label_cell($allocn_item->due_date, "align=right");
amount_cell($allocn_item->amount);
amount_cell($allocn_item->amount_allocated);
if (!check_num('amount' . $counter)) {
$_POST['amount' . $counter] = price_format($allocn_item->current_allocated);
}
amount_cells(null, 'amount' . $counter, $_POST['amount' . $counter]);
$un_allocated = round($allocn_item->amount - $allocn_item->amount_allocated, 6);
hidden("un_allocated" . $counter, $un_allocated);
amount_cell($un_allocated);
label_cell("<a href='#' name=Alloc{$counter} onclick='allocate_all(this.name.substr(5));return true;'>" . tr("All") . "</a>");
label_cell("<a href='#' name=DeAll{$counter} onclick='allocate_none(this.name.substr(5));return true;'>" . tr("None") . "</a>");
end_row();
$total_allocated += input_num('amount' . $counter);
$counter++;
}
label_row(tr("Total Allocated"), price_format($total_allocated), "colspan=6 align=right", "nowrap align=right id='total_allocated'");
if ($_SESSION['alloc']->amount - $total_allocated < 0) {
$font1 = "<font color=red>";
$font2 = "</font>";
} else {
$font1 = $font2 = "";
}
$left_to_allocate = $_SESSION['alloc']->amount - $total_allocated;
$left_to_allocate = price_format($left_to_allocate);
label_row(tr("Left to Allocate"), $font1 . $left_to_allocate . $font2, "colspan=6 align=right ", "nowrap align=right id='left_to_allocate'");
end_table(1);
hidden('TotalNumberOfAllocs', $counter);
// hidden('left_to_allocate', $left_to_allocate);
submit_center_first('UpdateDisplay', tr("Update"));
submit('Process', tr("Process"));
} else {
display_note(tr("There are no unsettled transactions to allocate."), 0, 1);
}
submit_center_last('Cancel', tr("Back to Allocations"));
end_form();
}
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 "</td><td valign=top>";
// 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 "</td></tr>";
end_table(1);
// outer table
$myrow = get_work_order($woid);
if ($myrow["type"] == wo_types::advanced()) {
display_wo_details($woid, true);
} else {
display_wo_details_quick($woid, true);
}
echo "<center>";
// display the WO requirements
echo "<br>";
if ($myrow["released"] == false) {
display_heading2(tr("BOM for item:") . " " . $myrow["StockItemName"]);
display_bom($myrow["stock_id"]);
} else {
display_heading2(tr("Work Order Requirements"));
display_wo_requirements($woid, $myrow["units_reqd"]);
if ($myrow["type"] == wo_types::advanced()) {
echo "<br><table cellspacing=7><tr valign=top><td>";
display_heading2(tr("Issues"));
display_wo_issues($woid);
echo "</td><td>";
display_heading2(tr("Productions"));
display_wo_productions($woid);
echo "</td><td>";
display_heading2(tr("Payments"));
display_wo_payments($woid);
echo "</td></tr></table>";
}
}
echo "<br>";
is_voided_display(systypes::work_order(), $woid, tr("This work order has been voided."));
end_page(true);
$k = 0;
//row colour counter
$total_cost = 0;
while ($myrow = db_fetch($result)) {
alt_table_row_color($k);
label_cell($myrow["stock_id"] . " - " . $myrow["description"]);
qty_cell($myrow["qty_issued"], false, get_qty_dec($myrow["stock_id"]));
label_cell($myrow["units"]);
end_row();
$j++;
if ($j == 12) {
$j = 1;
table_header($th);
}
//end of page full new headings if
}
//end of while
end_table();
}
}
//-------------------------------------------------------------------------------------------------
display_heading($systypes_array[ST_MANUISSUE] . " # " . $wo_issue_no);
display_wo_issue($wo_issue_no);
display_heading2(_("Items for this Issue"));
display_wo_issue_details($wo_issue_no);
//-------------------------------------------------------------------------------------------------
echo "<br>";
end_page(true, false, false, ST_MANUISSUE, $wo_issue_no);
?>
clear_fields();
}
//------------------------------------------------------------------------------------------------
display_heading($_SESSION['supp_trans']->supplier_name);
display_gl_items($_SESSION['supp_trans'], 1);
echo "<br>";
if ($_SESSION['supp_trans']->is_invoice == true) {
hyperlink_no_params("{$path_to_root}/purchasing/supplier_invoice.php", tr("Back to Invoice Entry"));
} else {
hyperlink_no_params("{$path_to_root}/purchasing/supplier_credit.php", tr("Back to Credit Note Entry"));
}
echo "<hr>";
//------------------------------------------------------------------------------------------------
/*Set up a form to allow input of new GL entries */
start_form(false, true);
display_heading2(tr("Enter a GL Line"));
start_table($table_style2);
$accs = get_supplier_accounts($_SESSION['supp_trans']->supplier_id);
$_POST['AcctSelection'] = $accs['purchase_account'];
gl_all_accounts_list_row(tr("GL Account Selection:"), 'AcctSelection', $_POST['AcctSelection']);
$dim = get_company_pref('use_dimension');
if ($dim >= 1) {
dimensions_list_row(tr("Dimension") . " 1", 'dimension_id', null, true, " ", false, 1);
}
if ($dim > 1) {
dimensions_list_row(tr("Dimension") . " 2", 'dimension2_id', null, true, " ", false, 2);
}
if ($dim < 1) {
hidden('dimension_id', 0);
}
if ($dim < 2) {
amount_cell($myrow["unit_price"]);
amount_cell(round($myrow["unit_price"] * $myrow["quantity_inv"], user_price_dec()));
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 "<br>";
display_heading2(tr("Delivery Item Selected For Adding To A Supplier Credit Note"));
start_table("{$table_style} width=80%");
$th = array(tr("Sequence #"), tr("Item"), tr("Qty Already Invoiced"), tr("Quantity to Credit"), tr("Order Price"), tr("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"]);
qty_cells(null, 'This_QuantityCredited', qty_format(max($myrow['quantity_inv'], 0)));
amount_cell($myrow['unit_price']);
amount_cells(null, 'ChgPrice', price_format($myrow['unit_price']));
end_row();
end_table(1);
submit_center('AddGRNToTrans', tr("Add to Credit Note"));
hidden('GRNNumber', $_POST['grn_item_id']);
hidden('item_code', $myrow['item_code']);
