+//----------------------------------------------------------------------------------------
+
+start_form();
+
+ start_outer_table(TABLESTYLE2, "width='60%'", 5);
+
+ table_section(1);
+
+ supplier_list_row(_("Payment To:"), 'supplier_id', null, false, true);
+
+ if (list_updated('supplier_id')) {
+ $_POST['amount'] = price_format(0);
+ $_SESSION['alloc']->person_id = get_post('supplier_id');
+ $Ajax->activate('amount');
+ } elseif (list_updated('bank_account'))
+ $Ajax->activate('alloc_tbl');
+
+ if (list_updated('supplier_id') || list_updated('bank_account')) {
+ $_SESSION['alloc']->read();
+ $_POST['memo_'] = $_POST['amount'] = '';
+ $Ajax->activate('alloc_tbl');
+ }
+
+ set_global_supplier($_POST['supplier_id']);
+
+ if (!list_updated('bank_account') && !get_post('__ex_rate_changed'))
+ {
+ $_POST['bank_account'] = get_default_supplier_payment_bank_account($_POST['supplier_id'], $_POST['DatePaid']);
+ } else
+ {
+ $_POST['amount'] = price_format(0);
+ }
+
+ bank_accounts_list_row(_("From Bank Account:"), 'bank_account', null, true);
+
+ bank_balance_row($_POST['bank_account']);
+
+ table_section(2);
+
+ date_row(_("Date Paid") . ":", 'DatePaid', '', true, 0, 0, 0, null, true);
+
+ ref_row(_("Reference:"), 'ref', '', $Refs->get_next(ST_SUPPAYMENT, null,
+ array('supplier'=>get_post('supplier_id'), 'date'=>get_post('DatePaid'))), false, ST_SUPPAYMENT);
+
+
+ table_section(3);
+
+ $comp_currency = get_company_currency();
+ $supplier_currency = $_SESSION['alloc']->set_person($_POST['supplier_id'], PT_SUPPLIER);
+ if (!$supplier_currency)
+ $supplier_currency = $comp_currency;
+ $_SESSION['alloc']->currency = $bank_currency = get_bank_account_currency($_POST['bank_account']);
+
+ if ($bank_currency != $supplier_currency)
+ {
+ amount_row(_("Bank Amount:"), 'bank_amount', null, '', $bank_currency);
+ }
+
+ amount_row(_("Bank Charge:"), 'charge', null, '', $bank_currency);
+
+ $row = get_supplier($_POST['supplier_id']);
+ $_POST['dimension_id'] = @$row['dimension_id'];
+ $_POST['dimension2_id'] = @$row['dimension2_id'];
+ $dim = get_company_pref('use_dimension');
+ if ($dim > 0)
+ dimensions_list_row(_("Dimension").":", 'dimension_id',
+ null, true, ' ', false, 1, false);
+ else
+ hidden('dimension_id', 0);
+ if ($dim > 1)
+ dimensions_list_row(_("Dimension")." 2:", 'dimension2_id',
+ null, true, ' ', false, 2, false);
+ else
+ hidden('dimension2_id', 0);
+
+ end_outer_table(1);
+
+ div_start('alloc_tbl');
+ show_allocatable(false);
+ div_end();
+
+ start_table(TABLESTYLE, "width='60%'");
+ amount_row(_("Amount of Discount:"), 'discount', null, '', $supplier_currency);
+ amount_row(_("Amount of Payment:"), 'amount', null, '', $supplier_currency);
+ textarea_row(_("Memo:"), 'memo_', null, 22, 4);
+ end_table(1);
+
+ submit_center('ProcessSuppPayment',_("Enter Payment"), true, '', 'default');
+
+end_form();