function slct($err = "")
{
db_connect();
$sql = "SELECT * FROM customers WHERE div = '" . USER_DIV . "' AND location = 'int' ORDER BY cusnum ASC";
$cusRslt = db_exec($sql) or errDie("Could not retrieve Customers Information from the Database.", SELF);
$custs = "<select name='cusnum'>";
if (pg_numrows($cusRslt) < 1) {
$custs .= "<option value='-S'></option>";
}
while ($cus = pg_fetch_array($cusRslt)) {
$custs .= "<option value='{$cus['cusnum']}'>{$cus['cusname']} {$cus['surname']}</option>";
}
$custs .= "</select>";
$details = "\n\t\t<center>\n\t\t<h3>New International Non-Stock Invoice</h3>\n\t\t<h4>Customer Details</h4>\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t<input type='hidden' name='key' value='slct'>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t<tr>\n\t\t\t\t<td colspan='2'>{$err}</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<th colspan='2'> Invoice Details </th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "' " . ass("Select when selling non stock goods to your customers") . ">\n\t\t\t\t<td>Select Customer</td>\n\t\t\t\t<td>{$custs}</td>\n\t\t\t</tr>\n\t\t\t<tr><td><br></td></tr>\n\t\t\t<tr>\n\t\t\t\t<td align='center'><input type='button' value='« Back' onClick='javascript:history.back()'></td>\n\t\t\t\t<td align='center'><input type='submit' value='Continue »'></td>\n\t\t\t</tr>\n\t\t</table>";
return $details;
}
function details($_POST, $error = "")
{
# Get vars
extract($_POST);
# validate input
require_lib("validate");
$v = new validate();
if (isset($invid)) {
$v->isOk($invid, "num", 1, 20, "Invalid invoice number.");
} else {
$v->isOk($deptid, "num", 1, 20, "Invalid department number.");
$v->isOk($letters, "string", 0, 5, "Invalid First 3 Letters.");
}
# display errors, if any
if ($v->isError()) {
$errors = $v->getErrors();
foreach ($errors as $e) {
$error .= "<li class='err'>" . $e["msg"] . "</li>";
}
$confirm .= "{$error}<p><input type='button' onClick='JavaScript:history.back();' value='« Correct submission'>";
return $confirm;
}
if (isset($deptid)) {
db_connect();
# Query server for customer info
$sql = "SELECT cusnum,cusname,surname FROM customers WHERE deptid = '{$deptid}' AND location = 'int' AND lower(surname) LIKE lower('{$letters}%') AND blocked != 'yes' AND div = '" . USER_DIV . "' ORDER BY surname";
$custRslt = db_exec($sql) or errDie("Unable to view customers");
if (pg_numrows($custRslt) < 1) {
$err = "<li class='err'>No customer names starting with <b>{$letters}</b> in database.</li>";
return view_err($_POST, $err);
}
}
if (!isset($invid)) {
$invid = create_dummy($deptid);
$stkerr = "0,0";
}
if (!isset($done)) {
$done = "";
}
# Get invoice info
db_connect();
$sql = "SELECT * FROM invoices WHERE invid = '{$invid}' AND div = '" . USER_DIV . "'";
$invRslt = db_exec($sql) or errDie("Unable to get invoice information");
if (pg_numrows($invRslt) < 1) {
return "<li class='err'>Invoice Not Found</li>";
}
$inv = pg_fetch_array($invRslt);
# Check if invoice has been printed
if ($inv['printed'] == "y") {
$error = "<li class='err'> Error : Invoice number <b>{$invid}</b> has already been printed.</li>";
$error .= "<p><input type='button' onClick='JavaScript:history.back();' value='« Correct submission'>";
return $error;
}
$currs = getSymbol($inv['fcid']);
# Get department
db_conn("exten");
$sql = "SELECT * FROM departments WHERE deptid = '{$inv['deptid']}' AND div = '" . USER_DIV . "'";
$deptRslt = db_exec($sql);
if (pg_numrows($deptRslt) < 1) {
$dept['deptname'] = "<li class='err'>Department not Found.</li>";
} else {
$dept = pg_fetch_array($deptRslt);
}
# Get selected Customer info
db_connect();
$sql = "SELECT * FROM customers WHERE cusnum = '{$inv['cusnum']}' AND location = 'int' AND div = '" . USER_DIV . "'";
$custRslt = db_exec($sql) or errDie("Unable to view customer");
if (pg_numrows($custRslt) < 1) {
db_connect();
# Query server for customer info
$sql = "SELECT cusnum,cusname,surname FROM customers WHERE deptid = '{$inv['deptid']}' AND location = 'int' AND lower(surname) LIKE lower('{$letters}%') AND blocked != 'yes' AND div = '" . USER_DIV . "' ORDER BY surname";
$custRslt = db_exec($sql) or errDie("Unable to view customers");
if (pg_numrows($custRslt) < 1) {
$err = "<li class='err'>No customer names starting with <b>{$letters}</b> in database.</li>";
return view_err($_POST, $err);
} else {
$customers = "<select name='cusnum' onChange='javascript:document.form.submit();'>";
$customers .= "<option value='-S' selected>Select Customer</option>";
while ($cust = pg_fetch_array($custRslt)) {
$customers .= "<option value='{$cust['cusnum']}'>{$cust['cusname']} {$cust['surname']}</option>";
}
$customers .= "</select>";
}
# Take care of the unset vars
$cust['addr1'] = "";
$cust['cusnum'] = "";
$cust['vatnum'] = "";
$cust['accno'] = "";
} else {
$cust = pg_fetch_array($custRslt);
$sql = "SELECT cusnum, cusname, surname FROM customers WHERE deptid = '{$inv['deptid']}' AND location = 'int' AND lower(surname) LIKE lower('{$letters}%') AND blocked != 'yes' AND div = '" . USER_DIV . "' ORDER BY surname";
$cusRslt = db_exec($sql) or errDie("Unable to view customers");
# Moarn if customer account has been blocked
if ($cust['blocked'] == 'yes') {
$error .= "<li class='err'>Error : Selected customer account has been blocked.";
}
// $customers = "<input type=hidden name=cusnum value='$cust[cusnum]'>$cust[cusname] $cust[surname]";
$cusnum = $cust['cusnum'];
$customers = "<select name='cusnum' onChange='javascript:document.form.submit();'>";
// $customers .= "<option value='-S' selected>Select Customer</option>";
while ($cus = pg_fetch_array($cusRslt)) {
$sel = "";
if ($cust['cusnum'] == $cus['cusnum']) {
$sel = "selected";
}
$customers .= "<option value='{$cus['cusnum']}' {$sel}>{$cus['cusname']} {$cus['surname']}</option>";
}
$customers .= "</select>";
}
/* --- Start Drop Downs --- */
# Select warehouse
db_conn("exten");
$whs = "<select name='whidss[]' onChange='javascript:document.form.submit();'>";
$sql = "SELECT * FROM warehouses WHERE div = '" . USER_DIV . "' ORDER BY whname ASC";
$whRslt = db_exec($sql);
if (pg_numrows($whRslt) < 1) {
return "<li class='err'> There are no Stores found in Cubit.</li>";
} else {
$whs .= "<option value='-S' disabled selected>Select Store</option>";
while ($wh = pg_fetch_array($whRslt)) {
$whs .= "<option value='{$wh['whid']}'>({$wh['whno']}) {$wh['whname']}</option>";
}
}
$whs .= "</select>";
# Get sales people
db_conn("exten");
$sql = "SELECT * FROM salespeople WHERE div = '" . USER_DIV . "' ORDER BY salesp ASC";
$salespRslt = db_exec($sql) or errDie("Unable to get sales people.");
if (pg_numrows($salespRslt) < 1) {
return "<li class='err'> There are no Sales People found in Cubit.</li>";
} else {
$salesps = "<select name='salespn'>";
while ($salesp = pg_fetch_array($salespRslt)) {
if ($salesp['salesp'] == $inv['salespn']) {
$sel = "selected";
} else {
$sel = "";
}
$salesps .= "<option value='{$salesp['salesp']}' {$sel}>{$salesp['salesp']}</option>";
}
$salesps .= "</select>";
}
# Days drop downs
$days = array("0" => "0", "7" => "7", "14" => "14", "30" => "30", "60" => "60", "90" => "90", "120" => "120");
$termssel = extlib_cpsel("terms", $days, $inv['terms']);
# Keep the charge vat option stable
if ($inv['chrgvat'] == "inc") {
$chin = "checked=yes";
$chex = "";
$chno = "";
} elseif ($inv['chrgvat'] == "exc") {
$chin = "";
$chex = "checked=yes";
$chno = "";
} else {
$chin = "";
$chex = "";
$chno = "checked=yes";
}
# Format date
list($o_year, $o_month, $o_day) = explode("-", $inv['odate']);
/* --- End Drop Downs --- */
/* --- Start Products Display --- */
# Select all products
$products = "\n\t\t<table " . TMPL_tblDflts . " width='100%'>\n\t\t\t<tr>\n\t\t\t\t<th>STORE</th>\n\t\t\t\t<th>ITEM NUMBER</th>\n\t\t\t\t<th>VAT CODE</th>\n\t\t\t\t<th>SERIAL NO.</th>\n\t\t\t\t<th>DESCRIPTION</th>\n\t\t\t\t<th>QTY</th>\n\t\t\t\t<th colspan='2'>UNIT PRICE</th>\n\t\t\t\t<th>UNIT DISCOUNT</th>\n\t\t\t\t<th>AMOUNT</th>\n\t\t\t\t<th>Remove</th>\n\t\t\t<tr>";
# get selected stock in this invoice
db_connect();
$sql = "SELECT * FROM inv_items WHERE invid = '{$invid}' AND div = '" . USER_DIV . "'";
$stkdRslt = db_exec($sql);
$i = 0;
$key = 0;
while ($stkd = pg_fetch_array($stkdRslt)) {
# Keep track of selected stock amounts
$amts[$i] = $stkd['amt'];
$i++;
# Get warehouse name
db_conn("exten");
$sql = "SELECT whname FROM warehouses WHERE whid = '{$stkd['whid']}' AND div = '" . USER_DIV . "'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
# Get selected stock in this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE stkid = '{$stkd['stkid']}' AND div = '" . USER_DIV . "'";
$stkRslt = db_exec($sql);
$stk = pg_fetch_array($stkRslt);
# Serial number
if ($stk['serd'] == 'yes' && $inv['serd'] == 'n') {
$sers = ext_getavserials($stkd['stkid']);
$sernos = "<select class='width : 15' name='sernos[]'>";
foreach ($sers as $skey => $ser) {
$sernos .= "<option value='{$ser['serno']}'>{$ser['serno']}</option>";
}
$sernos .= "</select>";
} else {
$sernos = "<input type='hidden' name='sernos[]' value='{$stkd['serno']}'>{$stkd['serno']}";
}
# Input qty if not serialised
$qtyin = "<input type='text' size='3' name='qtys[]' value='{$stkd['qty']}'>";
if ($stk['serd'] == 'yes') {
$qtyin = "<input type='hidden' size='3' name='qtys[]' value='{$stkd['qty']}'>{$stkd['qty']}";
}
# check permissions
if (perm("invoice-unitcost-edit.php")) {
$viewcost = "<input type='text' size='8' name='unitcost[]' value='{$stkd['funitcost']}'>";
$cunitcost = "<input type='text' size='8' name='cunitcost[]' value='{$stkd['unitcost']}'>";
} else {
$viewcost = "<input type='hidden' size='8' name='unitcost[]' value='{$stkd['funitcost']}'>{$stkd['funitcost']}";
$cunitcost = "<input type='hidden' size='8' name='cunitcost[]' value='{$stkd['unitcost']}'>{$stkd['unitcost']}";
}
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t<select name='vatcodes[]'>\n\t\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($stkd['vatcode'] == $vd['id']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
# Put in product
$products .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td><input type='hidden' name='whids[]' value='{$stkd['whid']}'>{$wh['whname']}</td>\n\t\t\t\t<td><input type='hidden' name='stkids[]' value='{$stkd['stkid']}'><a href='#bottom' onclick='openwindow(\"stock-amt-det.php?stkid={$stk['stkid']}\")'>{$stk['stkcod']}</a></td>\n\t\t\t\t<td>{$Vatcodes}</td>\n\t\t\t\t<td>{$sernos}</td>\n\t\t\t\t<td>" . extlib_rstr($stk['stkdes'], 30) . "</td>\n\t\t\t\t<td>{$qtyin}</td>\n\t\t\t\t<td>" . CUR . " {$viewcost}</td>\n\t\t\t\t<td>{$inv['currency']} {$cunitcost}</td>\n\t\t\t\t<td>{$inv['currency']}<input type='text' size='4' name='disc[]' value='{$stkd['disc']}'> OR <input type='text' size='4' name='discp[]' value='{$stkd['discp']}' maxlength='5'>%</td>\n\t\t\t\t<td><input type='hidden' name='amt[]' value='{$stkd['amt']}'> {$inv['currency']} {$stkd['amt']}</td>\n\t\t\t\t<td><input type='checkbox' name='remprod[]' value='{$key}'><input type='hidden' name='SCROLL' value='yes'></td>\n\t\t\t</tr>";
$key++;
}
# Look above(remprod keys)
$keyy = $key;
# Look above(if i = 0 then there are no products)
if ($i == 0) {
$done = "";
} else {
$SCROLL = "yes";
}
# check if stock warehouse was selected
if (isset($whidss)) {
foreach ($whidss as $key => $whid) {
if (isset($stkidss[$key]) && $stkidss[$key] != "-S" && isset($cust['pricelist'])) {
# skip if not selected
if ($whid == "-S") {
continue;
}
# Get selected warehouse name
db_conn("exten");
$sql = "SELECT whname FROM warehouses WHERE whid = '{$whid}' AND div = '" . USER_DIV . "'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
# Get selected stock in this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE stkid = '{$stkidss[$key]}' AND div = '" . USER_DIV . "' ORDER BY stkcod ASC";
$stkRslt = db_exec($sql);
$stk = pg_fetch_array($stkRslt);
if ($stk['serd'] == 'yes') {
$sers = ext_getavserials($stkidss[$key]);
$sernos = "<select class='width : 15'name='sernos[]' onChange='javascript:document.form.submit();'>";
foreach ($sers as $skey => $ser) {
$sernos .= "<option value='{$ser['serno']}'>{$ser['serno']}</option>";
}
$sernos .= "</select>";
} else {
$sernos = "<input type='hidden' name='sernos[]' value=''>";
}
# Get price from price list if it is set
if (isset($cust['pricelist'])) {
# get selected stock in this warehouse
db_conn("exten");
$sql = "SELECT price FROM plist_prices WHERE listid = '{$cust['pricelist']}' AND stkid = '{$stk['stkid']}' AND div = '" . USER_DIV . "'";
$plRslt = db_exec($sql);
if (pg_numrows($plRslt) > 0) {
$pl = pg_fetch_array($plRslt);
$stk['selamt'] = $pl['price'];
}
}
/* -- Start Some Checks -- */
# check if they are selling too much
if ($stk['units'] - $stk['alloc'] < $qtyss[$key]) {
if (!in_array($stk['stkid'], explode(",", $stkerr))) {
if ($stk['type'] != 'lab') {
$stkerr .= ",{$stk['stkid']}";
$error .= "<li class='err'>Warning : Item number <b>{$stk['stkcod']}</b> does not have enough items available.</li>";
}
}
}
/* -- End Some Checks -- */
# Calculate the Discount discount
if ($discs[$key] < 1) {
if ($discps[$key] > 0) {
$discs[$key] = round($discps[$key] / 100 * $stk['selamt'], 2);
}
} else {
$discps[$key] = round($discs[$key] * 100 / $stk['selamt'], 2);
}
# Calculate amount
$amt[$key] = $qtyss[$key] * ($stk['selamt'] - $discs[$key]);
$stk['cselamt'] = sprint($stk['selamt'] / $inv['xrate']);
# Input qty if not serialised
$qtyin = "<input type='text' size='3' name='qtys[]' value='{$qtyss[$key]}'>";
if ($stk['serd'] == 'yes') {
$qtyin = "<input type='hidden' size='3' name='qtys[]' value='{$qtyss[$key]}'>{$qtyss[$key]}";
}
// $stk['cselamt'] = sprint ($stk['cselamt']);
$stk['selamt'] = sprint($stk['selamt']);
# Check permissions
if (perm("invoice-unitcost-edit.php")) {
$viewcost = "<input type='text' size='8' name='unitcost[]' value='{$stk['selamt']}'>";
$cunitcost = "<input type='text' size='8' name='cunitcost[]' value='{$stk['cselamt']}'>";
} else {
$viewcost = "<input type='hidden' size='8' name='unitcost[]' value='{$stk['selamt']}'>{$stk['selamt']}";
$cunitcost = "<input type='hidden' size='8' name='cunitcost[]' value='{$stk['cselamt']}'>{$stk['cselamt']}";
}
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t\t\t<select name='vatcodes[]'>\n\t\t\t\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($stk['vatcode'] == $vd['id']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
$amt[$key] = sprint($amt[$key]);
# Put in selected warehouse and stock
$products .= "\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td><input type='hidden' name='whids[]' value='{$whid}'>{$wh['whname']}</td>\n\t\t\t\t\t\t<td><input type='hidden' name='stkids[]' value='{$stk['stkid']}'><a href='#bottom' onclick='openwindow(\"stock-amt-det.php?stkid={$stk['stkid']}\")'>{$stk['stkcod']}</a></td>\n\t\t\t\t\t\t<td>{$Vatcodes}</td>\n\t\t\t\t\t\t<td>{$sernos}</td>\n\t\t\t\t\t\t<td>" . extlib_rstr($stk['stkdes'], 30) . "</td>\n\t\t\t\t\t\t<td>{$qtyin}</td>\n\t\t\t\t\t\t<td>" . CUR . " {$viewcost}</td>\n\t\t\t\t\t\t<td>{$inv['currency']} {$cunitcost}</td>\n\t\t\t\t\t\t<td>{$inv['currency']} <input type='text' size='4' name='disc[]' value='{$discs[$key]}'> OR <input type='text' size='4' name='discp[]' value='{$discps[$key]}' maxlength='5'>%</td>\n\t\t\t\t\t\t<td><input type='hidden' name='amt[]' value='{$amt[$key]}'> {$inv['currency']} {$amt[$key]}</td>\n\t\t\t\t\t\t<td><input type='checkbox' name='remprod[]' value='{$keyy}'></td>\n\t\t\t\t\t</tr>";
$keyy++;
} else {
if (!isset($diffwhBtn)) {
# skip if not selected
if ($whid == "-S") {
continue;
}
# get warehouse name
db_conn("exten");
$sql = "SELECT whname FROM warehouses WHERE whid = '{$whid}' AND div = '" . USER_DIV . "'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
if (isset($ria) && $ria != "") {
$len = strlen($ria);
$Wh = "AND lower(substr(stkcod,1,'{$len}'))=lower('{$ria}')";
} else {
$Wh = "";
$ria = "";
}
# get stock on this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE whid = '{$whid}' AND blocked = 'n' AND div = '" . USER_DIV . "' {$Wh} ORDER BY stkcod ASC";
$stkRslt = db_exec($sql) or errDie("Unable to retrieve stocks from database.");
if (pg_numrows($stkRslt) < 1) {
$error .= "<li class='err'>There are no stock items in the selected warehouse.";
continue;
}
if (pg_numrows($stkRslt) == 1) {
$ex = "selected";
} else {
$ex = "";
}
$stks = "<select class='width : 15'name='stkidss[]' onChange='javascript:document.form.submit();'>";
$stks .= "<option value='-S' disabled selected>Select Number</option>";
$count = 0;
while ($stk = pg_fetch_array($stkRslt)) {
$stks .= "<option value='{$stk['stkid']}'>{$stk['stkcod']} (" . sprint3($stk['units'] - $stk['alloc']) . ")</option>";
}
$stks .= "</select> ";
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t\t\t\t<select name='vatcodess[]'>\n\t\t\t\t\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($vd['del'] == "Yes") {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
# put in drop down and warehouse
$products .= "\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td><input type='hidden' name='whidss[]' value='{$whid}'>{$wh['whname']}</td>\n\t\t\t\t\t\t\t<td>{$stks}</td>\n\t\t\t\t\t\t\t<td><input type='hidden' name='vatcodess' value='0'></td>\n\t\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t\t<td><input type='hidden' size='3' name='qtyss[]' value='1'>1</td>\n\t\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t\t<td>{$inv['currency']} <input type='text' size='4' name='discs[]' value='0'> OR <input type='text' size='4' name='discps[]' value='0' maxlength='5'>%</td>\n\t\t\t\t\t\t\t<td><input type='hidden' name='amts[]' value='0.00'>{$inv['currency']} 0.00</td>\n\t\t\t\t\t\t\t<td></td>\n\t\t\t\t\t\t</tr>";
}
}
}
} else {
if (!isset($diffwhBtn)) {
# check if setting exists
db_connect();
$sql = "SELECT value FROM set WHERE label = 'DEF_WH' AND div = '" . USER_DIV . "'";
$Rslt = db_exec($sql) or errDie("Unable to check database for existing settings.");
if (pg_numrows($Rslt) > 0) {
$set = pg_fetch_array($Rslt);
$whid = $set['value'];
if (isset($wtd)) {
$whid = $wtd;
}
# get selected warehouse name
db_conn("exten");
$sql = "SELECT whname FROM warehouses WHERE whid = '{$whid}' AND div = '" . USER_DIV . "'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
if (isset($ria) && $ria != "") {
$len = strlen($ria);
$Wh = "AND lower(substr(stkcod,1,'{$len}'))=lower('{$ria}')";
} else {
$Wh = "";
$ria = "";
}
# get stock on this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE whid = '{$whid}' AND blocked = 'n' AND div = '" . USER_DIV . "' {$Wh} ORDER BY stkcod ASC";
$stkRslt = db_exec($sql) or errDie("Unable to retrieve stocks from database.");
if (pg_numrows($stkRslt) < 1) {
if (!isset($err)) {
$err = "";
}
$err .= "<li>There are no stock items in the selected store.</li>";
//ontinue;
}
$stks = "<select name='stkidss[]' onChange='javascript:document.form.submit();'>";
$stks .= "<option value='-S' disabled selected>Select Number</option>";
$count = 0;
while ($stk = pg_fetch_array($stkRslt)) {
$stks .= "<option value='{$stk['stkid']}'>{$stk['stkcod']} (" . sprint3($stk['units'] - $stk['alloc']) . ")</option>";
}
$stks .= "</select> ";
$products .= "\n\t\t\t\t\t<input type='hidden' name='vatcodess[]' value=''>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td><input type='hidden' name='whidss[]' value='{$whid}'>{$wh['whname']}</td>\n\t\t\t\t\t\t<td>{$stks}</td>\n\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t<td><input type='hidden' size='3' name='qtyss[]' value='1'>1</td>\n\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t<td>{$inv['currency']} <input type='text' size='4' name='discs[]' value='0'> OR <input type='text' size='4' name='discps[]' value='0' maxlength='5'>%</td>\n\t\t\t\t\t\t<td>{$inv['currency']} 0.00</td>\n\t\t\t\t\t\t<td></td>\n\t\t\t\t\t</tr>";
} else {
$products .= "\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>{$whs}</td>\n\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t<td>{$inv['currency']}<input type='text' size='4' name='discs[]' value='0'> OR <input type='text' size='4' name='discps[]' value='0' maxlength='5'>%</td>\n\t\t\t\t\t\t<td>{$inv['currency']} 0.00</td>\n\t\t\t\t\t\t<td></td>\n\t\t\t\t\t</tr>";
}
}
}
/* -- start Listeners -- */
if (isset($diffwhBtn)) {
$products .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>{$whs}</td>\n\t\t\t\t<td> </td>\n\t\t\t\t<td> </td>\n\t\t\t\t<td> </td>\n\t\t\t\t<td> </td>\n\t\t\t\t<td> </td>\n\t\t\t\t<td> </td>\n\t\t\t\t<td> </td>\n\t\t\t\t<td>{$inv['currency']}<input type='text' size='4' name='discs[]' value='0'> OR <input type='text' size='4' name='discps[]' value='0' maxlength='5'>%</td>\n\t\t\t\t<td>{$inv['currency']} 0.00</td>\n\t\t\t\t<td></td>\n\t\t\t</tr>";
}
/* -- End Listeners -- */
$products .= "</table>";
/* --- End Products Display --- */
/* --- Start Some calculations --- */
# Calculate subtotal
$SUBTOT = sprint($inv['subtot']);
# Calculate tradediscm
if ($inv['traddisc'] > 0) {
$traddiscm = sprint($inv['traddisc'] / 100 * ($SUBTOT + $inv['delchrg']));
} else {
$traddiscm = "0.00";
}
$VATP = TAX_VAT;
# Calculate subtotal
$SUBTOT = sprint($inv['subtot']);
$VAT = sprint($inv['vat']);
$TOTAL = sprint($inv['total']);
$inv['delchrg'] = sprint($inv['delchrg']);
/* --- End Some calculations --- */
/*--- Start checks --- */
# check only if the customer is selected
if (isset($cusnum) && $cusnum != "-S") {
db_connect();
#check againg credit limit
if ($TOTAL + $cust['balance'] > $cust['credlimit']) {
$error .= "<li class='err'>Warning : Customers Credit limit of <b>{$inv['currency']} {$cust['credlimit']}</b> has been exceeded";
# Check permissions
if (!perm("invoice-limit-override.php")) {
$done = "";
}
}
$avcred = $cust['credlimit'] - $cust['balance'];
} else {
$avcred = "0.00";
}
/*--- Start checks --- */
$inv['delvat'] += 0;
if ($inv['delvat'] == 0) {
$Sl = "SELECT * FROM vatcodes WHERE del='Yes'";
$Ri = db_exec($Sl) or errDie("Unable to get data.");
$vd = pg_fetch_array($Ri);
$inv['delvat'] = $vd['id'];
}
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t<select name='delvat'>\n\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($vd['id'] == $inv['delvat']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
db_conn('cubit');
$Sl = "SELECT * FROM settings WHERE constant='Delivery Note'";
$Ri = db_exec($Sl) or errDie("Unable to get settings.");
$data = pg_fetch_array($Ri);
if ($data['value'] == "Yes") {
$chp = "checked";
} else {
$chp = "";
}
if (!isset($showvat)) {
$showvat = TRUE;
}
if ($showvat == TRUE) {
$vat14 = AT14;
} else {
$vat14 = "";
}
if (!isset($stkerr)) {
$stkerr = "";
}
$avcred = sprint($avcred);
/* -- Final Layout -- */
$details = "\n\t\t<center>\n\t\t<h3>New International Invoice</h3>\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t<input type='hidden' name='key' value='update'>\n\t\t\t<input type='hidden' name='invid' value='{$invid}'>\n\t\t\t<input type='hidden' name='letters' value='{$letters}'>\n\t\t\t<input type='hidden' name='stkerr' value='{$stkerr}'>\n\t\t\t<table " . TMPL_tblDflts . " width='95%'>\n\t\t\t\t<tr>\n\t\t\t\t\t<td valign='top' width='50%'>\n\t\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t<th colspan='2'> Customer Details </th>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Department</td>\n\t\t\t\t\t\t\t\t<td valign='center'>{$dept['deptname']}</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Account No.</td>\n\t\t\t\t\t\t\t\t<td valign='center'>{$cust['accno']}</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Customer</td>\n\t\t\t\t\t\t\t\t<td valign='center'>{$customers}</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td valign='top'>Customer Address</td>\n\t\t\t\t\t\t\t\t<td valign='center'>" . nl2br($cust['addr1']) . "</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Customer Order number</td>\n\t\t\t\t\t\t\t\t<td valign='center'><input type='text' size='10' name='cordno' value='{$inv['cordno']}'></td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Customer Vat Number</td>\n\t\t\t\t\t\t\t\t<td>{$cust['vatnum']}</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t<th colspan='2'>Point of Sale</th>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Barcode</td>\n\t\t\t\t\t\t\t\t<td><input type='text' size='13' name='bar' value=''></td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "' " . ass("Type the first letters of the stock code you are looking for.") . ">\n\t\t\t\t\t\t\t\t<td>Stock Filter</td>\n\t\t\t\t\t\t\t\t<td><input type='text' size='13' name='ria' value='{$ria}' onkeyup='javasript:predict()'></td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Print Delivery Note</td>\n\t\t\t\t\t\t\t\t<td><input type='checkbox' name='printdel' {$chp}></td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t</table>\n\t\t\t\t\t</td>\n\t\t\t\t\t<td valign='top' align='right' width='50%'>\n\t\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t<th colspan='2'> Invoice Details </th>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Invoice No.</td>\n\t\t\t\t\t\t\t\t<td valign='center'>TI {$inv['invid']}</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Proforma Inv No.</td>\n\t\t\t\t\t\t\t\t<td valign='center'><input type='text' size='5' name='docref' value='{$inv['docref']}'></td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Sales Order No.</td>\n\t\t\t\t\t\t\t\t<td valign='center'><input type='text' size='5' name='ordno' value='{$inv['ordno']}'></td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Foreign Currency</td>\n\t\t\t\t\t\t\t\t<td valign='center'>{$currs['symbol']} - {$currs['name']} Exchange rate " . CUR . " <input type='text' size='7' name='xrate' value='{$inv['xrate']}'></td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>VAT Inclusive</td>\n\t\t\t\t\t\t\t\t<td valign='center'>Yes <input type='radio' size='7' name='chrgvat' value='inc' {$chin}> No<input type='radio' size='7' name='chrgvat' value='exc' {$chex}></td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Terms</td>\n\t\t\t\t\t\t\t\t<td valign='center'>{$termssel} Days</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Sales Person</td>\n\t\t\t\t\t\t\t\t<td valign='center'>{$salesps}</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Invoice Date</td>\n\t\t\t\t\t\t\t\t<td valign='center'>" . mkDateSelect("o", $o_year, $o_month, $o_day) . "</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Available Credit</td>\n\t\t\t\t\t\t\t\t<td>{$inv['currency']} {$avcred}</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Trade Discount</td>\n\t\t\t\t\t\t\t\t<td valign='center'><input type='text' size='5' name='traddisc' value='{$inv['traddisc']}'>%</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Delivery Charge</td>\n\t\t\t\t\t\t\t\t<td valign='center'>{$inv['currency']}<input type='text' size='7' name='delchrg' value='{$inv['delchrg']}'>{$Vatcodes}</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t</table>\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr><td><br></td></tr>\n\t\t\t<tr><td colspan='2'>{$products}</td></tr>\n\t\t\t<tr>\n\t\t\t\t<td>\n\t\t\t\t\t<p>\n\t\t\t\t\t<table " . TMPL_tblDflts . " width='100%'>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th width='25%'>Quick Links</th>\n\t\t\t\t\t\t\t<th width='25%'>Comments</th>\n\t\t\t\t\t\t\t<td rowspan='5' valign='top' width='50%'>{$error}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<td class='" . bg_class() . "'><a href='cust-credit-stockinv.php'>New Invoice</a></td>\n\t\t\t\t\t\t\t<td class='" . bg_class() . "' rowspan='4' align='center' valign='top'><textarea name='comm' rows='4' cols='20'>{$inv['comm']}</textarea></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td><a href='invoice-view.php'>View Invoices</a></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<script>document.write(getQuicklinkSpecial());</script>\n\t\t\t\t\t</table>\n\t\t\t\t</td>\n\t\t\t\t<td align='right' valign='top'>\n\t\t\t\t\t<table " . TMPL_tblDflts . " width='50%'>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>SUBTOTAL</td>\n\t\t\t\t\t\t\t<td align='right'>{$inv['currency']} <input type='hidden' name='SUBTOT' value='{$SUBTOT}'>{$SUBTOT}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Trade Discount</td>\n\t\t\t\t\t\t\t<td align='right'>{$inv['currency']} {$inv['discount']}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Delivery Charge</td>\n\t\t\t\t\t\t\t<td align='right'>{$inv['currency']} {$inv['delivery']}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td><b>VAT {$vat14}</b></td>\n\t\t\t\t\t\t\t<td align='right'>{$inv['currency']} {$VAT}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<th>GRAND TOTAL</th>\n\t\t\t\t\t\t\t<td align='right'>{$inv['currency']} {$TOTAL}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t</table>\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td align='right'><input type='button' value='« Back' onClick='javascript:history.back()'> | <input name='diffwhBtn' type='submit' value='Different Store'> | <input name='addprodBtn' type='submit' value='Add Product'> | <input type='submit' name='saveBtn' value='Save'> </td>\n\t\t\t\t<td>| <input type='submit' name='upBtn' value='Update'>{$done}</td>\n\t\t\t</tr>\n\t\t</table>\n\t\t<a name='bottom'>\n\t\t</form>\n\t\t</center>";
return $details;
}
function details($_POST, $error = "")
{
# Get vars
extract($_POST);
# validate input
require_lib("validate");
$v = new validate();
if (isset($invid)) {
$v->isOk($invid, "num", 1, 20, "Invalid invoice number.");
}
if (isset($letter)) {
$v->isOk($letters, "string", 0, 5, "Invalid First 3 Letters.");
}
if (isset($deptid)) {
$v->isOk($deptid, "num", 1, 20, "Invalid department number.");
}
if (isset($sel_frm)) {
$v->isOk($sel_frm, "string", 6, 6, "Invalid select from selection.");
}
# display errors, if any
if ($v->isError()) {
$error = "";
$errors = $v->getErrors();
foreach ($errors as $e) {
$error .= "<li class='err'>" . $e["msg"] . "</li>";
}
return $error . view_err($_POST);
}
if (isset($deptid) && isset($letters)) {
db_connect();
if ($deptid == "0") {
$searchdept = "";
} else {
$searchdept = "deptid = '{$deptid}' AND ";
}
# Query server for customer info
$sql = "SELECT cusnum, cusname, surname FROM customers WHERE {$searchdept} location != 'int' AND lower(surname) LIKE lower('{$letters}%') AND blocked != 'yes' AND div = '" . USER_DIV . "' ORDER BY surname";
$custRslt = db_exec($sql) or errDie("Unable to view customers");
if (pg_numrows($custRslt) < 1) {
$ajax_err = "<li class='err'>No customer names starting with <b>{$letters}</b> in database.</li>";
//return view_err($_POST, $err);
}
}
if (!isset($deptid)) {
$deptid = 2;
} else {
if (isset($invid)) {
db_conn("cubit");
$sql = "UPDATE invoices SET deptid='{$deptid}' WHERE invid='{$invid}' AND deptid<>'{$deptid}'";
db_exec($sql) or errDie("Error updating invoice department.");
}
}
if (!isset($invid)) {
$invid = create_dummy($deptid);
}
if (!isset($stkerr)) {
$stkerr = "0,0";
}
if (!isset($done)) {
$done = "";
}
if (!isset($cust_del_addr)) {
$cust_del_addr = "";
}
if (!isset($sel_frm)) {
$sel_frm = "stkcod";
}
# Get invoice info
db_connect();
$sql = "SELECT * FROM invoices WHERE invid = '{$invid}' AND div = '" . USER_DIV . "'";
$invRslt = db_exec($sql) or errDie("Unable to get invoice information");
if (pg_numrows($invRslt) < 1) {
return "<li class='err'>Invoice Not Found</li>";
}
$inv = pg_fetch_array($invRslt);
if (!isset($branch)) {
$branch = $inv['branch'];
}
# Check if invoice has been printed
if ($inv['printed'] == "y") {
$error = "<li class='err'> Error : Invoice number <b>{$invid}</b> has already been printed.</li>";
$error .= "<p><input type='button' onClick='JavaScript:history.back();' value='« Correct submission'>";
return $error;
}
# Get department
db_conn("exten");
$sql = "SELECT * FROM departments WHERE deptid = '{$inv['deptid']}' AND div = '" . USER_DIV . "'";
$deptRslt = db_exec($sql);
if (pg_numrows($deptRslt) < 1) {
$dept['deptname'] = "<li class='err'>Department not Found.</li>";
} else {
$dept = pg_fetch_array($deptRslt);
}
# Get selected Customer info
if (isset($letters)) {
db_connect();
$sql = "SELECT * FROM customers WHERE cusnum = '{$inv['cusnum']}' AND location != 'int' AND div = '" . USER_DIV . "'";
$custRslt = db_exec($sql) or errDie("Unable to view customer");
if (pg_numrows($custRslt) < 1) {
if ($inv['deptid'] == 0) {
$searchdept = "";
} else {
$searchdept = "deptid = '{$inv['deptid']}' AND ";
}
# Query server for customer info
$sql = "SELECT cusnum, cusname, surname, accno FROM customers WHERE {$searchdept} location != 'int' AND lower(surname) LIKE lower('{$letters}%') AND blocked != 'yes' AND div = '" . USER_DIV . "' ORDER BY surname";
$custRslt = db_exec($sql) or errDie("Unable to view customers");
if (pg_numrows($custRslt) < 1) {
$ajax_err = "<li class='err'>No customer names starting with <b>{$letters}</b> in database.</li>";
//return view_err($_POST, $err);
} else {
$customers = "<select name='cusnum' onChange='javascript:document.form.submit();'>";
if (pg_numrows($custRslt) == 1) {
$inv['cusnum'] = pg_fetch_result($custRslt, 0, 0);
} else {
$customers .= "<option value='-S' selected>Select Customer</option>";
}
while ($cust = pg_fetch_array($custRslt)) {
$customers .= "<option value='{$cust['cusnum']}'>{$cust['cusname']} {$cust['surname']} ({$cust['accno']})</option>";
}
$customers .= "</select>";
}
# Take care of the unset vars
$cust['addr1'] = "";
$cust['cusnum'] = "";
$cust['vatnum'] = "";
$cust['accno'] = "";
$cust_del_addr = "";
$branchdrop = "<input type='hidden' name='branch' value='0'>";
} else {
$cust = pg_fetch_array($custRslt);
#override address
if ($branch != 0) {
$get_addr = "SELECT branch_descrip FROM customer_branches WHERE id = '{$branch}' AND div = '" . USER_DIV . "' LIMIT 1";
$run_addr = db_exec($get_addr);
if (pg_numrows($run_addr) < 1) {
#address missing ... do nothing
} else {
$arr = pg_fetch_array($run_addr);
$cust['addr1'] = $arr['branch_descrip'];
if ($inv['del_addr'] != $arr['branch_descrip']) {
$update_addr = "UPDATE invoices SET del_addr = '{$arr['branch_descrip']}' WHERE invid = '{$invid}' AND div = '" . USER_DIV . "'";
}
}
}
#if the del_addr of invoice if empty, add the customer's entry and display button so user can edit anyway
if (strlen($inv['del_addr']) < 1) {
$cust_del_addr = $cust['del_addr1'];
} else {
$cust_del_addr = $inv['del_addr'];
}
$sql = "SELECT cusnum, cusname, surname FROM customers WHERE deptid = '{$inv['deptid']}' AND location != 'int' AND lower(surname) LIKE lower('{$letters}%') AND blocked != 'yes' AND div = '" . USER_DIV . "' ORDER BY surname";
$cusRslt = db_exec($sql) or errDie("Unable to view customers");
# Moarn if customer account has been blocked
if ($cust['blocked'] == 'yes') {
$error .= "<li class='err'>Error : Selected customer account has been blocked.</li>";
}
// $customers = "<input type=hidden name=cusnum value='$cust[cusnum]'>$cust[cusname] $cust[surname]";
$cusnum = $cust['cusnum'];
$customers = "<select name='cusnum' onChange='javascript:document.form.submit();'>";
// $customers .= "<option value='-S' selected>Select Customer</option>";
while ($cus = pg_fetch_array($cusRslt)) {
$sel = "";
if ($cust['cusnum'] == $cus['cusnum']) {
$sel = "selected";
}
$customers .= "<option value='{$cus['cusnum']}' {$sel}>{$cus['cusname']} {$cus['surname']}</option>";
}
$customers .= "</select>";
#get list of branches
$get_branches = "SELECT * FROM customer_branches WHERE cusnum = '{$cusnum}' AND div = '" . USER_DIV . "'";
$run_branches = db_exec($get_branches);
if (pg_numrows($run_branches) < 1) {
$branchdrop = "<input type='hidden' name='branch' value='0'>No Branches For This Customer";
} else {
$branchdrop = "<select name='branch' onChange='javascript:document.form.submit();'>";
$branchdrop .= "<option value='0'>Head Office</option>";
while ($barr = pg_fetch_array($run_branches)) {
$sel2 = "";
if ($barr['id'] == $branch) {
$sel2 = "selected";
}
$branchdrop .= "<option {$sel2} value='{$barr['id']}'>{$barr['branch_name']}</option>";
}
$branchdrop .= "</select>";
}
}
}
/* --- Start Drop Downs --- */
# Select warehouse
db_conn("exten");
//old
//$whs = "<select name='whidss[]' onChange='javascript:document.form.submit();'>";
//fixes broken new store function
//STORE1
$whs = "<select name='whidss[]'>";
$sql = "SELECT * FROM warehouses WHERE div = '" . USER_DIV . "' ORDER BY whname ASC";
$whRslt = db_exec($sql);
if (pg_numrows($whRslt) < 1) {
return "<li class='err'> There are no Stores found in Cubit.</li>";
} else {
$whs .= "<option value='-S' disabled selected>Select Store</option>";
while ($wh = pg_fetch_array($whRslt)) {
$whs .= "<option value='{$wh['whid']}'>({$wh['whno']}) {$wh['whname']}</option>";
}
}
$whs .= "</select>";
// Is the customer linked to a sales rep
if (!empty($cust["sales_rep"])) {
db_conn("exten");
$sql = "SELECT salesp FROM salespeople WHERE salespid='{$cust['sales_rep']}'";
$sr_rslt = db_exec($sql) or errDie("Unable to retrieve sales rep from Cubit.");
$salespname = pg_fetch_result($sr_rslt, 0);
$salesps = "<input type='hidden' name='salespn' value='{$salespname}'><b>[{$salespname}]</b>";
} else {
db_conn("exten");
$sql = "SELECT * FROM salespeople WHERE div = '" . USER_DIV . "' ORDER BY salesp ASC";
$salespRslt = db_exec($sql) or errDie("Unable to get sales people.");
if (pg_numrows($salespRslt) < 1) {
return "<li class='err'> There are no Sales People found in Cubit.</li>";
} else {
$salesps = "<select name='salespn'>";
while ($salesp = pg_fetch_array($salespRslt)) {
if ($salesp['salesp'] == $inv['salespn']) {
$sel = "selected";
} else {
$sel = "";
}
$salesps .= "<option value='{$salesp['salesp']}' {$sel}>{$salesp['salesp']}</option>";
}
$salesps .= "</select>";
}
}
# Days drop downs
$days = array("0" => "0", "7" => "7", "14" => "14", "30" => "30", "60" => "60", "90" => "90", "120" => "120");
$termssel = extlib_cpsel("terms", $days, $inv['terms']);
# Keep the charge vat option stable
if ($inv['chrgvat'] == "inc") {
$chin = "checked=yes";
$chex = "";
$chno = "";
} elseif ($inv['chrgvat'] == "exc") {
$chin = "";
$chex = "checked=yes";
$chno = "";
} else {
$chin = "";
$chex = "";
$chno = "checked=yes";
}
# Format date
list($inv_date_year, $inv_date_month, $inv_date_day) = explode("-", $inv['odate']);
/* --- End Drop Downs --- */
/* --- Start Products Display --- */
# Select all products
$products = "\n\t\t<table " . TMPL_tblDflts . "' width='100%'>\n\t\t\t<tr>\n\t\t\t\t<th>STORE</th>\n\t\t\t\t<th>ITEM NUMBER</th>\n\t\t\t\t<th>VAT CODE</th>\n\t\t\t\t<th>SERIAL NO.</th>\n\t\t\t\t<th>DESCRIPTION</th>\n\t\t\t\t<th>QTY</th>\n\t\t\t\t<th>UNIT PRICE</th>\n\t\t\t\t<th>UNIT DISCOUNT</th>\n\t\t\t\t<th>AMOUNT</th>\n\t\t\t\t<th>Remove</th>\n\t\t\t<tr>";
# get selected stock in this invoice
db_connect();
$sql = "SELECT * FROM inv_items WHERE invid = '{$invid}' AND div = '" . USER_DIV . "'";
$stkdRslt = db_exec($sql);
$i = 0;
$key = 0;
$ai = 0;
while ($stkd = pg_fetch_array($stkdRslt)) {
$stkd['account'] += 0;
if ($stkd['account'] != 0) {
# Keep track of selected stock amounts
$stkd["amt"] = sprint($stkd["amt"]);
$amts[$i] = $stkd['amt'];
$i++;
$Accounts = "\n\t\t\t\t<select name='accounts[{$ai}]'>\n\t\t\t\t\t<option value='0'>Select Account</option>";
$useaccdrop = getCSetting("USE_NON_STOCK_ACCOUNTS");
if (isset($useaccdrop) and $useaccdrop == "yes") {
db_connect();
$acc_sql = "SELECT * FROM non_stock_account_list ORDER BY accname";
$run_acc = db_exec($acc_sql) or errDie("Unable to get account information.");
if (pg_numrows($run_acc) > 0) {
while ($acc = pg_fetch_array($run_acc)) {
if ($acc['accid'] == $stkd['account']) {
$Accounts .= "<option value='{$acc['accid']}' selected>{$acc['accname']}</option>";
} else {
$Accounts .= "<option value='{$acc['accid']}'>{$acc['accname']}</option>";
}
}
$Accounts .= "</select>";
}
} else {
db_conn('core');
$Sl = "SELECT accid,topacc,accnum,accname FROM accounts WHERE acctype='I' ORDER BY accname";
$Ri = db_exec($Sl) or errDie("Unable to get accounts.");
while ($ad = pg_fetch_array($Ri)) {
if ($ad['accid'] == $stkd['account']) {
$sel = "selected";
} else {
$sel = "";
}
if (isb($ad['accid'])) {
continue;
}
$Accounts .= "<option value='{$ad['accid']}' {$sel}>{$ad['accname']}</option>";
}
}
$Accounts .= "</select>";
$sernos = "\n\t\t\t\t<input type='hidden' name='sernos[{$ai}]' value='{$stkd['serno']}'>\n\t\t\t\t<input type='hidden' name='sernos_ss[{$ai}]' value='{$stkd['serno']}'>";
# Input qty if not serialised
$qtyin = "<input type='text' size='3' name='qtys[{$ai}]' value='{$stkd['qty']}'>";
$viewcost = "<input type='text' size='8' name='unitcost[{$ai}]' value='{$stkd['unitcost']}'>";
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t\t<select name='vatcodes[{$ai}]'>\n\t\t\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($stkd['vatcode'] == $vd['id']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
# Put in product
$products .= "\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td colspan='2'>\n\t\t\t\t\t\t{$Accounts}\n\t\t\t\t\t\t<input type='hidden' name='whids[{$ai}]' value='{$stkd['whid']}'>\n\t\t\t\t\t</td>\n\t\t\t\t\t<td><input type='hidden' name='stkids[{$ai}]' value='{$stkd['stkid']}'>{$Vatcodes}</td>\n\t\t\t\t\t<td></td>\n\t\t\t\t\t<td><input type='text' size='20' name='descriptions[{$ai}]' value='{$stkd['description']}'> {$sernos}</td>\n\t\t\t\t\t<td>{$qtyin}</td>\n\t\t\t\t\t<td>{$viewcost}</td>\n\t\t\t\t\t<td><input type='hidden' name='disc[{$ai}]' value='{$stkd['disc']}'><input type='hidden' name='discp[{$ai}]' value='{$stkd['discp']}'></td>\n\t\t\t\t\t<td nowrap><input type='hidden' name='amt[{$ai}]' value='{$stkd['amt']}'> " . CUR . " {$stkd['amt']}</td>\n\t\t\t\t\t<td><input type='checkbox' name='remprod[{$ai}]' value='{$key}'></td>\n\t\t\t\t</tr>";
$key++;
++$ai;
} else {
# Keep track of selected stock amounts
$amts[$i] = $stkd['amt'];
$i++;
# Get warehouse name
db_conn("exten");
$sql = "SELECT whname FROM warehouses WHERE whid = '{$stkd['whid']}' AND div = '" . USER_DIV . "'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
# Get selected stock in this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE stkid = '{$stkd['stkid']}' AND div = '" . USER_DIV . "'";
$stkRslt = db_exec($sql);
$stk = pg_fetch_array($stkRslt);
# Serial number
if ($stk['serd'] == 'yes' && ($inv['serd'] == 'n' || $stkd["serno"] == "")) {
$sers = ext_getavserials($stkd['stkid']);
$sernos = "<select name='sernos[{$ai}]'>";
foreach ($sers as $skey => $ser) {
$sernos .= "<option value='{$ser['serno']}'>{$ser['serno']}</option>";
}
$sernos .= "</select>\n\t\t\t\t\t<input type='hidden' name='sernos_ss[]' value='*_*_*CUBIT_SERIAL_SELECT_BOX*_*_*' />";
} else {
$sernos = "\n\t\t\t\t\t<input type='hidden' name='sernos_ss[]' value='{$stkd['ss']}' />\n\t\t\t\t\t<input type='hidden' name='sernos[{$ai}]' value='{$stkd['serno']}'>{$stkd['ss']}";
}
# Input qty if not serialised
$qtyin = "<input type='text' size='3' name='qtys[{$ai}]' value='{$stkd['qty']}'>";
if ($stk['serd'] == 'yes') {
$qtyin = "<input type='hidden' size='3' name='qtys[{$ai}]' value='{$stkd['qty']}'>{$stkd['qty']}";
}
# check permissions
if (perm("invoice-unitcost-edit.php")) {
$viewcost = "<input type='text' size='8' name='unitcost[{$ai}]' value='{$stkd['unitcost']}'>";
} else {
$viewcost = "<input type='hidden' size='8' name='unitcost[{$ai}]' value='{$stkd['unitcost']}'>{$stkd['unitcost']}";
}
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t\t<select name='vatcodes[{$ai}]'>\n\t\t\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($stkd['vatcode'] == $vd['id']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
# Put in product
$products .= "\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>\n\t\t\t\t\t\t<input type='hidden' name='accounts[{$ai}]' value='0'>\n\t\t\t\t\t\t<input type='hidden' name='descriptions[{$ai}]' value=''>\n\t\t\t\t\t\t<input type='hidden' name='whids[{$ai}]' value='{$stkd['whid']}'>{$wh['whname']}\n\t\t\t\t\t</td>\n\t\t\t\t\t<td><input type='hidden' name='stkids[]' value='{$stkd['stkid']}'><a href='#bottom' onclick='openwindow(\"stock-amt-det.php?stkid={$stk['stkid']}\")'>{$stk['stkcod']}</a></td>\n\t\t\t\t\t<td>{$Vatcodes}</td>\n\t\t\t\t\t<td>{$sernos}</td>\n\t\t\t\t\t<td>" . extlib_rstr($stk['stkdes'], 30) . "</td>\n\t\t\t\t\t<td>{$qtyin}</td>\n\t\t\t\t\t<td>{$viewcost}</td>\n\t\t\t\t\t<td><input type='text' size='4' name='disc[{$ai}]' value='{$stkd['disc']}'> OR <input type='text' size='4' name='discp[{$ai}]' value='{$stkd['discp']}' maxlength='5'>%</td>\n\t\t\t\t\t<td nowrap><input type='hidden' name='amt[{$ai}]' value='{$stkd['amt']}'> " . CUR . " {$stkd['amt']}</td>\n\t\t\t\t\t<td><input type='checkbox' name='remprod[{$ai}]' value='{$key}'></td>\n\t\t\t\t</tr>";
$key++;
++$ai;
}
}
# Look above(remprod keys)
$keyy = $key;
# Look above(if i = 0 then there are no products)
if ($i == 0) {
$done = "";
} else {
$SCROLL = "yes";
}
# check if stock warehouse was selected
if (isset($whidss)) {
foreach ($whidss as $key => $whid) {
if (isset($stkidss[$key]) && $stkidss[$key] != "-S" && isset($cust['pricelist'])) {
# skip if not selected
if ($whid == "-S") {
continue;
}
# Get selected stock in this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE stkid = '{$stkidss[$key]}' AND div = '" . USER_DIV . "' ORDER BY stkcod ASC";
$stkRslt = db_exec($sql);
$stk = pg_fetch_array($stkRslt);
# Get selected warehouse name
db_conn("exten");
$sql = "SELECT whid, whname FROM warehouses WHERE whid = (select whid from cubit.stock where stkid = '{$stk['stkid']}' limit 1) AND div = '" . USER_DIV . "'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
if ($stk['serd'] == 'yes') {
$sers = ext_getavserials($stkidss[$key]);
$sernos = "<select name='sernos[]' onChange='javascript:document.form.submit();'>";
foreach ($sers as $skey => $ser) {
$sernos .= "<option value='{$ser['serno']}'>{$ser['serno']}</option>";
}
$sernos .= "</select>\n\t\t\t\t\t\t<input type='hidden' name='sernos_ss[]' value='*_*_*CUBIT_SERIAL_SELECT_BOX*_*_*' />";
} else {
$sernos = "\n\t\t\t\t\t\t<input type='hidden' name='sernos_ss[]' value=''>\n\t\t\t\t\t\t<input type='hidden' name='sernos[{$ai}]' value=''>";
}
# Get price from price list if it is set
if (isset($cust['pricelist'])) {
# get selected stock in this warehouse
db_conn("exten");
$sql = "SELECT price FROM plist_prices WHERE listid = '{$cust['pricelist']}' AND stkid = '{$stk['stkid']}' AND div = '" . USER_DIV . "'";
$plRslt = db_exec($sql);
if (pg_numrows($plRslt) > 0) {
$pl = pg_fetch_array($plRslt);
$stk['selamt'] = $pl['price'];
}
}
/* -- Start Some Checks -- */
# check if they are selling too much
if ($stk['units'] - $stk['alloc'] < $qtyss[$key]) {
if (!in_array($stk['stkid'], explode(",", $stkerr))) {
if ($stk['type'] != 'lab') {
$stkerr .= ",{$stk['stkid']}";
$error .= "<li class='err'>Warning : Item number <b>{$stk['stkcod']}</b> does not have enough items available.</li>";
}
}
}
if ($stk['units'] <= $stk['minlvl'] && $stk['minlvl'] != 0) {
$error .= "<li class='err'>{$stk['stkcod']} is below minimum level, please notify stock controller.</li>";
}
/* -- End Some Checks -- */
# Calculate the Discount discount
if ($discs[$key] < 1) {
if ($discps[$key] > 0) {
$discs[$key] = round($discps[$key] / 100 * $stk['selamt'], 2);
}
} else {
$discps[$key] = round($discs[$key] * 100 / $stk['selamt'], 2);
}
# Calculate amount
$amt[$key] = $qtyss[$key] * ($stk['selamt'] - $discs[$key]);
# Input qty if not serialised
$qtyin = "<input type='text' size='3' name='qtemp' value='{$qtyss[$key]}'>";
if ($stk['serd'] == 'yes') {
$qtyin = "<input type='hidden' size='3' name='qtemp' value='{$qtyss[$key]}'>{$qtyss[$key]}";
}
#clean some vars
$stk['selamt'] = sprint($stk['selamt']);
$amt[$key] = sprint($amt[$key]);
# Check permissions
if (perm("invoice-unitcost-edit.php")) {
$viewcost = "<input type='text' size='8' name='unitcost[{$ai}]' value='{$stk['selamt']}'>";
} else {
$viewcost = "<input type='hidden' size='8' name='unitcost[{$ai}]' value='{$stk['selamt']}'>{$stk['selamt']}";
}
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t\t\t<select name='vatcodes[{$ai}]'>\n\t\t\t\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($stk['vatcode'] == $vd['id']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
# Put in selected warehouse and stock
$products .= "\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>\n\t\t\t\t\t\t\t<input type='hidden' name='accounts[{$ai}]' value='0'>\n\t\t\t\t\t\t\t<input type='hidden' name='descriptions[{$ai}]' value=''>\n\t\t\t\t\t\t\t<input type='hidden' name='whids[]' value='{$wh['whid']}'>{$wh['whname']}\n\t\t\t\t\t\t</td>\n\t\t\t\t\t\t<td><input type='hidden' name='stkids[{$ai}]' value='{$stk['stkid']}'><a href='#bottom' onclick='openwindow(\"stock-amt-det.php?stkid={$stk['stkid']}\")'>{$stk['stkcod']}</a></td>\n\t\t\t\t\t\t<td>{$Vatcodes}</td>\n\t\t\t\t\t\t<td>{$sernos}</td>\n\t\t\t\t\t\t<td>" . extlib_rstr($stk['stkdes'], 30) . "</td>\n\t\t\t\t\t\t<td>{$qtyin}</td>\n\t\t\t\t\t\t<td>{$viewcost}</td>\n\t\t\t\t\t\t<td><input type='text' size='4' name='disc[{$ai}]' value='{$discs[$key]}'> OR <input type='text' size='4' name='discp[{$ai}]' value='{$discps[$key]}' maxlength='5'>%</td>\n\t\t\t\t\t\t<td nowrap><input type='hidden' name='amt[{$ai}]' value='{$amt[$key]}'> " . CUR . " {$amt[$key]}</td>\n\t\t\t\t\t\t<td><input type='checkbox' name='remprod[{$ai}]' value='{$keyy}'></td>\n\t\t\t\t\t</tr>";
$keyy++;
++$ai;
} elseif (isset($accountss[$key]) && $accountss[$key] != "0" && isset($cust['pricelist'])) {
db_conn('core');
$Sl = "SELECT * FROM accounts WHERE accid='{$accountss[$key]}'";
$Ri = db_exec($Sl) or errDie("Unable to get account data.");
if (pg_num_rows($Ri) < 1) {
return "invalid.";
}
$ad = pg_fetch_array($Ri);
# Calculate amount
$amt[$key] = sprint($qtyss[$key] * $unitcosts[$key]);
# Input qty if not serialised
$qtyin = "<input type='text' size='3' name='qtemp' value='{$qtyss[$key]}'>";
# Check permissions
$viewcost = "<input type='text' size='8' name='unitcost[{$ai}]' value='{$unitcosts[$key]}'>";
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t\t\t<select name='vatcodes[{$ai}]'>\n\t\t\t\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($vatcodess[$key] == $vd['id']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
# Put in selected warehouse and stock
$products .= "\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td colspan='2'>\n\t\t\t\t\t\t\t{$ad['accname']}\n\t\t\t\t\t\t\t<input type='hidden' name='accounts[{$ai}]' value='{$accountss[$key]}'>\n\t\t\t\t\t\t\t<input type='hidden' name='whids[{$ai}]' value='0'>\n\t\t\t\t\t\t</td>\n\t\t\t\t\t\t<td>{$Vatcodes}<input type='hidden' name='stkids[{$ai}]' value='0'></td>\n\t\t\t\t\t\t<td></td>\n\t\t\t\t\t\t<td><input type='text' size='20' name='descriptions[{$ai}]' value='{$descriptionss[$key]}'></td>\n\t\t\t\t\t\t<td>{$qtyin}</td>\n\t\t\t\t\t\t<td>{$viewcost}</td>\n\t\t\t\t\t\t<td><input type='hidden' name='disc[{$ai}]' value='0'><input type='hidden' name='discp[{$ai}]' value='0'></td>\n\t\t\t\t\t\t<td nowrap><input type='hidden' name='amt[{$ai}]' value='{$amt[$key]}'> " . CUR . " {$amt[$key]}</td>\n\t\t\t\t\t\t<td><input type='checkbox' name='remprod[{$ai}]' value='{$keyy}'></td>\n\t\t\t\t\t</tr>";
$keyy++;
++$ai;
} else {
# skip if not selected
if ($whid == "-S") {
continue;
}
if (!isset($addnon)) {
if ($filter_store != "0") {
# get warehouse name
db_conn("exten");
$sql = "SELECT whname FROM warehouses WHERE whid = '{$filter_store}' AND div = '" . USER_DIV . "'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
}
if (isset($ria) and $ria != "") {
$len = strlen($ria);
if ($ria == "Show All") {
$Wh = "";
$ria = "";
} else {
$Wh = "AND (lower(stkdes) LIKE lower('%{$ria}%')) OR (lower(stkcod) LIKE lower('%{$ria}%'))";
$ria = "";
}
} else {
$Wh = "AND FALSE";
$ria = "";
}
$check_setting = getCSetting("OPTIONAL_STOCK_FILTERS");
if (isset($check_setting) and $check_setting == "yes") {
if (isset($filter_class) and $filter_class != "0") {
$Wh .= " AND prdcls = '{$filter_class}'";
}
if (isset($filter_cat) and $filter_cat != "0") {
$Wh .= " AND catid = '{$filter_cat}'";
}
}
if (isset($filter_store) and $filter_store != "0") {
$Wh .= " AND whid = '{$filter_store}'";
}
# get stock on this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE blocked = 'n' AND div = '" . USER_DIV . "' {$Wh} ORDER BY {$sel_frm} ASC";
$stkRslt = db_exec($sql) or errDie("Unable to retrieve stocks from database.");
if (pg_numrows($stkRslt) < 1) {
$error .= "<li class='err'>There are no stock items in the selected warehouse.";
continue;
}
if (pg_numrows($stkRslt) == 1) {
$ex = "selected";
$reload = TRUE;
$send_override = "<input type='hidden' name='stkidss[{$ai}]' value='" . pg_fetch_result($stkRslt, 0, 0) . "'><script>document.form.submit();</script>";
} else {
$ex = "";
$reload = FALSE;
}
if ($sel_frm == "stkcod") {
$cods = "<select name='stkidss[{$ai}]' onChange='javascript:document.form1.submit();'>";
$count = 0;
while ($stk = pg_fetch_array($stkRslt)) {
// Check if this stock item has been blocked
//pointless, as we only get non blocked stock ...
//if (stock_is_blocked($stk["stkid"])) {
// continue;
//}
$cods .= "<option value='{$stk['stkid']}'>{$stk['stkcod']} (" . sprint3($stk['units'] - $stk['alloc']) . ")</option>";
}
$cods .= "</select> ";
$descs = "";
} else {
$descs = "<select style='width:250px'name='stkidss[{$ai}]' onChange='javascript:document.form.submit();'>";
$descs .= "<option value='-S' disabled selected>Select Description</option>";
$count = 0;
while ($stk = pg_fetch_array($stkRslt)) {
// Check if this stock item has been blocked
//pointless, as ge only get non blocked stock
// if (stock_is_blocked($stk["stkid"])) {
// continue;
// }
$descs .= "<option value='{$stk['stkid']}'>{$stk['stkdes']} (" . sprint3($stk['units'] - $stk['alloc']) . ")</option>";
}
$descs .= "</select> ";
$cods = "";
}
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t\t\t\t<select name='vatcodess[{$ai}]'>\n\t\t\t\t\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($vd['del'] == "Yes") {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
# put in drop down and warehouse
$products .= "\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>\n\t\t\t\t\t\t\t\t<input type='hidden' name='accountss[{$ai}]' value='0'>\n\t\t\t\t\t\t\t\t<input type='hidden' name='descriptionss[{$ai}]' value=''>\n\t\t\t\t\t\t\t\t<input type='hidden' name='whidss[{$ai}]' value='{$filter_store}'>\n\t\t\t\t\t\t\t</td>\n\t\t\t\t\t\t\t<td>{$cods}</td>\n\t\t\t\t\t\t\t<td><input type='hidden' name='vatcodess' value='0'></td>\n\t\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t\t<td>{$descs}</td>\n\t\t\t\t\t\t\t<td><input type='hidden' size='3' name='qtyss[{$ai}]' value='1'>1</td>\n\t\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t\t<td><input type='text' size='4' name='discs[{$ai}]' value='0'> OR <input type='text' size='4' name='discps[{$ai}]' value='0' maxlength='5'>%</td>\n\t\t\t\t\t\t\t<td nowrap><input type='hidden' name='amts[{$ai}]' value='0.00'>" . CUR . " 0.00</td>\n\t\t\t\t\t\t\t<td></td>\n\t\t\t\t\t\t</tr>";
++$ai;
} else {
$Accounts = "\n\t\t\t\t\t\t<select name='accountss[{$ai}]' onChange='javascript:document.form.submit();'>\n\t\t\t\t\t\t\t<option value='0'>Select Account</option>";
$useaccdrop = getCSetting("USE_NON_STOCK_ACCOUNTS");
if (isset($useaccdrop) and $useaccdrop == "yes") {
db_connect();
$acc_sql = "SELECT * FROM non_stock_account_list ORDER BY accname";
$run_acc = db_exec($acc_sql) or errDie("Unable to get account information.");
if (pg_numrows($run_acc) > 0) {
while ($acc = pg_fetch_array($run_acc)) {
$Accounts .= "<option value='{$acc['accid']}'>{$acc['accname']}</option>";
}
$Accounts .= "</select>";
}
} else {
db_conn('core');
$Sl = "SELECT accid,topacc,accnum,accname FROM accounts WHERE acctype='I' ORDER BY accname";
$Ri = db_exec($Sl) or errDie("Unable to get accounts.");
while ($ad = pg_fetch_array($Ri)) {
if (isb($ad['accid'])) {
continue;
}
$Accounts .= "<option value='{$ad['accid']}'>{$ad['accname']}</option>";
}
$Accounts .= "</select>";
}
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t\t\t\t<select name='vatcodess[{$ai}]'>\n\t\t\t\t\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($vd['del'] == "Yes") {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
$products .= "\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td colspan='2'>\n\t\t\t\t\t\t\t\t{$Accounts}\n\t\t\t\t\t\t\t\t<input type='hidden' name='whidss[{$ai}]' value='1'>\n\t\t\t\t\t\t\t</td>\n\t\t\t\t\t\t\t<inpu type='hidden' name='stkidss[{$ai}]' value=''>\n\t\t\t\t\t\t\t<td>{$Vatcodes}</td>\n\t\t\t\t\t\t\t<td></td>\n\t\t\t\t\t\t\t<td><input type='text' size='20' name='descriptionss[{$ai}]'></td>\n\t\t\t\t\t\t\t<td><input type='text' size='3' name='qtyss[{$ai}]' value='1'></td>\n\t\t\t\t\t\t\t<td><input type='text' name='unitcosts[{$ai}]' size='7'></td>\n\t\t\t\t\t\t\t<td></td>\n\t\t\t\t\t\t\t<td nowrap>" . CUR . " 0.00</td>\n\t\t\t\t\t\t\t<td><input type='hidden' name='discs[{$ai}]' value='0'><input type='hidden' name='discps[{$ai}]' value='0'></td>\n\t\t\t\t\t\t</tr>";
++$ai;
}
}
}
} else {
#HAX !
if (!isset($addnon) && !isset($upBtn)) {
if (isset($ria) and $ria != "") {
$len = strlen($ria);
if ($ria == "Show All") {
$Wh = "";
$ria = "";
} else {
$Wh = "AND (lower(stkdes) LIKE lower('%{$ria}%')) OR (lower(stkcod) LIKE lower('%{$ria}%'))";
$ria = "";
}
} else {
$Wh = "AND FALSE";
$ria = "";
}
$check_setting = getCSetting("OPTIONAL_STOCK_FILTERS");
if (isset($check_setting) and $check_setting == "yes") {
if (isset($filter_class) and $filter_class != "0") {
$Wh .= " AND prdcls = '{$filter_class}'";
}
if (isset($filter_cat) and $filter_cat != "0") {
$Wh .= " AND catid = '{$filter_cat}'";
}
}
if (isset($filter_store) and $filter_store != "0") {
$Wh .= " AND whid = '{$filter_store}'";
}
# get stock on this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE blocked = 'n' AND div = '" . USER_DIV . "' {$Wh} ORDER BY {$sel_frm} ASC";
$stkRslt = db_exec($sql) or errDie("Unable to retrieve stocks from database.");
if (pg_numrows($stkRslt) < 1) {
if (!isset($err)) {
$err = "";
}
$err .= "<li>There are no stock items in the selected store.</li>";
//ontinue;
}
if (pg_numrows($stkRslt) == 1) {
$reload = TRUE;
$send_override = "<input type='hidden' name='stkidss[{$ai}]' value='" . pg_fetch_result($stkRslt, 0, 0) . "'>";
} else {
$reload = FALSE;
$send_override = "";
}
if ($sel_frm == "stkcod") {
$cods = "<select name='stkidss[{$ai}]' onChange='javascript:document.form.submit();'>";
// $cods .= "<option value='-S' disabled selected>Select Number</option>";
$count = 0;
while ($stk = pg_fetch_array($stkRslt)) {
$cods .= "<option value='{$stk['stkid']}'>{$stk['stkcod']} (" . sprint3($stk['units'] - $stk['alloc']) . ")</option>";
}
$cods .= "</select> ";
$descs = "";
} else {
$descs = "<select style='width:250px' name='stkidss[{$ai}]' onChange='javascript:document.form.submit();'>";
$descs .= "<option value='-S' disabled selected>Select Description</option>";
$count = 0;
while ($stk = pg_fetch_array($stkRslt)) {
$descs .= "<option value='{$stk['stkid']}'>{$stk['stkdes']} (" . sprint3($stk['units'] - $stk['alloc']) . ")</option>";
}
$descs .= "</select> ";
$cods = "";
}
$products .= "\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>\n\t\t\t\t\t\t<input type='hidden' name='accountss[{$ai}]' value='0'>\n\t\t\t\t\t\t<input type='hidden' name='descriptionss[{$ai}]' value=''>\n\t\t\t\t\t\t<input type='hidden' name='vatcodess[{$ai}]' value=''>\n\t\t\t\t\t\t<input type='hidden' name='whidss[{$ai}]' value='{$filter_store}'>\n\t\t\t\t\t</td>\n\t\t\t\t\t<td>{$cods}</td>\n\t\t\t\t\t<td> </td>\n\t\t\t\t\t<td></td>\n\t\t\t\t\t<td>{$descs}</td>\n\t\t\t\t\t<td><input type='hidden' size='3' name='qtyss[{$ai}]' value='1'>1</td>\n\t\t\t\t\t<td> </td>\n\t\t\t\t\t<td><input type='text' size='4' name='discs[{$ai}]' value='0'> OR <input type='text' size='4' name='discps[{$ai}]' value='0' maxlength='5'>%</td>\n\t\t\t\t\t<td nowrap>" . CUR . " 0.00</td>\n\t\t\t\t\t<td></td>\n\t\t\t\t</tr>";
++$ai;
} elseif (isset($addnon)) {
$Accounts = "\n\t\t\t\t<select name='accountss[{$ai}]' onChange='javascript:document.form.submit();'>\n\t\t\t\t\t<option value='0'>Select Account</option>";
$useaccdrop = getCSetting("USE_NON_STOCK_ACCOUNTS");
if (isset($useaccdrop) and $useaccdrop == "yes") {
db_connect();
$acc_sql = "SELECT * FROM non_stock_account_list ORDER BY accname";
$run_acc = db_exec($acc_sql) or errDie("Unable to get account information.");
if (pg_numrows($run_acc) > 0) {
while ($acc = pg_fetch_array($run_acc)) {
$Accounts .= "<option value='{$acc['accid']}'>{$acc['accname']}</option>";
}
$Accounts .= "</select>";
}
} else {
db_conn('core');
$Sl = "SELECT accid,topacc,accnum,accname FROM accounts WHERE acctype='I' ORDER BY accname";
$Ri = db_exec($Sl) or errDie("Unable to get accounts.");
while ($ad = pg_fetch_array($Ri)) {
if (isb($ad['accid'])) {
continue;
}
$Accounts .= "<option value='{$ad['accid']}'>{$ad['accname']}</option>";
}
$Accounts .= "</select>";
}
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t\t<select name='vatcodess[{$ai}]'>\n\t\t\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($vd['del'] == "Yes") {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
$products .= "\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td colspan='2'>{$Accounts}<input type='hidden' name='whidss[{$ai}]' value='1'></td>\n\t\t\t\t\t<inpu type='hidden' name='stkidss[{$ai}]' value=''>\n\t\t\t\t\t<td>{$Vatcodes}</td>\n\t\t\t\t\t<td></td>\n\t\t\t\t\t<td><input type='text' size='20' name='descriptionss[{$ai}]'></td>\n\t\t\t\t\t<td><input type='text' size='3' name='qtyss[{$ai}]' value='1'></td>\n\t\t\t\t\t<td><input type='text' name='unitcosts[{$ai}]' size='7'></td>\n\t\t\t\t\t<td></td>\n\t\t\t\t\t<td nowrap>" . CUR . " 0.00</td>\n\t\t\t\t\t<td><input type='hidden' name='discs[{$ai}]' value='0'><input type='hidden' name='discps[{$ai}]' value='0' ></td>\n\t\t\t\t</tr>";
++$ai;
}
}
$products .= "</table>";
/* --- End Products Display --- */
/* --- Start Some calculations --- */
# Calculate subtotal
$SUBTOT = sprint($inv['subtot']);
# Calculate tradediscm
if ($inv['traddisc'] > 0) {
$traddiscm = sprint($inv['traddisc'] / 100 * $inv['total']);
} else {
$traddiscm = "0.00";
}
$VATP = TAX_VAT;
# Calculate subtotal
$SUBTOT = sprint($inv['subtot']);
$VAT = sprint($inv['vat']);
$TOTAL = sprint($inv['total']);
$inv['delchrg'] = sprint($inv['delchrg']);
/* --- End Some calculations --- */
/*--- Start checks --- */
# check only if the customer is selected
if (isset($cusnum) && $cusnum != "-S") {
#check againg credit limit
if ($TOTAL + $cust['balance'] > $cust['credlimit']) {
$error .= "<li class='err'>Warning : Customers Credit limit of <b>" . CUR . " " . sprint($cust["credlimit"]) . "</b> has been exceeded";
#limit reached ... check for warn/block
db_conn("cubit");
$get_check = "SELECT value FROM set WHERE label = 'CUST_INV_WARN' LIMIT 1";
$run_check = db_exec($get_check) or errDie("Unable to get credit limit response setting");
if (pg_numrows($run_check) < 1) {
#no setting ? do nothing ....
} else {
$sarr = pg_fetch_array($run_check);
if ($sarr['value'] == "block") {
#block account ...
$done = "";
}
}
# Check permissions
if (!perm("invoice-limit-override.php")) {
$done = "";
}
}
$avcred = $cust['credlimit'] - $cust['balance'];
} else {
$avcred = "0.00";
}
/*--- Start checks --- */
db_conn('cubit');
$Sl = "SELECT * FROM settings WHERE constant='SALES'";
$Ri = db_exec($Sl) or errDie("Unable to get settings.");
$data = pg_fetch_array($Ri);
if ($data['value'] == "Yes") {
$sc = "checked";
} else {
$sc = "";
}
$sales = "\n\t\t<td>\n\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t<tr>\n\t\t\t\t\t<td>{$salesps}</td>\n\t\t\t\t\t<td>Print</td>\n\t\t\t\t\t<td><input type='checkbox' name='printsales' {$sc}></td>\n\t\t\t\t</tr>\n\t\t\t</table>\n\t\t</td>";
$inv['delvat'] += 0;
if ($inv['delvat'] == 0) {
$Sl = "SELECT * FROM vatcodes WHERE del='Yes'";
$Ri = db_exec($Sl) or errDie("Unable to get data.");
$vd = pg_fetch_array($Ri);
$inv['delvat'] = $vd['id'];
}
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t<select name='delvat'>\n\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($vd['id'] == $inv['delvat']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
db_conn('cubit');
$Sl = "SELECT * FROM settings WHERE constant='Delivery Note'";
$Ri = db_exec($Sl) or errDie("Unable to get settings.");
$data = pg_fetch_array($Ri);
if ($data['value'] == "Yes") {
$chp = "checked";
} else {
$chp = "";
}
if (empty($inv["comm"])) {
db_conn("cubit");
$sql = "SELECT value FROM settings WHERE constant='DEFAULT_COMMENTS'";
$cmntRslt = db_exec($sql) or errDie("Unable to retrieve the default comment from Cubit.");
$comm = base64_decode(pg_fetch_result($cmntRslt, 0));
} else {
$comm = $inv["comm"];
}
if (!isset($showvat)) {
$showvat = TRUE;
}
if ($showvat == TRUE) {
$vat14 = AT14;
} else {
$vat14 = "";
}
// Which display method was selected
if (isset($sel_frm) && $sel_frm == "stkdes") {
$sel_frm_cod = "";
$sel_frm_des = "checked";
} else {
$sel_frm_cod = "checked";
$sel_frm_des = "";
}
// Delivery Date
if (!empty($inv["deldate"])) {
$deldate = explode("-", $inv["deldate"]);
} else {
$trans_date_setting = getCSetting("USE_TRANSACTION_DATE");
if (isset($trans_date_setting) and $trans_date_setting == "yes") {
$trans_date_value = getCSetting("TRANSACTION_DATE");
$date_arr = explode("-", $trans_date_value);
$deldate[0] = $date_arr[0];
$deldate[1] = $date_arr[1];
$deldate[2] = $date_arr[2];
} else {
$deldate[0] = date("Y");
$deldate[1] = date("m");
$deldate[2] = date("d");
}
}
$details_begin = "\n\t\t<center>\n\t\t<h3>New Invoice</h3>\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t<input type='hidden' name='SCROLL' value='yes'>\n\t\t\t<input type='hidden' name='key' value='update'>\n\t\t\t<input type='hidden' name='invid' value='{$invid}'>\n\t\t\t<input type='hidden' name='stkerr' value='{$stkerr}'>\n\t\t<table " . TMPL_tblDflts . " width='95%'>\n\t\t \t<tr>\n\t\t \t\t<td valign='top' width='50%'>\n\t\t \t\t\t<div id='cust_selection'>";
if (empty($ajax_err) && (isset($cusnum) || AJAX)) {
if (isset($cusnum)) {
$OTS_OPT = onthespot_encode(SELF, "cust_selection", "deptid={$inv['deptid']}&letters={$letters}&cusnum={$cusnum}&invid={$invid}");
$custedit = "\n\t\t\t\t<td nowrap>\n\t\t\t\t\t<a href='javascript: popupSized(\"customers-new.php?cusnum={$cusnum}&onthespot={$OTS_OPT}\", \"edit_cust\", 700, 630);'>Edit Customer Details</a>\n\t\t\t\t</td>";
} else {
$custedit = "";
}
$optional_filter_setting = getCSetting("OPTIONAL_STOCK_FILTERS");
if (isset($optional_filter_setting) and $optional_filter_setting == "yes") {
db_connect();
$catsql = "SELECT catid, cat, catcod FROM stockcat WHERE div = '" . USER_DIV . "' ORDER BY cat ASC";
$catRslt = db_exec($catsql);
if (pg_numrows($catRslt) < 1) {
$cat_drop = "<input type='hidden' name='filter_cat' value='0'>";
} else {
$cat_drop = "<select name='filter_cat'>";
$cat_drop .= "<option value='0'>All Categories</option>";
while ($cat = pg_fetch_array($catRslt)) {
if (isset($filter_cat) and $filter_cat == $cat['catid']) {
$cat_drop .= "<option value='{$cat['catid']}' selected>({$cat['catcod']}) {$cat['cat']}</option>";
} else {
$cat_drop .= "<option value='{$cat['catid']}'>({$cat['catcod']}) {$cat['cat']}</option>";
}
}
$cat_drop .= "</select>";
}
# Select classification
$classsql = "SELECT * FROM stockclass WHERE div = '" . USER_DIV . "' ORDER BY classname ASC";
$clasRslt = db_exec($classsql);
if (pg_numrows($clasRslt) < 1) {
$class_drop = "<input type='hidden' name='filter_class' value='0'>";
} else {
$class_drop = "<select name='filter_class' style='width: 167'>";
$class_drop .= "<option value='0'>All Classifications</option>";
while ($clas = pg_fetch_array($clasRslt)) {
if (isset($filter_class) and $filter_class == $clas['clasid']) {
$class_drop .= "<option value='{$clas['clasid']}' selected>{$clas['classname']}</option>";
} else {
$class_drop .= "<option value='{$clas['clasid']}'>{$clas['classname']}</option>";
}
}
$class_drop .= "</select>";
}
$display_optional_filters = "\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Select Category</td>\n\t\t\t\t\t<td>{$cat_drop}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Select Classification</td>\n\t\t\t\t\t<td>{$class_drop}</td>\n\t\t\t\t</tr>";
}
db_conn("exten");
$sql = "SELECT whid, whname, whno FROM warehouses WHERE div = '" . USER_DIV . "' ORDER BY whname ASC";
$whRslt = db_exec($sql);
if (pg_numrows($whRslt) < 1) {
$store_drop = "<input type='hidden' name='filter_store' value='0'>";
} else {
if (!isset($filter_store)) {
# check if setting exists
db_connect();
$sql = "SELECT value FROM set WHERE label = 'DEF_WH' AND div = '" . USER_DIV . "'";
$Rslt = db_exec($sql) or errDie("Unable to check database for existing settings.");
if (pg_numrows($Rslt) > 0) {
$set = pg_fetch_array($Rslt);
$filter_store = $set['value'];
}
}
$store_drop = "<select name='filter_store'>";
$store_drop .= "<option value='0'>All Stores</option>";
while ($wh = pg_fetch_array($whRslt)) {
if ($wh['whid'] == $filter_store) {
$store_drop .= "<option value='{$wh['whid']}' selected>({$wh['whno']}) {$wh['whname']}</option>";
} else {
$store_drop .= "<option value='{$wh['whid']}'>({$wh['whno']}) {$wh['whname']}</option>";
}
}
$store_drop .= "</select>";
}
$ajaxOut = "\n\t\t\t<input type='hidden' name='letters' value='{$letters}'>\n\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t<tr>\n\t\t\t\t\t<th colspan='2'> Customer Details </th>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Department</td>\n\t\t\t\t\t<td valign='center'>{$dept['deptname']}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Account No.</td>\n\t\t\t\t\t<td valign='center'>{$cust['accno']}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Customer</td>\n\t\t\t\t\t<td valign='center'>{$customers}</td>\n\t\t\t\t\t{$custedit}\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td valign='top'>Customer Branch</td>\n\t\t\t\t\t<td valign='center'>{$branchdrop}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td valign='top'>Customer Address</td>\n\t\t\t\t\t<td valign='center'>" . nl2br($cust['addr1']) . "</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td valign='top'>Current Delivery Address</td>\n\t\t\t\t\t<td valign='center'>" . nl2br($cust_del_addr) . "</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td valign='top'>Delivery Address</td>\n\t\t\t\t\t<td valign='center'>\n\t\t\t\t\t\t<input type='button' onClick=\"\n\t\t\t\t\t\t\tvar windowReference;\n\n\t\t\t\t\t\t\tfunction openPopup() {\n\t\t\t\t\t\t\t\twindowReference = window.open('cust-credit-stockinv-deladdr.php?invid={$invid}','windowName','width=500,height=400,status=1');\n\t\t\t\t\t\t\t\tif (!windowReference.opener)\n\t\t\t\t\t\t\t\t\twindowReference.opener = self;\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\topenPopup();\" value='Change Delivery Address'>\n\t\t\t\t\t</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Customer Order number</td>\n\t\t\t\t\t<td valign='center'><input type='text' size='10' name='cordno' value='{$inv['cordno']}'></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Customer VAT Number</td>\n\t\t\t\t\t<td>{$cust['vatnum']}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<th colspan='2'>Point of Sale</th>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Barcode</td>\n\t\t\t\t\t<td><input type='text' size='13' name='bar' value=''></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Print Delivery Note</td>\n\t\t\t\t\t<td><input type='checkbox' name='printdel' {$chp}></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Select Using</td>\n\t\t\t\t\t<td>Stock Code<input type='radio' name='sel_frm' value='stkcod' onChange='javascript:document.form.submit();' {$sel_frm_cod}><br>Stock Description<input type='radio' name='sel_frm' value='stkdes' onChange='javascript:document.form.submit();' {$sel_frm_des}></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr><td><br></td></tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<th colspan='2'>Additional Filters</th>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Select Store</td>\n\t\t\t\t\t<td>{$store_drop}</td>\n\t\t\t\t</tr>\n\t\t\t\t{$display_optional_filters}\n\t\t\t\t<tr class='" . bg_class() . "' " . ass("Type the first letters of the stock code you are looking for.") . ">\n\t\t\t\t\t<td>Stock Filter</td>\n\t\t\t\t\t<td nowrap><input type='text' size='13' name='ria' value='{$ria}'> <input type='submit' value='Search'> <input type='submit' name='ria' value='Show All'></td>\n\t\t\t\t</tr>\n\t\t\t</table>";
} else {
db_conn("exten");
$sql = "SELECT * FROM departments WHERE div = '" . USER_DIV . "' ORDER BY deptname ASC";
$deptRslt = db_exec($sql) or errDie("Unable to view customers");
if (pg_numrows($deptRslt) < 1) {
return "<li class='err'>There are no Departments found in Cubit.</li>";
} else {
$depts = "<select name='deptid' id='deptid'>";
$depts .= "<option value='0'>All Departments</option>";
while ($dept = pg_fetch_array($deptRslt)) {
$depts .= "<option value='{$dept['deptid']}'>{$dept['deptname']}</option>";
}
$depts .= "</select>";
}
if (!isset($ajax_err)) {
$ajax_err = "";
}
$ajaxOut = "\n\t\t\t<script>\n\t\t\t\tfunction updateCustSelection() {\n\t\t\t\t\tdeptid = getObject('deptid').value;\n\t\t\t\t\tletters = getObject('letters').value;\n\t\t\t\t\tctyp = getObject('ctypintl').checked;\n\t\t\t\t\tif (ctyp) {\n\t\t\t\t\t\tdocument.location.href='intinvoice-new.php?' + 'letters=' + letters + '&deptid=' + deptid + '&ctyp=' + ctyp + '&invid={$invid}';\n\t\t\t\t\t} else {\n\t\t\t\t\t\tajaxRequest('" . SELF . "', 'cust_selection', AJAX_SET, 'letters='+letters+'&deptid='+deptid+'&ctyp='+ctyp+'&invid={$invid}');\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t</script>\n\t\t\t{$ajax_err}\n\t\t\t<form name='cusselfrm'>\n\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t<tr>\n\t\t\t\t\t<th colspan='2'>Customer Selection</th>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Select Department</td>\n\t\t\t\t\t<td valign='center'>{$depts}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>First Letters of customer</td>\n\t\t\t\t\t<td valign='center'><input type='text' size='5' id='letters' maxlength='5'></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Customer is International</td>\n\t\t\t\t\t<td valign='center'><input type='checkbox' id='ctypintl'></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<td><br /></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<td></td>\n\t\t\t\t\t<td valign='center'><input type='button' value='Update »' onClick='updateCustSelection();'></td>\n\t\t\t\t</tr>\n\t\t\t</table>\n\t\t\t</form>";
}
$avcred = sprint($avcred);
if (isset($addprodBtn) or isset($addnon) or isset($saveBtn) or isset($upBtn) or isset($ria)) {
$jump_bot = "\n\t\t\t<script>\n\t\t\t\twindow.location.hash='bottom';\n\t\t\t</script>";
} else {
$jump_bot = "";
}
$details_end = "\n\t\t\t\t\t\t</div>\n\t\t\t\t\t</td>\n\t\t\t\t\t<td valign='top' align='right' width='50%'>\n\t\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t<th colspan='2'> Invoice Details </th>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Invoice No.</td>\n\t\t\t\t\t\t\t\t<td valign='center'>TI {$inv['invid']}</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Proforma Inv No.</td>\n\t\t\t\t\t\t\t\t<td valign='center'><input type='text' size='5' name='docref' value='{$inv['docref']}'></td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Sales Order No.</td>\n\t\t\t\t\t\t\t\t<td valign='center'><input type='text' size='5' name='ordno' value='{$inv['ordno']}'></td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>VAT Inclusive</td>\n\t\t\t\t\t\t\t\t<td valign='center'>Yes <input type='radio' size='7' name='chrgvat' value='inc' {$chin}> No<input type='radio' size='7' name='chrgvat' value='exc' {$chex}></td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Terms</td>\n\t\t\t\t\t\t\t\t<td valign='center'>{$termssel} Days</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Sales Person</td>\n\t\t\t\t\t\t\t\t{$sales}\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Invoice Date</td>\n\t\t\t\t\t\t\t\t<td valign='center'>" . mkDateSelect("inv_date", $inv_date_year, $inv_date_month, $inv_date_day) . "</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Available Credit</td>\n\t\t\t\t\t\t\t\t<td>" . CUR . " {$avcred}</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Trade Discount</td>\n\t\t\t\t\t\t\t\t<td valign='center'><input type='text' size='5' name='traddisc' value='{$inv['traddisc']}'>%</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Delivery Charge</td>\n\t\t\t\t\t\t\t\t<td valign='center'><input type='text' size='7' name='delchrg' value='{$inv['delchrg']}'>{$Vatcodes}</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Delivery Date</td>\n\t\t\t\t\t\t\t\t<td valign='center'>" . mkDateSelect("del_date", $deldate[0], $deldate[1], $deldate[2]) . "</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t</table>\n\t\t\t\t\t</td>\n\t\t\t\t</tr>\n\t\t\t\t" . TBL_BR . "\n\t\t\t\t<tr>\n\t\t\t\t\t<td colspan='2'>{$products}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<td>\n\t\t\t\t\t\t<p>\n\t\t\t\t\t\t<table " . TMPL_tblDflts . " width='100%'>\n\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t<th width='25%'>Quick Links</th>\n\t\t\t\t\t\t\t\t<th width='25%'>Comments</th>\n\t\t\t\t\t\t\t\t<td rowspan='5' valign='top' width='50%'>{$error}</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t<td class='" . bg_class() . "'><a href='customers-new.php?re={$inv['invid']}'>New Customer</a></td>\n\t\t\t\t\t\t\t\t<td class='" . bg_class() . "' rowspan='5' align='center' valign='top'><textarea name='comm' rows='4' cols='20'>{$comm}</textarea></td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t<td class='" . bg_class() . "'><a href='cust-credit-stockinv.php'>New Invoice</a></td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td><a href='invoice-view.php'>View Invoices</a></td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td><a href='settings/cust-credit-stockinv-newsetting.php?change=yes'>Change Invoice Complete Setting</a></td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<script>document.write(getQuicklinkSpecial());</script>\n\t\t\t\t\t\t</table>\n\t\t\t\t\t</td>\n\t\t\t\t\t<td align='right' valign='top'>\n\t\t\t\t\t\t<table " . TMPL_tblDflts . " width='50%'>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>SUBTOTAL</td>\n\t\t\t\t\t\t\t\t<td align='right' nowrap>" . CUR . " <input type='hidden' name='SUBTOT' value='{$SUBTOT}'>{$SUBTOT}</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Trade Discount</td>\n\t\t\t\t\t\t\t\t<td align='right' nowrap>" . CUR . " {$inv['discount']}</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>Delivery Charge</td>\n\t\t\t\t\t\t\t\t<td align='right' nowrap>" . CUR . " {$inv['delivery']}</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td><b>VAT {$vat14}</b></td>\n\t\t\t\t\t\t\t\t<td align='right' nowrap>" . CUR . " {$VAT}</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<th>GRAND TOTAL</th>\n\t\t\t\t\t\t\t\t<td align='right' nowrap>" . CUR . " {$TOTAL}</td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t</table>\n\t\t\t\t\t</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<td align='right'><input name='addprodBtn' type='submit' value='Add Product'> | <input name='addnon' type='submit' value='Add Non stock Product'> | <input type='submit' name='saveBtn' value='Save'> </td>\n\t\t\t\t\t<td nowrap>| <input type='submit' name='upBtn' value='Update'>{$done}</td>\n\t\t\t\t</tr>\n\t\t\t</table>\n\t\t\t<a name='bottom'>\n\t\t\t</form>\n\t\t\t</center>\n\t\t\t{$jump_bot}";
if (!isset($reload)) {
$reload = FALSE;
$send_override = "";
}
if ($reload) {
$details_end .= "\n\t\t\t\t\t\t{$send_override}\n\t\t\t\t\t\t<script>\n\t\t\t\t\t\t\tonLoad=document.form.submit();\n\t\t\t\t\t\t</script>\n\t\t\t\t\t";
}
if (AJAX) {
return $ajaxOut;
} else {
return "{$details_begin}{$ajaxOut}{$details_end}";
}
}
function details($_POST, $error = "")
{
# get vars
foreach ($_POST as $key => $value) {
${$key} = $value;
}
# Validate input
require_lib("validate");
$v = new validate();
$v->isOk($purid, "num", 1, 20, "Invalid Non-Stock Order number.");
if (isset($ctyp) && $ctyp == 's') {
$v->isOk($supid, "num", 1, 20, "Invalid supplier account number.");
} elseif (isset($ctyp) && $ctyp == 'c') {
$v->isOk($deptid, "num", 1, 20, "Invalid Department.");
}
# display errors, if any
if ($v->isError()) {
$errors = $v->getErrors();
foreach ($errors as $e) {
$error .= "<li class=err>" . $e["msg"];
}
return slct($_POST, $error);
$confirm = "{$error}<p><input type=button onClick='JavaScript:history.back();' value='« Correct submission'>";
return $confirm;
}
# Get Order info
db_connect();
$sql = "SELECT * FROM nons_purchases WHERE purid = '{$purid}' AND div = '" . USER_DIV . "'";
$purRslt = db_exec($sql) or errDie("Unable to get Order information");
if (pg_numrows($purRslt) < 1) {
return "<li class=err>purchase Not Found</li>";
}
$pur = pg_fetch_array($purRslt);
# check if Order has been printed
if ($pur['received'] == "y") {
$error = "<li class=err> Error : Order number <b>{$purid}</b> has already been received.";
$error .= "<p><input type=button onClick='JavaScript:history.back();' value='« Correct submission'>";
return $error;
}
/* --- Start Drop Downs --- */
# days drop downs
$days = array("30" => "30", "60" => "60", "90" => "90", "120" => "120");
$termssel = extlib_cpsel("terms", $days, $pur['terms']);
# format date
list($pyear, $pmon, $pday) = explode("-", $pur['pdate']);
$supacc = "<select name='supacc'>";
core_connect();
$sql = "SELECT * FROM accounts WHERE div = '" . USER_DIV . "' ORDER BY accname ASC";
$accRslt = db_exec($sql);
if (pg_numrows($accRslt) < 1) {
return "<li>There are No accounts in Cubit.";
}
while ($acc = pg_fetch_array($accRslt)) {
# Check Disable
if (isDisabled($acc['accid'])) {
continue;
}
$supacc .= "<option value='{$acc['accid']}'>{$acc['topacc']}/{$acc['accnum']} - {$acc['accname']}</option>";
}
$supacc .= "</select>";
# Get selected supplier info
db_connect();
$hide = "";
if (isset($ctyp) && $ctyp == 's') {
$sql = "SELECT * FROM suppliers WHERE supid = '{$supid}' AND div = '" . USER_DIV . "'";
$supRslt = db_exec($sql) or errDie("Unable to get supplier");
if (pg_numrows($supRslt) < 1) {
$error = "<li class=err> Supplier not Found.";
$confirm .= "{$error}<p><input type=button onClick='JavaScript:history.back();' value='« Correct submission'>";
return $confirm;
} else {
$sup = pg_fetch_array($supRslt);
$pur['supplier'] = $sup['supname'];
$pur['supaddr'] = $sup['supaddr'];
$supacc = $sup['supno'];
$hide = "<input type=hidden name=supid value='{$supid}'><input type=hidden name=ctyp value='{$ctyp}'>";
}
} elseif (isset($ctyp) && $ctyp == 'c') {
db_conn("exten");
$sql = "SELECT * FROM departments WHERE deptid = '{$deptid}'";
$deptRslt = db_exec($sql) or errDie("Unable to view customers");
if (pg_numrows($deptRslt) < 1) {
$error = "<li class=err> Department not Found.";
$confirm .= "{$error}<p><input type=button onClick='JavaScript:history.back();' value='« Correct submission'>";
return $confirm;
} else {
$dept = pg_fetch_array($deptRslt);
$supacc = "{$dept['deptname']} - Cash on Hand";
$hide = "<input type=hidden name=deptid value='{$deptid}'><input type=hidden name=ctyp value='{$ctyp}'>";
}
} elseif (isset($ctyp) && $ctyp == 'p') {
core_connect();
# Get Petty cash account
$cashacc = gethook("accnum", "bankacc", "name", "Petty Cash");
# Get account name for thy lame User's Sake
$accRslt = get("core", "*", "accounts", "accid", $cashacc);
if (pg_numrows($accRslt) < 1) {
return "<li class=err> Petty Cash Account not found.";
}
$acc = pg_fetch_array($accRslt);
$supacc = "{$acc['topacc']}/{$acc['accnum']} - {$acc['accname']}";
$hide = "<input type=hidden name=supacc value='{$cashacc}'><input type=hidden name=ctyp value='{$ctyp}'>";
}
/* --- End Drop Downs --- */
/* --- Start Products Display --- */
# select all products
$products = "\n\t<table cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' border=0 width=100%>\n\t<tr><th>ITEM NUMBER</th><th>DESCRIPTION</th><th>QTY RECEIVED</th><th>UNIT PRICE</th><th>DELIVERY DATE</th><th>AMOUNT</th><tr>";
# get selected stock in this Order
db_connect();
$sql = "SELECT *, (qty - rqty) as qty FROM nons_pur_items WHERE purid = '{$purid}' AND (qty - rqty) > 0 AND div = '" . USER_DIV . "'";
$stkdRslt = db_exec($sql);
$i = 0;
$key = 0;
while ($stkd = pg_fetch_array($stkdRslt)) {
# keep track of selected stock amounts
$amts[$i] = $stkd['amt'];
$i++;
list($syear, $smon, $sday) = explode("-", $stkd['ddate']);
# put in product
$products .= "<tr class='bg-odd'><td><input type=hidden size=4 name=cod[] value='{$stkd['cod']}'>{$stkd['cod']}</td><td>{$stkd['des']}</td><td><input type=hidden name=qts[] value='{$stkd['qty']}'><input type=text size=5 name=qtys[] value='{$stkd['qty']}'></td><td><input type=hidden size=4 name=unitcost[] value='{$stkd['unitcost']}'>{$stkd['unitcost']}</td><td>{$sday}-{$smon}-{$syear}</td><td>" . CUR . " {$stkd['amt']}</td></tr>";
$key++;
}
# look above(if i = 0 then there are no products)
if ($i == 0) {
$done = "";
}
$products .= "</table>";
/* --- End Products Display --- */
/* --- Start Some calculations --- */
# Get subtotal
$SUBTOT = sprint($pur['subtot']);
# Get Total
$TOTAL = sprint($pur['total']);
# Get vat
$VAT = sprint($pur['vat']);
/* --- End Some calculations --- */
db_conn('cubit');
$Sql = "SELECT * FROM assets WHERE (id = '{$pur['assid']}' AND div = '" . USER_DIV . "')";
$Rslt = db_exec($Sql) or errDie("Unable to access database.");
if (pg_numrows($Rslt) < 1) {
return "<li class=err> - Asset not Found";
}
$asset = pg_fetch_array($Rslt);
/* -- Final Layout -- */
$details = "<center><h3>Non-Stock Asset Order received</h3>\n\t<form action='" . SELF . "' method=post name=form>\n\t<input type=hidden name=key value=update>\n\t<input type=hidden name=purid value='{$purid}'>\n\t{$hide}\n\t<table cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' border=0 width=95%>\n\t<tr><td valign=top>\n\t\t<table cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' border=0>\n\t\t\t<tr><th colspan=2> Supplier Details </th></tr>\n\t\t\t<tr class='bg-odd'><td>Supplier</td><td valign=center>{$pur['supplier']}</td></tr>\n\t\t\t<tr class='bg-even'><td>Supplier Address</td><td valign=center><pre>{$pur['supaddr']}</pre></td></tr>\n\t\t\t<tr class='bg-odd' " . ass("Select the account you wish to Credit") . "><td>Account</td><td>{$supacc}</td></tr>\n\t\t</table>\n\t</td><td valign=top align=right>\n\t\t<table cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' border=0>\n\t\t\t<tr><th colspan=2> Non-Stock Order Details </th></tr>\n\t\t\t<tr class='bg-even'><td>Asset</td><td valign=center>{$asset['des']}</td></tr>\n\t\t\t<tr class='bg-odd'><td>Non-Stock Order No.</td><td valign=center>{$pur['purnum']}</td></tr>\n\t\t\t<tr class='bg-even'><td>Delivery Ref No.</td><td valign=center><input type=text name=refno size=10 value='{$pur['refno']}'></td></tr>\n\t\t\t<tr class='bg-odd'><td>Terms</td><td valign=center>{$pur['terms']} Days</td></tr>\n\t\t\t<tr class='bg-even'><td>Date</td><td valign=center><input type=text size=2 name=pday maxlength=2 value='{$pday}'>-<input type=text size=2 name=pmon maxlength=2 value='{$pmon}'>-<input type=text size=4 name=pyear maxlength=4 value='{$pyear}'> DD-MM-YYYY</td></tr>\n\t\t\t<tr class='bg-odd'><td>VAT Inclusive</td><td valign=center>{$pur['vatinc']}</td></tr>\n\t\t\t<tr class='bg-even'><td>Delivery Charges</td><td valign=center>" . CUR . " <input type=text name=shipchrg size=10 value='{$pur['shipchrg']}'></td></tr>\n\t\t</table>\n\t</td></tr>\n\t<tr><td><br></td></tr>\n\t<tr><td colspan=2>{$products}</td></tr>\n\t<tr><td>\n\t\t<p>\n\t\t<table border=0 cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "'>\n\t\t\t<tr><th width=25%>Quick Links</th><th width=25%>Remarks</th><td rowspan=5 valign=top width=50%>{$error}</td></tr>\n\t\t\t<tr><td class='bg-odd'><a href='nons-purchase-new.php'>New Order</a></td><td class='bg-odd' rowspan=4 align=center valign=top><textarea name=remarks rows=4 cols=20>{$pur['remarks']}</textarea></td></tr>\n\t\t\t<tr class='bg-odd'><td><a href='nons-purchase-view.php'>View Orders</a></td></tr>\n\t\t\t<script>document.write(getQuicklinkSpecial());</script>\n\n\t\t</table>\n\t</td><td align=right>\n\t\t<table cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' border=0 width=80%>\n\t\t\t<tr class='bg-odd'><td>SUBTOTAL</td><td align=right>" . CUR . " {$SUBTOT}</td></tr>\n\t\t\t<tr class='bg-even'><td>Delivery Charges</td><td align=right>" . CUR . " {$pur['shipping']}</td></tr>\n\t\t\t<tr class='bg-odd'><td>VAT @ " . TAX_VAT . " %</td><td align=right>" . CUR . " {$pur['vat']}</td></tr>\n\t\t\t<tr class='bg-even'><th>GRAND TOTAL</th><td align=right>" . CUR . " {$TOTAL}</td></tr>\n\t\t</table>\n\t</td></tr>\n\t<tr><td align=right><input type=button value='« Back' onClick='javascript:history.back()'> | <input type=submit name='upBtn' value='Write'></td></tr>\n\t</table></form>\n\t</center>";
return $details;
}
function enter($err = "")
{
extract($_REQUEST);
$fields = grp(m("deptid", 0), m("accno", false), m("surname", ""), m("title", ""), m("location", ""), m("fcid", ""), m("category", 0), m("class", 0), m("init", ""), m("sales_rep", 0), m("paddr1", ""), m("addr1", ""), m("del_addr1", ""), m("comments", ""), m("vatnum", ""), m("contname", ""), m("bustel", ""), m("tel", ""), m("cellno", ""), m("fax", ""), m("email", ""), m("url", ""), m("pricelist", 0), m("traddisc", 0), m("setdisc", 0), m("chrgint", 0), m("overdue", 0), m("intrate", 0), m("o_year", date("Y")), m("o_month", date("m")), m("o_day", date("d")), m("credterm", 0), m("credlimit", ""), m("lead_source", 0), m("bankname", ""), m("branname", ""), m("brancode", ""), m("bankaccname", ""), m("bankaccno", ""), m("bankacctype", ""), m("team_id", 0), m("registration", ""));
if (isset($cusnum)) {
if ($cusnum == "-S") {
return "<li class='err'>Invalid Customer</li><br><input type='button' value='[X] Close' onClick=\"window.close();\">";
}
$qry = new dbSelect("customers", "cubit", grp(m("where", "cusnum='{$cusnum}'")));
$qry->run();
if ($qry->num_rows() <= 0) {
$OUT = "<li class='err'>Customer not found.</li>";
return $OUT;
}
$c = $qry->fetch_array();
$qry->free();
/* split the date into the fields */
list($c["o_year"], $c["o_month"], $c["o_day"]) = explode("-", $c["odate"]);
foreach ($fields as $k => $v) {
if (isset($c[$k])) {
$fields[$k] = $c[$k];
}
}
$cusid = "<input type='hidden' name='cusnum' value='{$cusnum}' />";
} else {
$cusid = "";
}
extract($fields, EXTR_SKIP);
/* get next available account number */
if ($accno === false) {
$lastid = pglib_lastid("cubit.customers", "cusnum");
$sql = "SELECT accno FROM cubit.customers WHERE cusnum = '{$lastid}' AND div = '" . USER_DIV . "'";
$accRslt = db_exec($sql);
if (pg_numrows($accRslt) < 1) {
do {
$lastid--;
# get last account number
$sql = "SELECT accno FROM cubit.customers WHERE cusnum = '{$lastid}' AND div = '" . USER_DIV . "'";
$accRslt = db_exec($sql);
if (pg_numrows($accRslt) < 1) {
$accno = "";
$naccno = "";
} else {
$acc = pg_fetch_array($accRslt);
$accno = $acc['accno'];
}
} while (strlen($accno) < 1 && $lastid > 1);
} else {
$acc = pg_fetch_array($accRslt);
$accno = $acc['accno'];
}
if (strlen($accno) > 0) {
$num = preg_replace("/[^\\d]+/", "", $accno);
$num++;
$chars = preg_replace("/[\\d]/", "", $accno);
$naccno = $chars . $num;
} else {
$naccno = 1;
}
$accno = $naccno;
}
/* customer categories */
$qry = qryCategory();
$cats = db_mksel($qry, "category", $category, "#catid", "#category");
/* customer class */
$qry = qryClass();
$classlist = db_mksel($qry, "class", $class, "#clasid", "#classname");
/* pricelists */
$qry = qryPricelist();
$pricelists = db_mksel($qry, "pricelist", $pricelist, "#listid", "#listname");
/* customer departments */
$qry = qryDepartment();
$depts = db_mksel($qry, "deptid", $deptid, "#deptid", "#deptname");
/* customer title */
$get_titles = "SELECT title FROM titles ORDER BY title";
$run_titles = db_exec($get_titles) or errDie("Unable to get title information.");
if (pg_numrows($run_titles) < 1) {
$titles = array("Mr" => "Mr", "Mrs" => "Mrs", "Miss" => "Miss");
} else {
$titles = array();
while ($tarr = pg_fetch_array($run_titles)) {
$titles[$tarr['title']] = $tarr['title'];
}
}
$titles = extlib_cpsel("title", $titles, $title);
/* credit terms */
$qry = new dbSelect("ct", "exten", grp(m("where", "div='" . USER_DIV . "'")));
$qry->run();
while ($cd = $qry->fetch_array()) {
$days[$cd['days']] = $cd['days'];
}
$credterms = extlib_cpsel("credterm", $days, $credterm);
// unset so we can use same array
unset($days);
/* overdue periods */
$qry = new dbSelect("od", "exten", grp(m("where", "div='" . USER_DIV . "'")));
$qry->run();
while ($cd = $qry->fetch_array()) {
$days[$cd['days']] = $cd['days'];
}
$overdues = extlib_cpsel("overdue", $days, $overdue);
/* customer is local/international */
$locs = grp(m("loc", "Local"), m("int", "International"));
$locsel = extlib_cpsel("location", $locs, $location);
/* currency */
$qry = qryCurrency();
$currsel = db_mksel($qry, "fcid", $fcid, "#fcid", "#descrip");
/* lead sources */
$select_source = extlib_cpsel("lead_source", crm_get_leadsrc(-1), $lead_source);
/* something from crm */
if (isset($_GET["crm"])) {
$ex = "<input type='hidden' name='crm' value='' />";
} else {
$ex = "";
}
/* sales rep selection */
$qry = qrySalesPerson();
$sales_reps = db_mksel($qry, "sales_rep", $sales_rep, "#salespid", "#salesp", "0:None");
if (!isset($re)) {
$re = "not";
} else {
$re = remval($re);
}
if (isset($cusnum)) {
$bran = "\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td>Branches</td>\n\t\t\t<td><input type='button' onClick=\"window.open('cust-branch-add.php?cusnum={$cusnum}','','width=380,height=300,status=1')\" value='Add Branch'><input type=button onClick=\"window.open('cust-branch-view.php?cusnum={$cusnum}','','width=500,height=400,status=1')\" value='View Branch'></td>\n\t\t</tr>";
} else {
$bran = "";
}
// Retrieve teams
$sql = "SELECT * FROM crm.teams ORDER BY name ASC";
$team_rslt = db_exec($sql) or errDie("Unable to retrieve teams.");
$team_sel = "<select name='team_id'>";
$team_sel .= "<option value='0'>[None]</option>";
while ($team_data = pg_fetch_array($team_rslt)) {
if ($team_id == $team_data["id"]) {
$sel = "selected";
} else {
$sel = "";
}
$team_sel .= "<option value='{$team_data['id']}' {$sel}>{$team_data['name']}</option>";
}
$team_sel .= "</select>";
// Layout
$OUT = "\n\t<form action='" . SELF . "' method='post'>\n\t\t{$err}\n\t\t<input type='hidden' name='key' value='confirm' />\n\t\t<input type='hidden' name='re' value='{$re}' />\n\t\t{$ex}\n\t\t{$cusid}\n\t\t" . onthespot_passon() . "\n\t<table cellpadding='0' cellspacing='0'>\n\t\t<tr>\n\t\t\t<th colspan='2'>Add Customer : Customer Details</th>\n\t\t</tr>\n\t\t<tr valign='top'>\n\t\t\t<td>\n\t\t\t<table " . TMPL_tblDflts . " width='100%'>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>" . REQ . "Department</td>\n\t\t\t\t\t<td>{$depts}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>" . REQ . "Acc No</td>\n\t\t\t\t\t<td><input type='text' size='20' name='accno' value='{$accno}' /></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>" . REQ . "Company/Name</td>\n\t\t\t\t\t<td><input type='text' size='20' name='surname' value='{$surname}' /></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>" . REQ . "Registration/ID</td>\n\t\t\t\t\t<td><input type='text' size='20' name='registration' value='{$registration}'></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>" . REQ . "Title {$titles}</td>\n\t\t\t\t\t<td>Initials <input type='text' size='15' name='init' value='{$init}' /></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>" . REQ . "Type</td>\n\t\t\t\t\t<td>{$locsel}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>" . REQ . "Currency</td>\n\t\t\t\t\t<td>{$currsel}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "' " . ass("Categories are used to group customers. For example: PTA,JHB,CT") . ">\n\t\t\t\t\t<td>" . REQ . "Category</td>\n\t\t\t\t\t<td>{$cats}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "' " . ass("Classifications are used to group customers. For example: Wholesale,Retail") . ">\n\t\t\t\t\t<td>" . REQ . "Classification</td>\n\t\t\t\t\t<td>{$classlist}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Link to Sales rep</td>\n\t\t\t\t\t<td>{$sales_reps}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td valign='top'>" . REQ . "Postal Address</td>\n\t\t\t\t\t<td valign='center'><textarea rows='4' cols='19' name='paddr1'>{$paddr1}</textarea></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td valign='top'>\n\t\t\t\t\t\t" . REQ . "Physical Address<br>\n\t\t\t\t\t\t<font size='-2'>\n\t\t\t\t\t\t\t<input style='width: 11px; height: 11px;' type='checkbox' name='addr_same' " . (isset($addr_same) ? "checked='t'" : "") . " />\n\t\t\t\t\t\t\tSame As Postal Address\n\t\t\t\t\t\t</font>\n\t\t\t\t\t</td>\n\t\t\t\t\t<td valign='center'><textarea rows='4' cols='19' name='addr1'>{$addr1}</textarea></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td valign='top'>Delivery Address</td>\n\t\t\t\t\t<td valign='center'><textarea rows='4' cols='19' name='del_addr1'>{$del_addr1}</textarea></td>\n\t\t\t\t</tr>\n\t\t\t\t{$bran}\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Team Permissions</td>\n\t\t\t\t\t<td>{$team_sel}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td valign='top'>Comments</td>\n\t\t\t\t\t<td valign='center'><textarea rows='4' cols='19' name='comments'>{$comments}</textarea></td>\n\t\t\t\t</tr>\n\t\t\t</table>\n\t\t\t</td>\n\t\t\t<td>\n\t\t\t<table " . TMPL_tblDflts . " width='100%'>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>" . REQ . "VAT Number</td>\n\t\t\t\t\t<td><input type='text' size='21' name='vatnum' value='{$vatnum}' /></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>" . REQ . "Business Tel.</td>\n\t\t\t\t\t<td><input type='text' size='21' name='bustel' value='{$bustel}' /></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Contact Name</td>\n\t\t\t\t\t<td><input type='text' size='21' name='contname' value='{$contname}' /></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Home Tel.</td>\n\t\t\t\t\t<td><input type='text' size='21' name='tel' value='{$tel}' /></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Cell No.</td>\n\t\t\t\t\t<td><input type='text' size='21' name='cellno' value='{$cellno}' /></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Fax No.</td>\n\t\t\t\t\t<td><input type='text' size='21' name='fax' value='{$fax}' /></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>E-mail</td>\n\t\t\t\t\t<td><input type='text' size='21' name='email' value='{$email}' /></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Web Address</td>\n\t\t\t\t\t<td>http://<input type='text' size='30' name='url' value='{$url}' /></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "' " . ass("When invoicing prices comes from the pricelist. Add more at stock settings.") . ">\n\t\t\t\t\t<td>" . REQ . "Price List</td>\n\t\t\t\t\t<td>{$pricelists}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td " . ass("This is the default discount on invoices, but can be changed per invoice") . ">Trade Discount <input type='text' size='6' name='traddisc' value='{$traddisc}' />%</td>\n\t\t\t\t\t<td>Settlement Discount <input type='text' size='7' name='setdisc' value='{$setdisc}' />%</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>" . REQ . "Charge Interest : Yes <input type='radio' name='chrgint' value='yes' " . ($chrgint == "yes" ? "checked='t'" : "") . " /> No<input type='radio' name='chrgint' value='no' " . ($chrgint != "yes" ? "checked='t'" : "") . " /></td>\n\t\t\t\t\t<td " . ass("Depending on interest settings, invoices older than this will get interest.") . ">Overdue {$overdues}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "' " . ass("Depending on interest settings, this is the interest this client will be charged.") . ">\n\t\t\t\t\t<td>Interest Rate</td>\n\t\t\t\t\t<td><input type='text' size='7' name='intrate' value='{$intrate}' />%</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Account Open Date</td>\n\t\t\t\t\t<td>" . mkDateSelect("o", $o_year, $o_month, $o_day) . "</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Credit Term {$credterms}</td>\n\t\t\t\t\t<td>Credit Limit: 0<input type='hidden' name='credlimit' value='0'/></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Lead Source</td>\n\t\t\t\t\t<td>{$select_source}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr><Td><br></td></tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<th colspan='2'> Bank Details</th>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Bank </td>\n\t\t\t\t\t<td><input type='text' size='20' name='bankname' value='{$bankname}'></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Branch</td>\n\t\t\t\t\t<td><input type='text' size='20' name='branname' value='{$branname}'></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Branch Code</td>\n\t\t\t\t\t<td><input type='text' size='20' name='brancode' value='{$brancode}'></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Account Name</td>\n\t\t\t\t\t<td><input type='text' size='20' name='bankaccname' value='{$bankaccname}'></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Account Number</td>\n\t\t\t\t\t<td><input type='text' size='20' name='bankaccno' value='{$bankaccno}'></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Account Type</td>\n\t\t\t\t\t<td><input type='text' size='20' name='bankacctype' value='{$bankacctype}'></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<td colspan='2' align='right'><input type='submit' value='Confirm »' /></td>\n\t\t\t\t</tr>\n\t\t\t</table>\n\t\t\t</form>\n\t\t\t</td>\n\t\t</tr>\n\t\t<tr>\n\t\t\t<td align='center'>\n\t\t\t\t</table>" . mkQuickLinks(ql("customers-view.php", "View Customers"));
return $OUT;
}
function cdetails($_GET)
{
# get vars
extract($_GET);
# validate input
require_lib("validate");
$v = new validate();
$v->isOk($invid, "num", 1, 20, "Invalid Invoice number.");
# display errors, if any
if ($v->isError()) {
$err = "";
$errors = $v->getErrors();
foreach ($errors as $e) {
$err .= "<li class='err'>" . $e["msg"] . "</li>";
}
$confirm .= "<p><input type='button' onClick='JavaScript:history.back();' value='« Correct submission'>";
return $confirm;
}
# Get Invoice info
db_connect();
$sql = "SELECT * FROM nons_invoices WHERE invid = '{$invid}' AND div = '" . USER_DIV . "'";
$invRslt = db_exec($sql) or errDie("Unable to get invoices information");
if (pg_numrows($invRslt) < 1) {
return "<i class='err'>Not Found</i>";
}
$inv = pg_fetch_array($invRslt);
$currs = getSymbol($inv['fcid']);
$details = "";
$sql = "SELECT * FROM customers WHERE cusnum = '{$inv['tval']}' AND div = '" . USER_DIV . "'";
$custRslt = db_exec($sql) or errDie("Unable to view customer");
$cust = pg_fetch_array($custRslt);
$details = "\n\t<table " . TMPL_tblDflts . ">\n\t\t<tr>\n\t\t\t<th colspan='2'> Customer Details </th>\n\t\t</tr>\n\t\t<input type='hidden' name='cusnum' value='{$cust['cusnum']}'>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td>Customer</td>\n\t\t\t<td valign='center'>{$cust['cusname']} {$cust['surname']}</td>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td>Customer Address</td>\n\t\t\t<td valign='center'><pre>{$cust['addr1']}</pre></td>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td>Customer VAT Number</td>\n\t\t\t<td valign='center'>{$cust['vatnum']}</td>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td>Customer Order number</td>\n\t\t\t<td valign='center'>{$inv['cordno']}</td>\n\t\t</tr>\n\t</table>";
$stkacc = "";
core_connect();
$sql = "SELECT * FROM accounts WHERE div = '" . USER_DIV . "' ORDER BY accname ASC";
$accRslt = db_exec($sql);
if (pg_numrows($accRslt) < 1) {
return "<li>There are No accounts in Cubit.</li>";
}
while ($acc = pg_fetch_array($accRslt)) {
if (isb($acc['accid'])) {
continue;
}
$stkacc .= "<option value='{$acc['accid']}'>{$acc['topacc']}/{$acc['accnum']} - {$acc['accname']}</option>";
}
$stkacc .= "</select>";
/* --- Start Products Display --- */
# Products layout
$products = "\n\t<table " . TMPL_tblDflts . " width='100%'>\n\t\t<tr>\n\t\t\t<th width='5%'>#</th>\n\t\t\t<th width='55%'>DESCRIPTION</th>\n\t\t\t<th width='10%'>QTY</th>\n\t\t\t<th width='10%'>UNIT PRICE</th>\n\t\t\t<th width='10%'>AMOUNT</th>\n\t\t\t<th width='10%'>ACCOUNT</th>\n\t\t<tr>";
# get selected stock in this Invoice
db_connect();
$sql = "SELECT * FROM nons_inv_items WHERE invid = '{$invid}' AND div = '" . USER_DIV . "'";
$stkdRslt = db_exec($sql);
$i = 0;
while ($stkd = pg_fetch_array($stkdRslt)) {
$i++;
# put in product
$products .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td align='center'>{$i}</td>\n\t\t\t\t<td>{$stkd['description']}</td>\n\t\t\t\t<td>{$stkd['qty']}</td>\n\t\t\t\t<td>{$inv['currency']} {$stkd['unitcost']}</td>\n\t\t\t\t<td>{$inv['currency']} {$stkd['amt']}</td>\n\t\t\t\t<td " . ass("Select the account you wish to Credit") . "><select name='stkaccs[{$stkd['id']}]'>{$stkacc}</td>\n\t\t\t</tr>";
}
$products .= "</table>";
/* --- Start Some calculations --- */
# Get subtotal
$SUBTOT = sprint($inv['subtot']);
# Get Total
$TOTAL = sprint($inv['total']);
# Get vat
$VAT = sprint($inv['vat']);
/* --- End Some calculations --- */
# format date
list($syear, $smon, $sday) = explode("-", $inv['sdate']);
/* -- Final Layout -- */
$details = "\n\t\t\t\t<center>\n\t\t\t\t<h3>Non-Stock Invoice Details</h3>\n\t\t\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t\t\t<input type='hidden' name='key' value='cconfirm'>\n\t\t\t\t\t<input type='hidden' name='invid' value={$invid}>\n\t\t\t\t<table " . TMPL_tblDflts . " width='95%'>\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<td valign='top'>{$details}</td>\n\t\t\t\t\t\t<td valign='top' align='right'>\n\t\t\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t\t<th colspan='2'> Non-Stock Invoice Details </th>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t<td>Non-Stock Invoice No.</td>\n\t\t\t\t\t\t\t\t\t<td valign='center'>T {$inv['invid']}</td>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t<td>Proforma Inv No.</td>\n\t\t\t\t\t\t\t\t\t<td valign='center'>{$inv['docref']}</td>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t<td>Date</td>\n\t\t\t\t\t\t\t\t\t<td valign='center'>{$sday}-{$smon}-{$syear}</td>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t<td>Foreign Currency</td>\n\t\t\t\t\t\t\t\t\t<td valign='center'>{$currs['symbol']} - {$currs['name']} Exchange rate " . CUR . " {$inv['xrate']}</td>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t<td>VAT Inclusive</td>\n\t\t\t\t\t\t\t\t\t<td valign='center'>{$inv['chrgvat']}</td>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t</table>\n\t\t\t\t\t\t</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t" . TBL_BR . "\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<td colspan='2'>{$products}</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<td>\n\t\t\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t\t<th width='40%'>Quick Links</th>\n\t\t\t\t\t\t\t\t\t<th width='45%'>Remarks</th>\n\t\t\t\t\t\t\t\t\t<td rowspan='5' valign='top' width='15%'><br></td>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t\t<td class='" . bg_class() . "'><a href='nons-invoice-new.php'>New Non-Stock Invoices</a></td>\n\t\t\t\t\t\t\t\t\t<td class='" . bg_class() . "' rowspan='4' align='center' valign='top'>" . nl2br($inv['remarks']) . "</td>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t<td><a href='nons-invoice-view.php'>View Non-Stock Invoices</a></td>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t<script>document.write(getQuicklinkSpecial());</script>\n\t\t\t\t\t\t\t</table>\n\t\t\t\t\t\t</td>\n\t\t\t\t\t\t<td align='right'>\n\t\t\t\t\t\t\t<table " . TMPL_tblDflts . " width='80%'>\n\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t<td>SUBTOTAL</td>\n\t\t\t\t\t\t\t\t\t<td align='right'>{$inv['currency']} {$inv['subtot']}</td>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t<td>VAT @ " . TAX_VAT . " %</td>\n\t\t\t\t\t\t\t\t\t<td align='right'>{$inv['currency']} {$inv['vat']}</td>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t<th>GRAND TOTAL</th>\n\t\t\t\t\t\t\t\t\t<td align='right'>{$inv['currency']} {$inv['total']}</td>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t</table>\n\t\t\t\t\t\t</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<td align='right'><input type='button' value='« Back' onClick='javascript:history.back()'> | <input type='submit' value='Continue »'></td>\n\t\t\t\t\t</tr>\n\t\t\t\t</table>\n\t\t\t\t</form>\n\t\t\t\t</center>";
return $details;
}
function acdetails($_GET)
{
# get vars
extract($_GET);
# validate input
require_lib("validate");
$v = new validate();
$v->isOk($invid, "num", 1, 20, "Invalid Invoice number.");
if (isset($ctyp) && $ctyp == 's') {
$v->isOk($cusnum, "num", 1, 20, "Invalid customer number.");
} elseif (isset($ctyp) && $ctyp == 'c') {
$v->isOk($deptid, "num", 1, 20, "Invalid Department.");
}
# display errors, if any
if ($v->isError()) {
$err = "";
$errors = $v->getErrors();
foreach ($errors as $e) {
$err .= "<li class='err'>" . $e["msg"] . "</li>";
}
$confirm = "{$err}<p><input type='button' onClick='JavaScript:history.back();' value='« Correct submission'>";
return $confirm;
}
# Get Invoice info
db_connect();
$sql = "SELECT * FROM nons_invoices WHERE invid = '{$invid}' AND div = '" . USER_DIV . "'";
$invRslt = db_exec($sql) or errDie("Unable to get invoices information");
if (pg_numrows($invRslt) < 1) {
return "<i class='err'>Not Found</i>";
}
$inv = pg_fetch_array($invRslt);
# CHECK IF THIS DATE IS IN THE BLOCKED RANGE
$blocked_date_from = getCSetting("BLOCKED_FROM");
$blocked_date_to = getCSetting("BLOCKED_TO");
if (strtotime($inv['odate']) >= strtotime($blocked_date_from) and strtotime($inv['odate']) <= strtotime($blocked_date_to) and !user_is_admin(USER_ID)) {
return "<li class='err'>Period Range Is Blocked. Only an administrator can process entries within this period.</li>";
}
$details = "";
if ($ctyp == 's') {
$sql = "SELECT * FROM customers WHERE cusnum = '{$cusnum}' AND div = '" . USER_DIV . "'";
$custRslt = db_exec($sql) or errDie("Unable to view customer");
$cust = pg_fetch_array($custRslt);
$details = "\n\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t<tr>\n\t\t\t\t\t<th colspan='2'> Customer Details </th>\n\t\t\t\t</tr>\n\t\t\t\t<input type='hidden' name='cusnum' value={$cusnum}>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Customer</td>\n\t\t\t\t\t<td valign='center'>{$cust['cusname']} {$cust['surname']}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Customer Address</td>\n\t\t\t\t\t<td valign='center'><pre>{$cust['addr1']}</pre></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Customer VAT Number</td>\n\t\t\t\t\t<td valign='center'>{$cust['vatnum']}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Customer Order number</td>\n\t\t\t\t\t<td valign='center'>{$inv['cordno']}</td>\n\t\t\t\t</tr>\n\t\t\t</table>";
} elseif ($ctyp == 'ac') {
// db_conn("exten");
// $sql = "SELECT * FROM departments WHERE deptid = '$deptid'";
// $deptRslt = db_exec ($sql) or errDie ("Unable to view customers");
// $dept = pg_fetch_array($deptRslt);
$details = "\n\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t<tr>\n\t\t\t\t\t<th colspan='2'> Customer Details </th>\n\t\t\t\t</tr>\n\t\t\t\t<input type='hidden' name='deptid' value='{$deptid}'>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Customer</td>\n\t\t\t\t\t<td valign='center'>{$inv['cusname']} </td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Customer Address</td>\n\t\t\t\t\t<td valign='center'><pre>{$inv['cusaddr']}</pre></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Customer VAT Number</td>\n\t\t\t\t\t<td valign='center'>{$inv['cusvatno']}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Customer Order number</td>\n\t\t\t\t\t<td valign='center'>{$inv['cordno']}</td>\n\t\t\t\t</tr>";
}
$stkacc = "";
core_connect();
$sql = "SELECT * FROM accounts WHERE div = '" . USER_DIV . "' ORDER BY accname ASC";
$accRslt = db_exec($sql);
if (pg_numrows($accRslt) < 1) {
return "<li>There are No accounts in Cubit.</li>";
}
while ($acc = pg_fetch_array($accRslt)) {
$stkacc .= "<option value='{$acc['accid']}'>{$acc['topacc']}/{$acc['accnum']} - {$acc['accname']}</option>";
}
$stkacc .= "</select>";
$details .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Select Account <input align='right' type='button' onClick=\"window.open('core/acc-new2.php?update_parent=yes','accounts','width=700, height=400');\" value='New Account'></td>\n\t\t\t\t<td valign='center'><select name='accountc'>{$stkacc}</select></td>\n\t\t\t</tr>\n\t\t</table>";
/* --- Start Products Display --- */
# Products layout
$products = "\n\t\t<table " . TMPL_tblDflts . " width='100%'>\n\t\t\t<tr>\n\t\t\t\t<th width='5%'>#</th>\n\t\t\t\t<th width='55%'>DESCRIPTION</th>\n\t\t\t\t<th width='10%'>QTY</th>\n\t\t\t\t<th width='10%'>UNIT PRICE</th>\n\t\t\t\t<th width='10%'>AMOUNT</th>\n\t\t\t\t<th width='10%'>ACCOUNT</th>\n\t\t\t<tr>";
# get selected stock in this Invoice
db_connect();
$sql = "SELECT * FROM nons_inv_items WHERE invid = '{$invid}' AND div = '" . USER_DIV . "'";
$stkdRslt = db_exec($sql);
$i = 0;
while ($stkd = pg_fetch_array($stkdRslt)) {
$i++;
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes WHERE id='{$stkd['vatex']}'";
$Ri = db_exec($Sl);
$vd = pg_fetch_array($Ri);
if (TAX_VAT != $vd['vat_amount'] and $vd['vat_amount'] != "0.00") {
$showvat = FALSE;
}
# put in product
$products .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td align='center'>{$i}</td>\n\t\t\t\t<td nowrap>{$stkd['description']}</td>\n\t\t\t\t<td>{$stkd['qty']}</td>\n\t\t\t\t<td nowrap>" . CUR . " {$stkd['unitcost']}</td>\n\t\t\t\t<td nowrap>" . CUR . " {$stkd['amt']}</td>\n\t\t\t\t<td " . ass("Select the account you wish to Credit") . "><select name='stkaccs[{$stkd['id']}]'>{$stkacc}</td>\n\t\t\t</tr>";
}
$products .= "</table>";
/* --- Start Some calculations --- */
# Get subtotal
$SUBTOT = sprint($inv['subtot']);
# Get Total
$TOTAL = sprint($inv['total']);
# Get vat
$VAT = sprint($inv['vat']);
/* --- End Some calculations --- */
# format date
list($syear, $smon, $sday) = explode("-", $inv['odate']);
if (!isset($showvat)) {
$showvat = TRUE;
}
if ($showvat == TRUE) {
$vat14 = AT14;
} else {
$vat14 = "";
}
/* -- Final Layout -- */
$details = "\n\t\t<center>\n\t\t<h3>Non-Stock Invoice Details</h3>\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t<input type='hidden' name='key' value='cconfirm'>\n\t\t\t<input type='hidden' name='invid' value='{$invid}'>\n\t\t\t<input type='hidden' name='ctyp' value='{$ctyp}'>\n\t\t<table " . TMPL_tblDflts . " width='95%'>\n\t\t\t<tr>\n\t\t\t\t<td valign='top'>{$details}</td>\n\t\t\t\t<td valign='top' align='right'>\n\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th colspan='2'> Non-Stock Invoice Details </th>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Non-Stock Invoice No.</td>\n\t\t\t\t\t\t\t<td valign='center'>T {$inv['invid']}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Proforma Inv No.</td>\n\t\t\t\t\t\t\t<td valign='center'>{$inv['docref']}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Date</td>\n\t\t\t\t\t\t\t<td valign='center'>{$sday}-{$smon}-{$syear}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>VAT Inclusive</td>\n\t\t\t\t\t\t\t<td valign='center'>{$inv['chrgvat']}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Terms</td>\n\t\t\t\t\t\t\t<td valign='center'>{$inv['terms']} Days</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t</table>\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr><td><br></td></tr>\n\t\t\t<tr>\n\t\t\t\t<td colspan='2'>{$products}</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td>\n\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th width='40%'>Quick Links</th>\n\t\t\t\t\t\t\t<th width='45%'>Remarks</th>\n\t\t\t\t\t\t\t<td rowspan='5' valign='top' width='15%'><br></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td align='center'><a href='nons-invoice-new.php'>New Non-Stock Invoices</a></td>\n\t\t\t\t\t\t\t<td class='" . bg_class() . "' rowspan='4' align='center' valign='top'>" . nl2br($inv['remarks']) . "</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td align='center'><a href='nons-invoice-view.php'>View Non-Stock Invoices</a></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<script>document.write(getQuicklinkSpecial());</script>\n\t\t\t\t\t</table>\n\t\t\t\t</td>\n\t\t\t\t<td align='right'>\n\t\t\t\t\t<table " . TMPL_tblDflts . " width='80%'>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>SUBTOTAL</td>\n\t\t\t\t\t\t\t<td align='right'>" . CUR . " {$inv['subtot']}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>VAT {$vat14}</td>\n\t\t\t\t\t\t\t<td align='right'>" . CUR . " {$inv['vat']}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<th>GRAND TOTAL</th>\n\t\t\t\t\t\t\t<td align='right'>" . CUR . " {$inv['total']}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t</table>\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td align='right'><input type='submit' value='Confirm »'></td>\n\t\t\t</tr>\n\t\t</table>\n\t\t</form>\n\t\t</center>";
return $details;
}
function details($_POST, $error = "")
{
# Get vars
extract($_POST);
# validate input
require_lib("validate");
$v = new validate();
if (isset($invid)) {
$v->isOk($invid, "num", 1, 20, "Invalid invoice number.");
}
if (isset($deptid)) {
$v->isOk($deptid, "num", 1, 20, "Invalid department number.");
}
if (isset($letters)) {
$v->isOk($letters, "string", 0, 5, "Invalid First 3 Letters.");
}
# display errors, if any
if ($v->isError()) {
$errors = $v->getErrors();
foreach ($errors as $e) {
$error .= "<li class='err'>{$e['msg']}</li>";
}
$confirm .= "{$error}<p><input type='button' onClick='JavaScript:history.back();' value='« Correct submission'>";
return $confirm;
}
if (!isset($deptid)) {
$deptid = 0;
} else {
if (isset($invid)) {
db_conn("cubit");
$sql = "UPDATE rec_invoices SET deptid='{$deptid}' WHERE invid='{$invid}' AND deptid<>'{$deptid}'";
db_exec($sql) or errDie("Error updating invoice department.");
}
}
if (!isset($invid)) {
$invid = create_dummy($deptid);
$stkerr = "0,0";
}
if (!isset($done)) {
$done = "";
}
if (!isset($stkerr)) {
$stkerr = "0,0";
}
# Get invoice info
db_connect();
$sql = "SELECT * FROM rec_invoices WHERE invid = '{$invid}' AND div = '" . USER_DIV . "'";
$invRslt = db_exec($sql) or errDie("Unable to get invoice information");
if (pg_numrows($invRslt) < 1) {
return "<li class='err'>Invoice Not Found</li>";
}
$inv = pg_fetch_array($invRslt);
# Get department
db_conn("exten");
$sql = "SELECT * FROM departments WHERE deptid = '{$inv['deptid']}' AND div = '" . USER_DIV . "'";
$deptRslt = db_exec($sql);
if (pg_numrows($deptRslt) < 1) {
$dept['deptname'] = "<li class='err'>Department not Found.</li>";
} else {
$dept = pg_fetch_array($deptRslt);
}
# Get selected Customer info
if (isset($letters)) {
db_connect();
$sql = "SELECT * FROM customers WHERE cusnum = '{$inv['cusnum']}' AND div = '" . USER_DIV . "'";
$custRslt = db_exec($sql) or errDie("Unable to view customer");
if (pg_numrows($custRslt) < 1) {
db_connect();
if ($inv['deptid'] == 0) {
$searchdept = "";
} else {
$searchdept = "deptid = '{$inv['deptid']}' AND ";
}
# Query server for customer info
$sql = "\n\t\t\t\tSELECT * FROM customers \n\t\t\t\tWHERE {$searchdept} location != 'int' AND lower(surname) LIKE lower('{$letters}%') AND blocked != 'yes' AND div = '" . USER_DIV . "' \n\t\t\t\tORDER BY surname";
$custRslt = db_exec($sql) or errDie("Unable to view customers");
if (pg_numrows($custRslt) < 1) {
$ajax_err = "<li class='err'>No customer names starting with <b>{$letters}</b> in database.</li>";
//return view_err($_POST, $err);
} else {
$customers = "<select name='cusnum' onChange='javascript:document.form.submit();'>";
$customers .= "<option value='-S' selected>Select Customer</option>";
while ($cust = pg_fetch_array($custRslt)) {
$customers .= "<option value='{$cust['cusnum']}'>{$cust['cusname']} {$cust['surname']}</option>";
}
$customers .= "</select>";
}
# Take care of the unset vars
$cust['addr1'] = "";
$cust['cusnum'] = "";
$cust['vatnum'] = "";
$cust['accno'] = "";
} else {
$cust = pg_fetch_array($custRslt);
$sql = "SELECT * FROM customers WHERE deptid = '{$inv['deptid']}' AND location != 'int' AND lower(surname) LIKE lower('{$letters}%') AND blocked != 'yes' AND div = '" . USER_DIV . "' ORDER BY surname";
$cusRslt = db_exec($sql) or errDie("Unable to view customers");
# Moarn if customer account has been blocked
if ($cust['blocked'] == 'yes') {
$error .= "<li class='err'>Error : Selected customer account has been blocked.</li>";
}
// $customers = "<input type=hidden name=cusnum value='$cust[cusnum]'>$cust[cusname] $cust[surname]";
$cusnum = $cust['cusnum'];
$customers = "<select name='cusnum' onChange='javascript:document.form.submit();'>";
// $customers .= "<option value='-S' selected>Select Customer</option>";
while ($cus = pg_fetch_array($cusRslt)) {
$sel = "";
if ($cust['cusnum'] == $cus['cusnum']) {
$sel = "selected";
}
$customers .= "<option value='{$cus['cusnum']}' {$sel}>{$cus['cusname']} {$cus['surname']}</option>";
}
$customers .= "</select>";
}
}
/* --- Start Drop Downs --- */
# Select warehouse
db_conn("exten");
// $whs = "<select name='whidss[]' onChange='javascript:document.form.submit();'>";
$whs = "<select name='whidss[]'>";
$sql = "SELECT * FROM warehouses WHERE div = '" . USER_DIV . "' ORDER BY whname ASC";
$whRslt = db_exec($sql);
if (pg_numrows($whRslt) < 1) {
return "<li class='err'> There are no Stores found in Cubit.</li>";
} else {
$whs .= "<option value='-S' disabled selected>Select Store</option>";
while ($wh = pg_fetch_array($whRslt)) {
if (!user_in_store_team($wh["whid"], USER_ID)) {
continue;
}
$whs .= "<option value='{$wh['whid']}'>({$wh['whno']}) {$wh['whname']}</option>";
}
}
$whs .= "</select>";
# Get sales people
db_conn("exten");
$sql = "SELECT * FROM salespeople WHERE div = '" . USER_DIV . "' ORDER BY salesp ASC";
$salespRslt = db_exec($sql) or errDie("Unable to get sales people.");
if (pg_numrows($salespRslt) < 1) {
return "<li class='err'> There are no Sales People found in Cubit.</li>";
} else {
$salesps = "<select name='salespn'>";
while ($salesp = pg_fetch_array($salespRslt)) {
if ($salesp['salesp'] == $inv['salespn']) {
$sel = "selected";
} else {
$sel = "";
}
$salesps .= "<option value='{$salesp['salesp']}' {$sel}>{$salesp['salesp']}</option>";
}
$salesps .= "</select>";
}
# Days drop downs
$days = array("0" => "0", "7" => "7", "14" => "14", "30" => "30", "60" => "60", "90" => "90", "120" => "120");
$termssel = extlib_cpsel("terms", $days, $inv['terms']);
# Keep the charge vat option stable
if ($inv['chrgvat'] == "inc") {
$chin = "checked=yes";
$chex = "";
$chno = "";
} elseif ($inv['chrgvat'] == "exc") {
$chin = "";
$chex = "checked=yes";
$chno = "";
} else {
$chin = "";
$chex = "";
$chno = "checked=yes";
}
# Format date
list($rinv_year, $rinv_month, $rinv_day) = explode("-", $inv['odate']);
/* --- End Drop Downs --- */
// get the ID of the first warehouse
db_conn("exten");
$sql = "SELECT whid FROM warehouses ORDER BY whid ASC LIMIT 1";
$rslt = db_exec($sql) or errDie("Error reading warehouses (FWH).");
if (pg_num_rows($rslt) > 0) {
$FIRST_WH = pg_fetch_result($rslt, 0, 0);
} else {
$FIRST_WH = "-S";
}
/* --- Start Products Display --- */
# Select all products
$products = "\n\t\t<table " . TMPL_tblDflts . " width='100%'>\n\t\t\t<tr>\n\t\t\t\t<th>STORE</th>\n\t\t\t\t<th>ITEM NUMBER</th>\n\t\t\t\t<th>VAT CODE</th>\n\t\t\t\t<th>DESCRIPTION</th>\n\t\t\t\t<th>QTY</th>\n\t\t\t\t<th>UNIT PRICE</th>\n\t\t\t\t<th>UNIT DISCOUNT</th>\n\t\t\t\t<th>AMOUNT</th>\n\t\t\t\t<th>Remove</th>\n\t\t\t<tr>";
# get selected stock in this invoice
db_connect();
$sql = "SELECT * FROM recinv_items WHERE invid = '{$invid}' AND div = '" . USER_DIV . "'";
$stkdRslt = db_exec($sql);
$i = 0;
$key = 0;
while ($stkd = pg_fetch_array($stkdRslt)) {
$stkd['account'] += 0;
if ($stkd['account'] != 0) {
# Keep track of selected stock amounts
$amts[$i] = $stkd['amt'];
$i++;
db_conn('core');
$Sl = "SELECT accid,topacc,accnum,accname FROM accounts WHERE acctype='I' ORDER BY accname";
$Ri = db_exec($Sl) or errDie("Unable to get accounts.");
$Accounts = "\n\t\t\t\t<select name='accounts[]'>\n\t\t\t\t\t<option value='0'>Select Account</option>";
while ($ad = pg_fetch_array($Ri)) {
if (isb($ad['accid'])) {
continue;
}
if ($ad['accid'] == $stkd['account']) {
$sel = "selected";
} else {
$sel = "";
}
$Accounts .= "<option value='{$ad['accid']}' {$sel}>{$ad['accname']}</option>";
}
$Accounts .= "</select>";
$sernos = "";
# Input qty if not serialised
$qtyin = "<input type='text' size='3' name='qtys[]' value='{$stkd['qty']}'>";
$viewcost = "<input type='text' size='8' name='unitcost[]' value='{$stkd['unitcost']}'>";
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t\t<select name='vatcodes[]'>\n\t\t\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($stkd['vatcode'] == $vd['id']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
# Put in product
$products .= "\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td colspan='2'>{$Accounts}<input type='hidden' name='whids[]' value='{$stkd['whid']}'></td>\n\t\t\t\t\t<td><input type='hidden' name='stkids[]' value='{$stkd['stkid']}'>{$Vatcodes}</td>\n\t\t\t\t\t<td><input type='text' size='20' name='descriptions[]' value='{$stkd['description']}'> {$sernos}</td>\n\t\t\t\t\t<td>{$qtyin}</td>\n\t\t\t\t\t<td>{$viewcost}</td>\n\t\t\t\t\t<td><input type='hidden' name='disc[]' value='{$stkd['disc']}'><input type='hidden' name='discp[]' value='{$stkd['discp']}'></td>\n\t\t\t\t\t<td nowrap><input type='hidden' name='amt[]' value='{$stkd['amt']}'> " . CUR . " " . sprint($stkd['amt']) . "</td>\n\t\t\t\t\t<td><input type='checkbox' name='remprod[]' value='{$key}'><input type='hidden' name='SCROLL' value='yes'></td>\n\t\t\t\t</tr>";
$key++;
} else {
# Keep track of selected stock amounts
$amts[$i] = $stkd['amt'];
$i++;
# Get warehouse name
db_conn("exten");
$sql = "SELECT whname FROM warehouses WHERE whid = '{$stkd['whid']}' AND div = '" . USER_DIV . "'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
# Get selected stock in this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE stkid = '{$stkd['stkid']}' AND div = '" . USER_DIV . "'";
$stkRslt = db_exec($sql);
$stk = pg_fetch_array($stkRslt);
$sernos = "<input type='hidden' name='sernos[]' value='{$stkd['serno']}'>{$stkd['serno']}";
# check permissions
if (perm("invoice-unitcost-edit.php")) {
$viewcost = "<input type='text' size='8' name='unitcost[]' value='{$stkd['unitcost']}'>";
} else {
$viewcost = "<input type='hidden' size='8' name='unitcost[]' value='{$stkd['unitcost']}'>{$stkd['unitcost']}";
}
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t\t<select name='vatcodes[]'>\n\t\t\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($stkd['vatcode'] == $vd['id']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
# Put in product
$products .= "\n\t\t\t\t<input type='hidden' name='accounts[]' value='0'>\n\t\t\t\t<input type='hidden' name='descriptions[]' value=''>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td><input type='hidden' name='whids[]' value='{$stkd['whid']}'>{$wh['whname']}</td>\n\t\t\t\t\t<td><input type='hidden' name='stkids[]' value='{$stkd['stkid']}'><a href='#bottom' onclick='openwindow(\"stock-amt-det.php?stkid={$stk['stkid']}\")'>{$stk['stkcod']}</a></td>\n\t\t\t\t\t{$sernos}\n\t\t\t\t\t<td>{$Vatcodes}</td>\n\t\t\t\t\t<td>" . extlib_rstr($stk['stkdes'], 30) . "</td>\n\t\t\t\t\t<td><input type='text' size='3' name='qtys[]' value='{$stkd['qty']}'></td>\n\t\t\t\t\t<td>{$viewcost}</td>\n\t\t\t\t\t<td><input type='text' size='4' name='disc[]' value='{$stkd['disc']}'> OR <input type='text' size='4' name='discp[]' value='{$stkd['discp']}' maxlength='5'>%</td>\n\t\t\t\t\t<td nowrap><input type='hidden' name='amt[]' value='{$stkd['amt']}'> " . CUR . " " . sprint($stkd['amt']) . "</td>\n\t\t\t\t\t<td><input type='checkbox' name='remprod[]' value='{$key}'><input type='hidden' name='SCROLL' value='yes'></td>\n\t\t\t\t</tr>";
$key++;
}
}
# Look above(remprod keys)
$keyy = $key;
# Look above(if i = 0 then there are no products)
if ($i == 0) {
$done = "";
} else {
$SCROLL = "yes";
}
# check if stock warehouse was selected
if (isset($whidss)) {
foreach ($whidss as $key => $whid) {
if (isset($stkidss[$key]) && $stkidss[$key] != "-S" && isset($cust['pricelist'])) {
# skip if not selected
if ($whid == "-S") {
continue;
}
# Get selected warehouse name
db_conn("exten");
$sql = "SELECT whname FROM warehouses WHERE whid = '{$whid}' AND div = '" . USER_DIV . "'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
# Get selected stock in this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE stkid = '{$stkidss[$key]}' AND div = '" . USER_DIV . "' ORDER BY stkcod ASC";
$stkRslt = db_exec($sql);
$stk = pg_fetch_array($stkRslt);
$sernos = "<input type='hidden' name='sernos[]' value=''>";
# Get price from price list if it is set
if (isset($cust['pricelist'])) {
# get selected stock in this warehouse
db_conn("exten");
$sql = "SELECT price FROM plist_prices WHERE listid = '{$cust['pricelist']}' AND stkid = '{$stk['stkid']}' AND div = '" . USER_DIV . "'";
$plRslt = db_exec($sql);
if (pg_numrows($plRslt) > 0) {
$pl = pg_fetch_array($plRslt);
$stk['selamt'] = $pl['price'];
}
}
/* -- Start Some Checks -- */
# check if they are selling too much
if ($stk['units'] - $stk['alloc'] < $qtyss[$key]) {
if (!in_array($stk['stkid'], explode(",", $stkerr))) {
if ($stk['type'] != 'lab') {
$stkerr .= ",{$stk['stkid']}";
$error .= "<li class='err'>Warning : Item number <b>{$stk['stkcod']}</b> does not have enough items available.</li>";
}
}
}
/* -- End Some Checks -- */
# Calculate the Discount discount
if ($discs[$key] < 1) {
if ($discps[$key] > 0) {
$discs[$key] = round($discps[$key] / 100 * $stk['selamt'], 2);
}
} else {
$discps[$key] = round($discs[$key] * 100 / $stk['selamt'], 2);
}
# Calculate amount
$amt[$key] = $qtyss[$key] * ($stk['selamt'] - $discs[$key]);
$stk['selamt'] = sprint($stk['selamt']);
# Check permissions
if (perm("invoice-unitcost-edit.php")) {
$viewcost = "<input type='text' size='8' name='unitcost[]' value='{$stk['selamt']}'>";
} else {
$viewcost = "<input type='hidden' size='8' name='unitcost[]' value='{$stk['selamt']}'>{$stk['selamt']}";
}
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t\t\t<select name='vatcodes[]'>\n\t\t\t\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($stk['vatcode'] == $vd['id']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
$amt[$key] = sprint($amt[$key]);
# Put in selected warehouse and stock
$products .= "\n\t\t\t\t\t<input type='hidden' name='accounts[]' value='0'>\n\t\t\t\t\t<input type='hidden' name='descriptions[]' value=''>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td><input type='hidden' name='whids[]' value='{$whid}'>{$wh['whname']}</td>\n\t\t\t\t\t\t<td><input type='hidden' name='stkids[]' value='{$stk['stkid']}'><a href='#bottom' onclick='openwindow(\"stock-amt-det.php?stkid={$stk['stkid']}\")'>{$stk['stkcod']}</a></td>\n\t\t\t\t\t\t{$sernos}\n\t\t\t\t\t\t<td>{$Vatcodes}</td>\n\t\t\t\t\t\t<td>" . extlib_rstr($stk['stkdes'], 30) . "</td>\n\t\t\t\t\t\t<td><input type='text' size='3' name='qtys[]' value='{$qtyss[$key]}'></td>\n\t\t\t\t\t\t<td>{$viewcost}</td>\n\t\t\t\t\t\t<td><input type='text' size='4' name='disc[]' value='{$discs[$key]}'> OR <input type='text' size='4' name='discp[]' value='{$discps[$key]}' maxlength='5'>%</td>\n\t\t\t\t\t\t<td nowrap><input type='hidden' name='amt[]' value='{$amt[$key]}'> " . CUR . " {$amt[$key]}</td>\n\t\t\t\t\t\t<td><input type='checkbox' name='remprod[]' value='{$keyy}'></td>\n\t\t\t\t\t</tr>";
$keyy++;
} elseif (isset($accountss[$key]) && $accountss[$key] != "0" && isset($cust['pricelist'])) {
db_conn('core');
$Sl = "SELECT * FROM accounts WHERE accid='{$accountss[$key]}'";
$Ri = db_exec($Sl) or errDie("Unable to get account data.");
if (pg_num_rows($Ri) < 1) {
return "invalid.";
}
$ad = pg_fetch_array($Ri);
# Calculate amount
$amt[$key] = sprint($qtyss[$key] * $unitcosts[$key]);
# Input qty if not serialised
$qtyin = "<input type='text' size='3' name='qtys[]' value='{$qtyss[$key]}'>";
# Check permissions
$viewcost = "<input type='text' size='8' name='unitcost[]' value='{$unitcosts[$key]}'>";
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t\t\t<select name='vatcodes[]'>\n\t\t\t\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($vatcodess[$key] == $vd['id']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
# Put in selected warehouse and stock
$products .= "\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td colspan='2'>{$ad['accname']}<input type='hidden' name='accounts[]' value='{$accountss[$key]}'><input type='hidden' name='whids[]' value='0'></td>\n\t\t\t\t\t\t<td>{$Vatcodes}<input type='hidden' name='stkids[]' value='0'></td>\n\t\t\t\t\t\t<td><input type='text' size='20' name='descriptions[]' value='{$descriptionss[$key]}'></td>\n\t\t\t\t\t\t<td>{$qtyin}</td>\n\t\t\t\t\t\t<td>{$viewcost}</td>\n\t\t\t\t\t\t<td><input type='hidden' name='disc[]' value='0'><input type='hidden' name='discp[]' value='0'></td>\n\t\t\t\t\t\t<td nowrap><input type='hidden' name='amt[]' value='{$amt[$key]}'> " . CUR . " {$amt[$key]}</td>\n\t\t\t\t\t\t<td><input type='checkbox' name='remprod[]' value='{$keyy}'></td>\n\t\t\t\t\t</tr>";
$keyy++;
} else {
if (!isset($diffwhBtn)) {
# skip if not selected
if ($whid == "-S") {
continue;
}
if (!isset($addnon)) {
# get warehouse name
db_conn("exten");
$sql = "SELECT whname FROM warehouses WHERE whid = '{$whid}' AND div = '" . USER_DIV . "'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
if (isset($ria) && $ria != "") {
$len = strlen($ria);
if ($ria == "Show All") {
$Wh = "";
$ria = "";
} else {
$Wh = "AND (lower(stkdes) LIKE lower('%{$ria}%')) OR (lower(stkcod) LIKE lower('%{$ria}%'))";
// $Wh = "AND lower(substr(stkcod,1,'$len'))=lower('$ria')";
}
} else {
$Wh = "AND FALSE";
$ria = "";
}
# get stock on this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE whid = '{$whid}' AND blocked = 'n' AND div = '" . USER_DIV . "' AND serd = 'no' {$Wh} ORDER BY stkcod ASC";
$stkRslt = db_exec($sql) or errDie("Unable to retrieve stocks from database.");
if (pg_numrows($stkRslt) < 1) {
$error .= "<li class='err'>There are no stock items in the selected warehouse.</li>";
continue;
}
if (pg_numrows($stkRslt) == 1) {
$ex = "selected";
} else {
$ex = "";
}
if (!isset($sel_frm) || $sel_frm == "stkcod") {
$cods = "<select class='width : 15'name='stkidss[]' onChange='javascript:document.form.submit();'>";
$cods .= "<option value='-S' disabled selected>Select Number</option>";
$count = 0;
while ($stk = pg_fetch_array($stkRslt)) {
$cods .= "<option value='{$stk['stkid']}'>{$stk['stkcod']} (" . sprint3($stk['units'] - $stk['alloc']) . ")</option>";
}
$cods .= "</select> ";
$descs = "";
} else {
$descs = "<select class='width : 15'name='stkidss[]' onChange='javascript:document.form.submit();'>";
$descs .= "<option value='-S' disabled selected>Select Description</option>";
$count = 0;
while ($stk = pg_fetch_array($stkRslt)) {
$descs .= "<option value='{$stk['stkid']}'>{$stk['stkdes']} (" . sprint3($stk['units'] - $stk['alloc']) . ")</option>";
}
$descs .= "</select> ";
$cods = "";
}
# put in drop down and warehouse
$products .= "\n\t\t\t\t\t\t\t<input type='hidden' name='accountss[]' value='0'>\n\t\t\t\t\t\t\t<input type='hidden' name='descriptionss[]' value=''>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td><input type='hidden' name='whidss[]' value='{$whid}'>{$wh['whname']}</td>\n\t\t\t\t\t\t\t\t<td>{$cods}</td>\n\t\t\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t\t\t<td>{$descs}</td>\n\t\t\t\t\t\t\t\t<td><input type='text' size='3' name='qtyss[]' value='1'></td>\n\t\t\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t\t\t<td><input type='text' size='4' name='discs[]' value='0'> OR <input type='text' size='4' name='discps[]' value='0' maxlength='5'>%</td>\n\t\t\t\t\t\t\t\t<td><input type='hidden' name='amts[]' value='0.00'>" . CUR . " 0.00</td>\n\t\t\t\t\t\t\t\t<td></td>\n\t\t\t\t\t\t\t</tr>";
} else {
db_conn('core');
$Sl = "SELECT accid,topacc,accnum,accname FROM accounts WHERE acctype='I' ORDER BY accname";
$Ri = db_exec($Sl) or errDie("Unable to get accounts.");
$Accounts = "\n\t\t\t\t\t\t\t<select name='accountss[]' onChange='javascript:document.form.submit();'>\n\t\t\t\t\t\t\t\t<option value='0'>Select Account</option>";
while ($ad = pg_fetch_array($Ri)) {
if (isb($ad['accid'])) {
continue;
}
$Accounts .= "<option value={$ad['accid']}>{$ad['accname']}</option>";
}
$Accounts .= "</select>";
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t\t\t\t\t<select name='vatcodess[]'>\n\t\t\t\t\t\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($vd['del'] == "Yes") {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
//<input type='hidden' name='stkidss[]' value=''>
$products .= "\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td colspan='2'>{$Accounts}<input type='hidden' name='whidss[]' value='{$FIRST_WH}'></td>\n\t\t\t\t\t\t\t\t<td>{$Vatcodes}</td>\n\t\t\t\t\t\t\t\t<td><input type='text' size='20' name='descriptionss[]'></td>\n\t\t\t\t\t\t\t\t<td><input type='text' size='3' name='qtyss[]' value='1'></td>\n\t\t\t\t\t\t\t\t<td><input type='text' name='unitcosts[]' size='7'></td>\n\t\t\t\t\t\t\t\t<td></td>\n\t\t\t\t\t\t\t\t<td>" . CUR . " 0.00</td>\n\t\t\t\t\t\t\t\t<td><input type='hidden' name='discs[]' value='0'><input type='hidden' name='discps[]' value='0' ></td>\n\t\t\t\t\t\t\t</tr>";
}
}
}
}
} else {
if (!(isset($diffwhBtn) || isset($addnon))) {
# check if setting exists
db_connect();
$sql = "SELECT value FROM set WHERE label = 'DEF_WH' AND div = '" . USER_DIV . "'";
$Rslt = db_exec($sql) or errDie("Unable to check database for existing settings.");
if (pg_numrows($Rslt) > 0) {
$set = pg_fetch_array($Rslt);
$whid = $set['value'];
if (isset($wtd) && $wtd != 0) {
$whid = $wtd;
}
# get selected warehouse name
db_conn("exten");
$sql = "SELECT whname FROM warehouses WHERE whid = '{$whid}' AND div = '" . USER_DIV . "'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
if (isset($ria) && $ria != "") {
$len = strlen($ria);
if ($ria == "Show All") {
$Wh = "";
$ria = "";
} else {
$Wh = "AND lower(substr(stkcod,1,'{$len}'))=lower('{$ria}')";
$ria = "";
}
} else {
$Wh = "";
$ria = "";
}
# get stock on this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE whid = '{$whid}' AND blocked = 'n' AND div = '" . USER_DIV . "' AND serd = 'no' {$Wh} ORDER BY stkcod ASC";
$stkRslt = db_exec($sql) or errDie("Unable to retrieve stocks from database.");
if (pg_numrows($stkRslt) < 1) {
if (!isset($err)) {
$err = "";
}
$err .= "<li>There are no stock items in the selected store.</li>";
//ontinue;
}
$stks = "<select name='stkidss[]' onChange='javascript:document.form.submit();'>";
$stks .= "<option value='-S' disabled selected>Select Number</option>";
$count = 0;
while ($stk = pg_fetch_array($stkRslt)) {
$stks .= "<option value='{$stk['stkid']}'>{$stk['stkcod']} (" . sprint3($stk['units'] - $stk['alloc']) . ")</option>";
}
$stks .= "</select> ";
$products .= "\n\t\t\t\t\t<input type='hidden' name='descriptionss[]' value=''>\n\t\t\t\t\t<input type='hidden' name='vatcodess[]' value=''>\n\t\t\t\t\t<input type='hidden' name='accountss[]' value='0'>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td><input type='hidden' name='whidss[]' value='{$whid}'>{$wh['whname']}</td>\n\t\t\t\t\t\t<td>{$stks}</td>\n\t\t\t\t\t\t<td></td>\n\t\t\t\t\t\t<td></td>\n\t\t\t\t\t\t<td><input type='hidden' size='3' name='qtyss[]' value='1'>1</td>\n\t\t\t\t\t\t<td></td>\n\t\t\t\t\t\t<td><input type='text' size='4' name='discs[]' value='0'> OR <input type='text' size='4' name='discps[]' value='0' maxlength='5'>%</td>\n\t\t\t\t\t\t<td>" . CUR . " 0.00</td>\n\t\t\t\t\t\t<td></td>\n\t\t\t\t\t</tr>";
} else {
$products .= "\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>{$whs}</td>\n\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t<td></td>\n\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t<td><input type='text' size='4' name='discs[]' value='0'> OR <input type='text' size='4' name='discps[]' value='0' maxlength='5'>%</td>\n\t\t\t\t\t\t<td>" . CUR . " 0.00</td>\n\t\t\t\t\t\t<td></td>\n\t\t\t\t\t</tr>";
}
} else {
if (isset($addnon)) {
db_conn('core');
$Sl = "SELECT accid,topacc,accnum,accname FROM accounts WHERE acctype='I' ORDER BY accname";
$Ri = db_exec($Sl) or errDie("Unable to get accounts.");
$Accounts = "\n\t\t\t\t<select name='accountss[]'>\n\t\t\t\t\t<option value='0'>Select Account</option>";
while ($ad = pg_fetch_array($Ri)) {
if (isb($ad['accid'])) {
continue;
}
$Accounts .= "<option value='{$ad['accid']}'>{$ad['accname']}</option>";
}
$Accounts .= "</select>";
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t\t<select name='vatcodess[]'>\n\t\t\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($vd['del'] == "Yes") {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
$products .= "\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td colspan='2'>{$Accounts}<input type='hidden' name='whidss[]' value='{$FIRST_WH}'></td>\n\t\t\t\t\t<input type='hidden' name='stkidss[]' value='-S'>\n\t\t\t\t\t<td>{$Vatcodes}</td>\n\t\t\t\t\t<td><input type='text' size='20' name='descriptionss[]'></td>\n\t\t\t\t\t<td><input type='text' size='3' name='qtyss[]' value='1'></td>\n\t\t\t\t\t<td><input type='text' name='unitcosts[]' size='7'></td>\n\t\t\t\t\t<td></td>\n\t\t\t\t\t<td>" . CUR . " 0.00</td>\n\t\t\t\t\t<td><input type='hidden' name='discs[]' value='0'><input type='hidden' name='discps[]' value='0'></td>\n\t\t\t\t</tr>";
}
}
}
/* -- start Listeners -- */
if (isset($diffwhBtn)) {
$products .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>{$whs}</td>\n\t\t\t\t<td> </td>\n\t\t\t\t<td></td>\n\t\t\t\t<td> </td>\n\t\t\t\t<td> </td>\n\t\t\t\t<td><input type='text' size='4' name='discs[]' value='0'> OR <input type='text' size='4' name='discps[]' value='0' maxlength='5'>%</td>\n\t\t\t\t<td>" . CUR . " 0.00</td>\n\t\t\t\t<td></td>\n\t\t\t</tr>";
}
/* -- End Listeners -- */
$products .= "</table>";
/* --- End Products Display --- */
/* --- Start Some calculations --- */
# Calculate subtotal
$SUBTOT = sprint($inv['subtot']);
# Calculate tradediscm
if ($inv['traddisc'] > 0) {
$traddiscm = sprint($inv['traddisc'] / 100 * ($SUBTOT + $inv['delchrg']));
} else {
$traddiscm = "0.00";
}
$VATP = TAX_VAT;
# Calculate subtotal
$SUBTOT = sprint($inv['subtot']);
$VAT = sprint($inv['vat']);
$TOTAL = sprint($inv['total']);
$inv['delchrg'] = sprint($inv['delchrg']);
/* --- End Some calculations --- */
/*--- Start checks --- */
# check only if the customer is selected
if (isset($cusnum) && $cusnum != "-S") {
#check againg credit limit
if ($TOTAL + $cust['balance'] > $cust['credlimit']) {
$error .= "<li class='err'>Warning : Customers Credit limit of <b>" . CUR . " " . sprint($cust["credlimit"]) . "</b> has been exceeded";
}
$avcred = $cust['credlimit'] - $cust['balance'];
} else {
$avcred = "0.00";
}
$inv['delvat'] += 0;
if ($inv['delvat'] == 0) {
$Sl = "SELECT * FROM vatcodes WHERE del='Yes'";
$Ri = db_exec($Sl) or errDie("Unable to get data.");
$vd = pg_fetch_array($Ri);
$inv['delvat'] = $vd['id'];
}
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t<select name='delvat'>\n\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($vd['id'] == $inv['delvat']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
db_conn('cubit');
$Sl = "SELECT * FROM costcenters";
$Ri = db_exec($Sl);
if (pg_num_rows($Ri) > 0) {
$ctd = "\n\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t<tr>\n\t\t\t\t\t<th>Cost Center</th>\n\t\t\t\t\t<th>Percentage</th>\n\t\t\t\t</tr>";
$i = 0;
while ($data = pg_fetch_array($Ri)) {
$Sl = "SELECT * FROM invc WHERE inv='{$invid}' AND cid='{$data['ccid']}'";
$Rq = db_exec($Sl);
$cd = pg_fetch_array($Rq);
$ctd .= "\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>{$data['centername']}</td>\n\t\t\t\t\t<td><input type='text' name='ct[{$data['ccid']}]' size='5' value='{$cd['amount']}'>%</td>\n\t\t\t\t</tr>";
$i++;
}
$ctd .= "</table>";
} else {
$ctd = "";
}
// Retrieve default comments from Cubit
if (empty($inv["comm"])) {
db_conn("cubit");
$sql = "SELECT value FROM settings WHERE constant='DEFAULT_COMMENTS'";
$commRslt = db_exec($sql) or errDie("Unable to retrieve default comment from Cubit.");
$comment = base64_decode(pg_fetch_result($commRslt, 0));
} else {
$comment = $inv["comm"];
}
if (!isset($showvat)) {
$showvat = TRUE;
}
if ($showvat == TRUE) {
$vat14 = AT14;
} else {
$vat14 = "";
}
// Which display method was selected
if (isset($sel_frm) && $sel_frm == "stkdes") {
$sel_frm_cod = "";
$sel_frm_des = "checked";
} else {
$sel_frm_cod = "checked";
$sel_frm_des = "";
}
/*--- Start checks --- */
/* -- Final Layout -- */
$details_begin = "\n\t\t<center>\n\t\t<h3>Recurring Invoice</h3>\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t<input type='hidden' name='key' value='update'>\n\t\t\t<input type='hidden' name='invid' value='{$invid}'>\n\t\t\t<input type='hidden' name='stkerr' value='{$stkerr}'>\n\t\t<table " . TMPL_tblDflts . " width='95%'>\n\t\t\t<tr>\n\t\t\t\t<td valign='top'>\n\t\t\t\t\t<div id='cust_selection'>";
if (empty($ajax_err) && (isset($cusnum) || AJAX)) {
if (isset($cusnum)) {
$OTS_OPT = onthespot_encode(SELF, "cust_selection", "deptid={$inv['deptid']}&letters={$letters}&cusnum={$cusnum}&invid={$invid}");
$custedit = "\n\t\t\t\t<td nowrap>\n\t\t\t\t\t<a href='javascript: popupSized(\"cust-edit.php?cusnum={$cusnum}&onthespot={$OTS_OPT}\", \"edit_cust\", 700, 630);'>\n\t\t\t\t\t\tEdit Customer Details\n\t\t\t\t\t</a>\n\t\t\t\t</td>";
} else {
$custedit = "";
}
$ajaxOut = "\n\t\t\t<input type='hidden' name='letters' value='{$letters}'>\n\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t<tr>\n\t\t\t\t\t<th colspan='2'> Customer Details </th>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Department</td>\n\t\t\t\t\t<td valign='center'>{$dept['deptname']}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Account No.</td>\n\t\t\t\t\t<td valign='center'>{$cust['accno']}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Customer</td>\n\t\t\t\t\t<td valign='center'>{$customers}</td>\n\t\t\t\t\t{$custedit}\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td valign='top'>Customer Address</td>\n\t\t\t\t\t<td valign='center'>" . nl2br($cust['addr1']) . "</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Customer Order number</td>\n\t\t\t\t\t<td valign='center'><input type='text' size='10' name='cordno' value='{$inv['cordno']}'></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Customer VAT Number</td>\n\t\t\t\t\t<td>{$cust['vatnum']}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<th colspan='2'>Point of Sale</th>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Barcode</td>\n\t\t\t\t\t<td><input type='text' size='13' name='bar' value=''></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Select Using</td>\n\t\t\t\t\t<td>Stock Code<input type='radio' name='sel_frm' value='stkcod' onChange='javascript:document.form.submit();' {$sel_frm_cod}><br>Stock Description<input type='radio' name='sel_frm' value='stkdes' onChange='javascript:document.form.submit();' {$sel_frm_des}></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "' " . ass("Type the first letters of the stock code you are looking for.") . ">\n\t\t\t\t\t<td>Stock Filter</td>\n\t\t\t\t\t<td nowrap><input type='text' size='13' name='ria' value='{$ria}'> <input type='submit' value='Search'> <input type='submit' name='ria' value='Show All'></td>\n\t\t\t\t</tr>\n\t\t\t</table>";
} else {
# Query server for depts
db_conn("exten");
$sql = "SELECT * FROM departments WHERE div = '" . USER_DIV . "' ORDER BY deptname ASC";
$deptRslt = db_exec($sql) or errDie("Unable to view customers");
if (pg_numrows($deptRslt) < 1) {
return "<li class='err'>There are no Departments found in Cubit.</li>";
} else {
$depts = "<select id='deptid'>";
$depts .= "<option value='0'>All Departments</option>";
while ($dept = pg_fetch_array($deptRslt)) {
$depts .= "<option value='{$dept['deptid']}'>{$dept['deptname']}</option>";
}
$depts .= "</select>";
}
if (!isset($ajax_err)) {
$ajax_err = "";
}
$ajaxOut = "\n\t\t\t<script>\n\t\t\t\tfunction updateCustSelection() {\n\t\t\t\t\tdeptid = getObject('deptid').value;\n\t\t\t\t\tletters = getObject('letters').value;\n\t\t\t\t\tajaxRequest('" . SELF . "', 'cust_selection', AJAX_SET, 'letters='+letters+'&deptid='+deptid+'&invid={$invid}');\n\t\t\t\t}\n\t\t\t</script>\n\t\t\t{$ajax_err}\n\t\t\t<table " . TMPL_tblDflts . " width='400'>\n\t\t\t\t<tr>\n\t\t\t\t\t<th colspan='2'>New Recurring Invoice</th>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Select Department</td>\n\t\t\t\t\t<td valign='center'>{$depts}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>First Letters of customer</td>\n\t\t\t\t\t<td valign='center'><input type='text' size='5' id='letters' maxlength='5'></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<td> </td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<td> </td>\n\t\t\t\t\t<td valign='center'><input type='button' value='Update' onClick='updateCustSelection();'></td>\n\t\t\t\t</tr>\n\t\t\t</table>";
}
if (isset($diffwhBtn) or isset($addprodBtn) or isset($addnon) or isset($upBtn) or isset($saveBtn) or isset($ria)) {
$jump_bot = "\n\t\t\t<script>\n\t\t\t\twindow.location.hash='bottom';\n\t\t\t</script>";
} else {
$jump_bot = "";
}
$details_end = "\n\t\t\t\t\t</div>\n\t\t\t\t</td>\n\t\t\t\t<td valign='top' align='right'>\n\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th colspan='2'> Invoice Details </th>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Invoice No.</td>\n\t\t\t\t\t\t\t<td valign='center'>RI {$inv['invid']}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Document Ref No.</td>\n\t\t\t\t\t\t\t<td valign='center'><input type='text' size='5' name='docref' value='{$inv['docref']}'></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Sales Order No.</td>\n\t\t\t\t\t\t\t<td valign='center'><input type='text' size='5' name='ordno' value='{$inv['ordno']}'></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>VAT Inclusive</td>\n\t\t\t\t\t\t\t<td valign='center'>Yes <input type='radio' size='7' name='chrgvat' value='inc' {$chin}> No<input type='radio' size='7' name='chrgvat' value='exc' {$chex}></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Terms</td>\n\t\t\t\t\t\t\t<td valign='center'>{$termssel} Days</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Sales Person</td>\n\t\t\t\t\t\t\t<td valign='center'>{$salesps}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Invoice Date</td>\n\t\t\t\t\t\t\t<td valign='center'>" . mkDateSelect("rinv", $rinv_year, $rinv_month, $rinv_day) . "</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Available Credit</td>\n\t\t\t\t\t\t\t<td>" . CUR . " " . sprint($avcred) . "</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Trade Discount</td>\n\t\t\t\t\t\t\t<td valign='center'><input type='text' size='5' name='traddisc' value='{$inv['traddisc']}'>%</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Delivery Charge</td>\n\t\t\t\t\t\t\t<td valign='center'><input type='text' size='7' name='delchrg' value='{$inv['delchrg']}'>{$Vatcodes}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<td colspan='2'>{$ctd}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t</table>\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr><td><br></td></tr>\n\t\t\t<tr>\n\t\t\t\t<td colspan='2'>{$products}</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td>\n\t\t\t\t\t<p>\n\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<td rowspan='2'>" . mkQuickLinks(ql("cust-credit-stockinv.php", "New Invoice"), ql("rec-invoice-view.php", "View Recurring Invoices"), ql("customers-new.php", "New Customer")) . "\n\t\t\t\t\t\t\t</td>\n\t\t\t\t\t\t\t<th width='25%'>Comments</th>\n\t\t\t\t\t\t\t<td rowspan='5' valign='top' width='50%'>{$error}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<td class='" . bg_class() . "' rowspan='4' align='center' valign='top'><textarea name='comm' rows='4' cols='20'>{$comment}</textarea></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t</table>\n\t\t\t\t</td>\n\t\t\t\t<td align='right' valign='top'>\n\t\t\t\t\t<table " . TMPL_tblDflts . " width='100%'>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>SUBTOTAL</td>\n\t\t\t\t\t\t\t<td align='right'>" . CUR . " <input type='hidden' name='SUBTOT' value='{$SUBTOT}'>{$SUBTOT}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Trade Discount</td>\n\t\t\t\t\t\t\t<td align='right' nowrap>" . CUR . " {$inv['discount']}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Delivery Charge</td>\n\t\t\t\t\t\t\t<td align='right' nowrap>" . CUR . " {$inv['delivery']}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td><b>VAT {$vat14}</b></td>\n\t\t\t\t\t\t\t<td align='right' nowrap>" . CUR . " {$VAT}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<th>GRAND TOTAL</th>\n\t\t\t\t\t\t\t<td align='right' nowrap>" . CUR . " {$TOTAL}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t</table>\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td align='right'><input name='diffwhBtn' type='submit' value='Different Store'> | <input name='addprodBtn' type='submit' value='Add Product'> | <input name='addnon' type='submit' value='Add Non stock Product'> | <input type='submit' name='upBtn' value='Update'> </td>\n\t\t\t\t<td> | <input type='submit' name='saveBtn' value='Save »'></td>\n\t\t\t</tr>\n\t\t</table>\n\t\t<a name='bottom'>\n\t\t</form>\n\t\t</center>\n\t\t{$jump_bot}";
if (AJAX) {
return $ajaxOut;
} else {
return "{$details_begin}{$ajaxOut}{$details_end}";
}
}
function details($_POST, $error = "")
{
extract($_POST);
# validate input
include "libs/validate.lib.php";
$v = new validate();
if (isset($sordid)) {
$v->isOk($sordid, "num", 1, 20, "Invalid sales order number.");
}
if (isset($deptid)) {
$v->isOk($deptid, "num", 1, 20, "Invalid department number.");
}
if (isset($letters)) {
$v->isOk($letters, "string", 0, 5, "Invalid First 3 Letters.");
}
# display errors, if any
if ($v->isError()) {
$errors = $v->getErrors();
foreach ($errors as $e) {
$error .= "<li class='err'>{$e['msg']}</li>";
}
$confirm .= "{$error}<p><input type='button' onClick='JavaScript:history.back();' value='« Correct submission'>";
return $confirm;
}
if (!isset($sordid)) {
$sordid = create_dummy($deptid);
$stkerr = "0,0";
}
if (!isset($proforma)) {
$proforma = "";
}
if (!isset($done)) {
$done = "";
}
# Get Sales Order info
db_connect();
$sql = "SELECT * FROM sorders WHERE sordid = '{$sordid}' AND div = '" . USER_DIV . "'";
$sordRslt = db_exec($sql) or errDie("Unable to get Sales Order information");
if (pg_numrows($sordRslt) < 1) {
return "<li class='err'>Sales Order Not Found</li>";
}
$sord = pg_fetch_array($sordRslt);
# check if Sales Order has been printed
if ($sord['accepted'] == "y") {
$error = "<li class='err'> Error : Sales Order number <b>{$sordid}</b> has already been printed.";
$error .= "<p><input type='button' onClick='JavaScript:history.back();' value='« Correct submission'>";
return $error;
}
# get department
db_conn("exten");
$sql = "SELECT * FROM departments WHERE deptid = '{$sord['deptid']}' AND div = '" . USER_DIV . "'";
$deptRslt = db_exec($sql);
if (pg_numrows($deptRslt) < 1) {
$dept['deptname'] = "<li class='err'>Department not Found.</li>";
} else {
$dept = pg_fetch_array($deptRslt);
}
# Get selected customer info
db_connect();
$sql = "SELECT * FROM customers WHERE cusnum = '{$sord['cusnum']}' AND div = '" . USER_DIV . "'";
$custRslt = db_exec($sql) or errDie("Unable to view customer");
if (pg_numrows($custRslt) < 1) {
db_connect();
if ($deptid == "0") {
$searchdept = "";
} else {
$searchdept = "deptid = '{$sord['deptid']}' AND ";
}
# Query server for customer info
$sql = "SELECT cusnum, cusname, surname FROM customers WHERE {$searchdept} location != 'int' AND lower(surname) LIKE lower('{$letters}%') AND div = '" . USER_DIV . "' ORDER BY surname";
$custRslt = db_exec($sql) or errDie("Unable to view customers");
if (pg_numrows($custRslt) < 1) {
$err = "<li class='err'>No customer names starting with <b>{$letters}</b> in database.</li>";
return view_err($_POST, $err);
} else {
$customers = "<select name='cusnum' onChange='javascript:document.form.submit();'>";
$customers .= "<option value='-S' selected>Select Customer</option>";
while ($cust = pg_fetch_array($custRslt)) {
$customers .= "<option value='{$cust['cusnum']}'>{$cust['cusname']} {$cust['surname']}</option>";
}
$customers .= "</select>";
}
# take care of the unset vars
$cust['addr1'] = "";
$cust['cusnum'] = "";
$cust['vatnum'] = "";
$cust['accno'] = "";
} else {
$cust = pg_fetch_array($custRslt);
# moarn if customer account has been blocked
if ($cust['blocked'] == 'yes') {
return "<li class='err'>Error : Selected customer account has been blocked.</li>";
}
$customers = "<input type='hidden' name='cusnum' value='{$cust['cusnum']}'>{$cust['cusname']} {$cust['surname']}";
$cusnum = $cust['cusnum'];
}
/* --- Start Drop Downs --- */
# Select warehouse
db_conn("exten");
// $whs = "<select name='whidss[]' onChange='javascript:document.form.submit();'>";
$whs = "<select name='whidss[]'>";
$sql = "SELECT * FROM warehouses WHERE div = '" . USER_DIV . "' ORDER BY whname ASC";
$whRslt = db_exec($sql);
if (pg_numrows($whRslt) < 1) {
return "<li class='err'> There are no Stores found in Cubit.</li>";
} else {
$whs .= "<option value='-S' disabled selected>Select Store</option>";
while ($wh = pg_fetch_array($whRslt)) {
if (!user_in_store_team($wh["whid"], USER_ID)) {
continue;
}
$whs .= "<option value='{$wh['whid']}'>({$wh['whno']}) {$wh['whname']}</option>";
}
}
$whs .= "</select>";
# get sales people
db_conn("exten");
$sql = "SELECT * FROM salespeople WHERE div = '" . USER_DIV . "' ORDER BY salesp ASC";
$salespRslt = db_exec($sql) or errDie("Unable to get sales people.");
if (pg_numrows($salespRslt) < 1) {
return "<li class='err'> There are no Sales People found in Cubit.</li>";
} else {
$salesps = "<select name='salespn'>";
while ($salesp = pg_fetch_array($salespRslt)) {
if ($salesp['salesp'] == $sord['salespn']) {
$sel = "selected";
} else {
$sel = "";
}
$salesps .= "<option value='{$salesp['salesp']}' {$sel}>{$salesp['salesp']}</option>";
}
$salesps .= "</select>";
}
# days drop downs
$days = array("0" => "0", "7" => "7", "14" => "14", "30" => "30", "60" => "60", "90" => "90", "120" => "120");
$termssel = extlib_cpsel("terms", $days, $sord['terms']);
# Keep the charge vat option stable
if ($sord['chrgvat'] == "inc") {
$chin = "checked=yes";
$chex = "";
$chno = "";
} elseif ($sord['chrgvat'] == "exc") {
$chin = "";
$chex = "checked=yes";
$chno = "";
} else {
$chin = "";
$chex = "";
$chno = "checked=yes";
}
if ($sord["display_costs"] == "yes") {
$dc_sel["yes"] = "checked";
$dc_sel["no"] = "";
} else {
$dc_sel["yes"] = "";
$dc_sel["no"] = "checked";
}
# format date
list($sord_year, $sord_month, $sord_day) = explode("-", $sord['odate']);
list($ddate_year, $ddate_month, $ddate_day) = explode("-", $sord["ddate"]);
/* --- End Drop Downs --- */
// get the ID of the first warehouse
db_conn("exten");
$sql = "SELECT whid FROM warehouses ORDER BY whid ASC LIMIT 1";
$rslt = db_exec($sql) or errDie("Error reading warehouses (FWH).");
if (pg_num_rows($rslt) > 0) {
$FIRST_WH = pg_fetch_result($rslt, 0, 0);
} else {
$FIRST_WH = "-S";
}
/* --- Start Products Display --- */
# select all products
$products = "\n\t\t<table " . TMPL_tblDflts . " width='100%'>\n\t\t\t<tr>\n\t\t\t\t<th>STORE</th>\n\t\t\t\t<th>ITEM NUMBER</th>\n\t\t\t\t<th>VAT CODE</th>\n\t\t\t\t<th>DESCRIPTION</th>\n\t\t\t\t<th>QTY</th>\n\t\t\t\t<th>UNIT PRICE</th>\n\t\t\t\t<th>UNIT DISCOUNT</th>\n\t\t\t\t<th>AMOUNT</th>\n\t\t\t\t<th>Remove</th>\n\t\t\t</tr>";
# get selected stock in this Sales Order
db_connect();
$sql = "SELECT * FROM sorders_items WHERE sordid = '{$sordid}' AND div = '" . USER_DIV . "'";
$stkdRslt = db_exec($sql);
$i = 0;
$key = 0;
while ($stkd = pg_fetch_array($stkdRslt)) {
$stkd['account'] += 0;
if ($stkd['account'] != 0) {
# Keep track of selected stock amounts
$amts[$i] = $stkd['amt'];
$i++;
$Accounts = "\n\t\t\t\t<select name='accounts[]'>\n\t\t\t\t\t<option value='0'>Select Account</option>";
$useaccdrop = getCSetting("USE_NON_STOCK_ACCOUNTS");
if (isset($useaccdrop) and $useaccdrop == "yes") {
db_connect();
$acc_sql = "SELECT * FROM non_stock_account_list ORDER BY accname";
$run_acc = db_exec($acc_sql) or errDie("Unable to get account information.");
if (pg_numrows($run_acc) > 0) {
while ($acc = pg_fetch_array($run_acc)) {
if ($acc['accid'] == $stkd['account']) {
$Accounts .= "<option value='{$acc['accid']}' selected>{$acc['accname']}</option>";
} else {
$Accounts .= "<option value='{$acc['accid']}'>{$acc['accname']}</option>";
}
}
$Accounts .= "</select>";
}
} else {
db_conn('core');
$Sl = "SELECT accid, topacc, accnum, accname FROM accounts WHERE acctype='I' ORDER BY accname";
$Ri = db_exec($Sl) or errDie("Unable to get accounts.");
while ($ad = pg_fetch_array($Ri)) {
if (isb($ad['accid'])) {
continue;
}
if ($ad['accid'] == $stkd['account']) {
$sel = "selected";
} else {
$sel = "";
}
$Accounts .= "<option value='{$ad['accid']}' {$sel}>{$ad['accname']}</option>";
}
$Accounts .= "</select>";
}
$sernos = "";
# Input qty if not serialised
$qtyin = "<input type='text' size='3' name='qtys[]' value='{$stkd['qty']}'>";
$stkd['unitcost'] = sprint($stkd['unitcost']);
$viewcost = "<input type='text' size='8' name='unitcost[]' value='{$stkd['unitcost']}'>";
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t\t<select name='vatcodes[]'>\n\t\t\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($stkd['vatcode'] == $vd['id']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
$stkd['amt'] = sprint($stkd['amt']);
# Put in product
$products .= "\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td colspan='2'>\n\t\t\t\t\t\t{$Accounts}\n\t\t\t\t\t\t<input type='hidden' name='whids[]' value='{$stkd['whid']}'>\n\t\t\t\t\t</td>\n\t\t\t\t\t<td><input type='hidden' name='stkids[]' value='{$stkd['stkid']}'>{$Vatcodes}</td>\n\t\t\t\t\t<td><input type='text' size='20' name='descriptions[]' value='{$stkd['description']}'> {$sernos}</td>\n\t\t\t\t\t<td>{$qtyin}</td>\n\t\t\t\t\t<td>{$viewcost}</td>\n\t\t\t\t\t<td><input type='hidden' name='disc[]' value='{$stkd['disc']}'><input type='hidden' name='discp[]' value='{$stkd['discp']}'></td>\n\t\t\t\t\t<td nowrap><input type='hidden' name='amt[]' value='{$stkd['amt']}'> " . CUR . " {$stkd['amt']}</td>\n\t\t\t\t\t<td><input type='checkbox' name='remprod[]' value='{$key}'><input type='hidden' name='SCROLL' value='yes'></td>\n\t\t\t\t</tr>";
$key++;
} else {
# keep track of selected stock amounts
$amts[$i] = $stkd['amt'];
$i++;
# get selected stock in this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE stkid = '{$stkd['stkid']}' AND div = '" . USER_DIV . "'";
$stkRslt = db_exec($sql);
$stk = pg_fetch_array($stkRslt);
# get warehouse name
db_conn("exten");
$sql = "SELECT whname FROM warehouses WHERE whid = '{$stk['whid']}' AND div = '" . USER_DIV . "'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t\t<select name='vatcodes[]'>";
//<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($stkd['vatcode'] == $vd['id']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
$stkd['unitcost'] = sprint($stkd['unitcost']);
$stkd['amt'] = sprint($stkd['amt']);
// $sql = "SELECT * FROM manufact.jobcards WHERE recipe!='yes' AND completion!='1'";
// $job_rslt = db_exec($sql) or errDie("Unable to retrieve jobs.");
//
// $job_sel = "<select name='job_id[]' style='width: 100%'>";
// while ($job_data = pg_fetch_array($job_rslt)) {
// if ($stkd["jobcard_id"] == $job_data["id"]) {
// $sel = "selected";
// } else {
// $sel = "";
// }
//
// $job_sel .= "<option value='$job_data[id]' $sel>
// $job_data[id] $job_data[description]
// </option>";
// }
// $job_sel .= "</select>";
// <tr>
// <td bgcolor='#ff0000' width='10%'>
// $job_sel<br />
// <input type='submit' name='pur[]' value='Add To Purchase Resource Planning'>
// </td>
// </tr>
// rowspan='2'
# put in product
$products .= "\n\t\t\t\t<input type='hidden' name='accounts[]' value='0'>\n\t\t\t\t<input type='hidden' name='descriptions[]' value=''>\n\t\t\t\t<input type='hidden' name='amt[]' value='{$stkd['amt']}'>\n\t\t\t\t<input type='hidden' name='pqty[{$stk['stkid']}]' value='{$stkd['qty']}' />\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td><input type='hidden' name='whids[]' value='{$stkd['whid']}'>{$wh['whname']}</td>\n\t\t\t\t\t<td><input type='hidden' name='stkids[]' value='{$stkd['stkid']}'><a href='#' onclick='openwindow(\"stock-amt-det.php?stkid={$stk['stkid']}\")'>{$stk['stkcod']}</a></td>\n\t\t\t\t\t<td>{$Vatcodes}</td>\n\t\t\t\t\t<td>" . extlib_rstr($stk['stkdes'], 30) . "</td>\n\t\t\t\t\t<td><input type='text' size='3' name='qtys[]' value='{$stkd['qty']}'></td>\n\t\t\t\t\t<td><input type='text' size='8' name='unitcost[]' value='{$stkd['unitcost']}'></td>\n\t\t\t\t\t<td><input type='text' size='4' name='disc[]' value='{$stkd['disc']}'> OR <input type='text' size='4' name='discp[]' value='{$stkd['discp']}' maxlength=5>%</td>\n\t\t\t\t\t<td>" . CUR . " {$stkd['amt']}</td>\n\t\t\t\t\t<td><input type='checkbox' name='remprod[]' value='{$key}'><input type='hidden' name='SCROLL' value='yes'></td>\n\t\t\t\t</tr>";
$key++;
}
}
# Look above(remprod keys)
$keyy = $key;
# look above(if i = 0 then there are no products)
if ($i == 0) {
$done = "";
}
#get negative stock setting
$neg_setting = getCsetting("SORDER_NEG_STOCK");
if (!isset($neg_setting) or strlen($neg_setting) < 1) {
$neg_setting = "yes";
}
if ($neg_setting == "yes") {
$search_neg_stock = "";
} else {
$search_neg_stock = " AND (units > 0) ";
}
# check if stock warehouse was selected
if (isset($whidss)) {
foreach ($whidss as $key => $whid) {
if (isset($stkidss[$key]) && $stkidss[$key] != "-S" && isset($cust['pricelist'])) {
# skip if not selected
if ($whid == "-S") {
continue;
}
# get selected stock in this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE stkid = '{$stkidss[$key]}' AND div = '" . USER_DIV . "' ORDER BY stkcod ASC";
$stkRslt = db_exec($sql);
$stk = pg_fetch_array($stkRslt);
# get selected warehouse name
db_conn("exten");
$sql = "SELECT whname FROM warehouses WHERE whid = '{$stk['whid']}' AND div = '" . USER_DIV . "'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
# get price from price list if it is set
if (isset($cust['pricelist'])) {
# get selected stock in this warehouse
db_conn("exten");
$sql = "SELECT price FROM plist_prices WHERE listid = '{$cust['pricelist']}' AND stkid = '{$stk['stkid']}' AND div = '" . USER_DIV . "'";
$plRslt = db_exec($sql);
if (pg_numrows($plRslt) > 0) {
$pl = pg_fetch_array($plRslt);
$stk['selamt'] = $pl['price'];
}
}
/* -- Start Some Checks -- */
# check if they are selling too much
if ($stk['units'] - $stk['alloc'] < $qtyss[$key]) {
if (!in_array($stk['stkid'], explode(",", $stkerr))) {
if ($stk['type'] != 'lab') {
$stkerr .= ",{$stk['stkid']}";
$error .= "<li class='err'>Warning : Item number <b>{$stk['stkcod']}</b> does not have enough items available.</li>";
}
}
}
/* -- End Some Checks -- */
# Calculate the Discount discount
if ($discs[$key] < 1) {
if ($discps[$key] > 0) {
$discs[$key] = round($discps[$key] / 100 * $stk['selamt'], 2);
}
} else {
$discps[$key] = round($discs[$key] * 100 / $stk['selamt'], 2);
}
# Calculate amount
$amt[$key] = $qtyss[$key] * ($stk['selamt'] - $discs[$key]);
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t\t\t<select name='vatcodes[]'>\n\t\t\t\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($stk['vatcode'] == $vd['id']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
$amt[$key] = sprint($amt[$key]);
$stk['selamt'] = sprint($stk['selamt']);
# put in selected warehouse and stock
$products .= "\n\t\t\t\t\t<input type='hidden' name='accounts[]' value='0'>\n\t\t\t\t\t<input type='hidden' name='descriptions[]' value=''>\n\t\t\t\t\t<input type='hidden' name='whids[]' value='{$whid}'>\n\t\t\t\t\t<input type='hidden' name='stkids[]' value='{$stk['stkid']}'>\n\t\t\t\t\t<input type='hidden' name='amt[]' value='{$amt[$key]}'>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>{$wh['whname']}</td>\n\t\t\t\t\t\t<td><a href='#' onclick='openwindow(\"stock-amt-det.php?stkid={$stk['stkid']}\")'>{$stk['stkcod']}</a></td>\n\t\t\t\t\t\t<td>{$Vatcodes}</td>\n\t\t\t\t\t\t<td>" . extlib_rstr($stk['stkdes'], 30) . "</td>\n\t\t\t\t\t\t<td><input type='text' size='3' name='qtys[]' value='{$qtyss[$key]}'></td>\n\t\t\t\t\t\t<td><input type='text' size='8' name='unitcost[]' value='{$stk['selamt']}'></td>\n\t\t\t\t\t\t<td>\n\t\t\t\t\t\t\t<input type='text' size='4' name='disc[]' value='{$discs[$key]}'>\n\t\t\t\t\t\t\tOR\n\t\t\t\t\t\t\t<input type='text' size='4' name='discp[]' value='{$discps[$key]}' maxlength=5>%\n\t\t\t\t\t\t</td>\n\t\t\t\t\t\t<td nowrap>" . CUR . " {$amt[$key]}</td>\n\t\t\t\t\t\t<td><input type='checkbox' name='remprod[]' value='{$keyy}'></td>\n\t\t\t\t\t</tr>";
$keyy++;
} else {
if (isset($accountss[$key]) && $accountss[$key] != "0" && isset($cust['pricelist'])) {
db_conn('core');
$Sl = "SELECT * FROM accounts WHERE accid='{$accountss[$key]}'";
$Ri = db_exec($Sl) or errDie("Unable to get account data.");
if (pg_num_rows($Ri) < 1) {
return "invalid.";
}
$ad = pg_fetch_array($Ri);
# Calculate amount
$amt[$key] = sprint($qtyss[$key] * $unitcosts[$key]);
# Input qty if not serialised
$qtyin = "<input type='text' size='3' name='qtys[]' value='{$qtyss[$key]}'>";
# Check permissions
$unitcosts[$key] = sprint($unitcosts[$key]);
$viewcost = "<input type='text' size='8' name='unitcost[]' value='{$unitcosts[$key]}'>";
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t\t\t<select name='vatcodes[]'>\n\t\t\t\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($vatcodess[$key] == $vd['id']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
$amt[$key] = sprint($amt[$key]);
# Put in selected warehouse and stock
$products .= "\n\t\t\t\t\t<input type='hidden' name='accounts[]' value='{$accountss[$key]}'>\n\t\t\t\t\t<input type='hidden' name='whids[]' value='0'>\n\t\t\t\t\t<input type='hidden' name='stkids[]' value='0'>\n\t\t\t\t\t<input type='hidden' name='disc[]' value='0'>\n\t\t\t\t\t<input type='hidden' name='discp[]' value='0'>\n\t\t\t\t\t<input type='hidden' name='amt[]' value='{$amt[$key]}'>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td colspan='2'>{$ad['accname']}</td>\n\t\t\t\t\t\t<td>{$Vatcodes}</td>\n\t\t\t\t\t\t<td><input type='text' size='20' name='descriptions[]' value='{$descriptionss[$key]}'></td>\n\t\t\t\t\t\t<td>{$qtyin}</td>\n\t\t\t\t\t\t<td>{$viewcost}</td>\n\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t<td nowrap> " . CUR . " {$amt[$key]}</td>\n\t\t\t\t\t\t<td><input type='checkbox' name='remprod[]' value='{$keyy}'></td>\n\t\t\t\t\t</tr>";
$keyy++;
} else {
# skip if not selected
if ($whid == "-S") {
continue;
}
if (!isset($addnon)) {
if (isset($filter_store) and $filter_store != "0") {
# get warehouse name
db_conn("exten");
$sql = "SELECT whname FROM warehouses WHERE whid = '{$filter_store}' AND div = '" . USER_DIV . "'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
}
# get stock on this warehouse
db_connect();
if (isset($ria) and $ria != "") {
$len = strlen($ria);
if ($ria == "Show All") {
$Wh = "";
$ria = "";
} else {
$Wh = "AND (lower(stkdes) LIKE lower('%{$ria}%')) OR (lower(stkcod) LIKE lower('%{$ria}%'))";
$ria = "";
}
} else {
$Wh = "AND FALSE";
$ria = "";
}
$check_setting = getCSetting("OPTIONAL_STOCK_FILTERS");
if (isset($check_setting) and $check_setting == "yes") {
if (isset($filter_class) and $filter_class != "0") {
$Wh .= " AND prdcls = '{$filter_class}'";
}
if (isset($filter_cat) and $filter_cat != "0") {
$Wh .= " AND catid = '{$filter_cat}'";
}
}
if (isset($filter_store) and $filter_store != "0") {
$Wh .= " AND whid = '{$filter_store}'";
}
$sql = "SELECT * FROM stock WHERE blocked = 'n' {$search_neg_stock} AND div = '" . USER_DIV . "' {$Wh} ORDER BY stkcod ASC";
$stkRslt = db_exec($sql) or errDie("Unable to retrieve stocks from database.");
if (pg_numrows($stkRslt) < 1) {
$error .= "<li class='err'>There are no stock items in the selected store.</li>";
continue;
}
if ($sel_frm == "stkcod") {
$cods = "<select name='stkidss[]' onChange='javascript:document.form.submit();'>";
$cods .= "<option value='-S' disabled selected>Select Number</option>";
$count = 0;
while ($stk = pg_fetch_array($stkRslt)) {
$cods .= "<option value='{$stk['stkid']}'>{$stk['stkcod']} (" . sprint3($stk['units'] - $stk['alloc']) . ")</option>";
}
$cods .= "</select> ";
$descs = "";
} else {
$descs = "<select style='width:250px' name='stkidss[]' onChange='javascript:document.form.submit();'>";
$descs .= "<option value='-S' disabled selected>Select Description</option>";
$count = 0;
while ($stk = pg_fetch_array($stkRslt)) {
$descs .= "<option value='{$stk['stkid']}'>{$stk['stkdes']} (" . sprint3($stk['units'] - $stk['alloc']) . ")</option>";
}
$descs .= "</select> ";
$cods = "";
}
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t\t\t\t<select name='vatcodess[]'>\n\t\t\t\t\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($vd['del'] == "Yes") {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
# put in drop down and warehouse
$products .= "\n\t\t\t\t\t\t<input type='hidden' name='accountss[]' value='0'>\n\t\t\t\t\t\t<input type='hidden' name='descriptionss[]' value=''>\n\t\t\t\t\t\t<input type='hidden' name='whidss[]' value='{$filter_store}'>\n\t\t\t\t\t\t<input type='hidden' name='amts[]' value='0.00'>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td></td>\n\t\t\t\t\t\t\t<td>{$cods}<input type='hidden' name='vatcodess' value='0'></td>\n\t\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t\t<td>{$descs}</td>\n\t\t\t\t\t\t\t<td><input type='text' size='3' name='qtyss[]' value='1'></td>\n\t\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t\t<td>\n\t\t\t\t\t\t\t\t" . CUR . " <input type='text' size='4' name='discs[]' value='0'>\n\t\t\t\t\t\t\t\tOR\n\t\t\t\t\t\t\t\t<input type='text' size='4' name='discps[]' value='0' maxlength='5'>%\n\t\t\t\t\t\t\t</td>\n\t\t\t\t\t\t\t<td>" . CUR . " 0.00</td>\n\t\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t</tr>";
} else {
$Accounts = "\n\t\t\t\t\t\t<select name='accountss[]'>\n\t\t\t\t\t\t\t<option value='0'>Select Account</option>";
$useaccdrop = getCSetting("USE_NON_STOCK_ACCOUNTS");
if (isset($useaccdrop) and $useaccdrop == "yes") {
db_connect();
$acc_sql = "SELECT * FROM non_stock_account_list ORDER BY accname";
$run_acc = db_exec($acc_sql) or errDie("Unable to get account information.");
if (pg_numrows($run_acc) > 0) {
while ($acc = pg_fetch_array($run_acc)) {
$Accounts .= "<option value='{$acc['accid']}'>{$acc['accname']}</option>";
}
$Accounts .= "</select>";
}
} else {
db_conn('core');
$Sl = "SELECT accid,topacc,accnum,accname FROM accounts WHERE acctype='I' ORDER BY accname";
$Ri = db_exec($Sl) or errDie("Unable to get accounts.");
while ($ad = pg_fetch_array($Ri)) {
if (isb($ad['accid'])) {
continue;
}
$Accounts .= "<option value='{$ad['accid']}'>{$ad['accname']}</option>";
}
$Accounts .= "</select>";
}
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t\t\t\t<select name='vatcodess[]'>\n\t\t\t\t\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($vd['del'] == "Yes") {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
$products .= "\n\t\t\t\t\t\t<input type='hidden' name='whidss[]' value='{$FIRST_WH}'>\n\t\t\t\t\t\t<inpu type='hidden' name='stkidss[]' value=''>\n\t\t\t\t\t\t<input type='hidden' name='discs[]' value='0'>\n\t\t\t\t\t\t<input type='hidden' name='discps[]' value='0' >\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td colspan='2'>{$Accounts}</td>\n\t\t\t\t\t\t\t<td>{$Vatcodes}</td>\n\t\t\t\t\t\t\t<td><input type='text' size='20' name='descriptionss[]'></td>\n\t\t\t\t\t\t\t<td><input type='text' size='3' name='qtyss[]' value='1'></td>\n\t\t\t\t\t\t\t<td><input type='text' name='unitcosts[]' size='7'></td>\n\t\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t\t<td>" . CUR . " 0.00</td>\n\t\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t</tr>";
}
}
}
}
} else {
if (!isset($addnon)) {
if (isset($filter_store) and $filter_store != "0") {
# get selected warehouse name
db_conn("exten");
$sql = "SELECT whname FROM warehouses WHERE whid = '{$filter_store}' AND div = '" . USER_DIV . "'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
}
# get stock on this warehouse
db_connect();
if (isset($ria) and $ria != "") {
$len = strlen($ria);
if ($ria == "Show All") {
$Wh = "";
$ria = "";
} else {
$Wh = "AND (lower(stkdes) LIKE lower('%{$ria}%')) OR (lower(stkcod) LIKE lower('%{$ria}%'))";
$ria = "";
}
} else {
$Wh = "AND FALSE";
$ria = "";
}
$check_setting = getCSetting("OPTIONAL_STOCK_FILTERS");
if (isset($check_setting) and $check_setting == "yes") {
if (isset($filter_class) and $filter_class != "0") {
$Wh .= " AND prdcls = '{$filter_class}'";
}
if (isset($filter_cat) and $filter_cat != "0") {
$Wh .= " AND catid = '{$filter_cat}'";
}
}
if (isset($filter_store) and $filter_store != "0") {
$Wh .= " AND whid = '{$filter_store}'";
}
$sql = "SELECT * FROM stock WHERE blocked = 'n' {$search_neg_stock} AND div = '" . USER_DIV . "' {$Wh} ORDER BY stkcod ASC";
$stkRslt = db_exec($sql) or errDie("Unable to retrieve stocks from database.");
if (pg_numrows($stkRslt) < 1) {
if (!isset($err)) {
$err = "";
}
$err .= "<li>There are no stock items in the selected warehouse.</li>";
}
$stks = "<select name='stkidss[]' onChange='javascript:document.form.submit();'>";
$stks .= "<option value='-S' disabled selected>Select Number</option>";
$count = 0;
while ($stk = pg_fetch_array($stkRslt)) {
$stks .= "<option value='{$stk['stkid']}'>{$stk['stkcod']} (" . sprint3($stk['units'] - $stk['alloc']) . ")</option>";
}
$stks .= "</select> ";
$products .= "\n\t\t\t\t<input type='hidden' name='accountss[]' value='0'>\n\t\t\t\t<input type='hidden' name='descriptionss[]' value=''>\n\t\t\t\t<input type='hidden' name='vatcodess[]' value=''>\n\t\t\t\t<input type='hidden' name='whidss[]' value='{$filter_store}'>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td></td>\n\t\t\t\t\t<td>{$stks}</td>\n\t\t\t\t\t<td> </td>\n\t\t\t\t\t<td> </td>\n\t\t\t\t\t<td><input type='text' size='3' name='qtyss[]' value='1'></td>\n\t\t\t\t\t<td> </td>\n\t\t\t\t\t<td>\n\t\t\t\t\t\t<input type='text' size='4' name='discs[]' value='0'>\n\t\t\t\t\t\tOR\n\t\t\t\t\t\t<input type='text' size='4' name='discps[]' value='0' maxlength='5'>%</td>\n\t\t\t\t\t<td>" . CUR . " 0.00</td>\n\t\t\t\t\t<td> </td>\n\t\t\t\t</tr>";
} else {
if (isset($addnon)) {
$Accounts = "\n\t\t\t\t<select name='accountss[]'>\n\t\t\t\t\t<option value='0'>Select Account</option>";
$useaccdrop = getCSetting("USE_NON_STOCK_ACCOUNTS");
if (isset($useaccdrop) and $useaccdrop == "yes") {
db_connect();
$acc_sql = "SELECT * FROM non_stock_account_list ORDER BY accname";
$run_acc = db_exec($acc_sql) or errDie("Unable to get account information.");
if (pg_numrows($run_acc) > 0) {
while ($acc = pg_fetch_array($run_acc)) {
$Accounts .= "<option value='{$acc['accid']}'>{$acc['accname']}</option>";
}
$Accounts .= "</select>";
}
} else {
db_conn('core');
$Sl = "SELECT accid,topacc,accnum,accname FROM accounts WHERE acctype='I' ORDER BY accname";
$Ri = db_exec($Sl) or errDie("Unable to get accounts.");
while ($ad = pg_fetch_array($Ri)) {
if (isb($ad['accid'])) {
continue;
}
$Accounts .= "<option value='{$ad['accid']}'>{$ad['accname']}</option>";
}
$Accounts .= "</select>";
}
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t\t\t<select name='vatcodess[]'>\n\t\t\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($vd['del'] == "Yes") {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
$products .= "\n\t\t\t\t<inpu type='hidden' name='stkidss[]' value=''>\n\t\t\t\t<input type='hidden' name='whidss[]' value='{$FIRST_WH}'>\n\t\t\t\t<input type='hidden' name='discs[]' value='0'>\n\t\t\t\t<input type='hidden' name='discps[]' value='0' >\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td colspan='2'>{$Accounts}</td>\n\t\t\t\t\t<td>{$Vatcodes}</td>\n\t\t\t\t\t<td><input type='text' size='20' name='descriptionss[]'></td>\n\t\t\t\t\t<td><input type='text' size='3' name='qtyss[]' value='1'></td>\n\t\t\t\t\t<td><input type='text' name='unitcosts[]' size='7'></td>\n\t\t\t\t\t<td> </td>\n\t\t\t\t\t<td>" . CUR . " 0.00</td>\n\t\t\t\t\t<td> </td>\n\t\t\t\t</tr>";
}
}
}
// $products .= "</table>";
/* --- End Products Display --- */
/* --- Start Some calculations --- */
# Calculate subtotal
$SUBTOT = sprint($sord['subtot']);
# Calculate tradediscm
if ($sord['traddisc'] > 0) {
$traddiscm = sprint($sord['traddisc'] / 100 * ($SUBTOT + $sord['delchrg']));
} else {
$traddiscm = "0.00";
}
$VATP = TAX_VAT;
# Calculate subtotal
$SUBTOT = sprint($sord['subtot']);
$VAT = sprint($sord['vat']);
$TOTAL = sprint($sord['total']);
$sord['delchrg'] = sprint($sord['delchrg']);
/* --- End Some calculations --- */
/*--- Start checks --- */
# check only if the customer is selected
if (isset($cusnum) && $cusnum != "-S") {
#check againg credit limit
if ($cust['credlimit'] != 0 && $TOTAL + $cust['balance'] > $cust['credlimit']) {
$error .= "<li class='err'>Warning : Customers Credit limit of <b>" . CUR . " {$cust['credlimit']}</b> has been exceeded:</li>";
}
$avcred = $cust['credlimit'] - $cust['balance'];
} else {
$avcred = "0.00";
}
/*--- Start checks --- */
if (!isset($letters)) {
$letters = "";
}
$sord['delvat'] += 0;
if ($sord['delvat'] == 0) {
$Sl = "SELECT * FROM vatcodes WHERE del='Yes'";
$Ri = db_exec($Sl) or errDie("Unable to get data.");
$vd = pg_fetch_array($Ri);
$sord['delvat'] = $vd['id'];
}
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "\n\t\t<select name='delvat'>\n\t\t\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($vd['id'] == $sord['delvat']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
if (!isset($showvat)) {
$showvat = TRUE;
}
if ($showvat == TRUE) {
$vat14 = AT14;
} else {
$vat14 = "";
}
$psel1 = "";
$psel2 = "";
if (isset($proforma) and $proforma == "yes") {
$psel1 = "checked=yes";
} else {
$psel2 = "checked=yes";
}
if ($proforma == "yes") {
#generate a unique id IF it hasnt been done yet
if (!isset($pinvnum) or $pinvnum == 0) {
pglib_transaction("BEGIN") or errDie("Could not start database transaction");
#get unique id
$get_uni = "INSERT INTO unique_id (entry) VALUES ('value')";
$run_uni = db_exec($get_uni) or errDie("Unable to get unique id");
$pinvnum = pglib_lastid("unique_id", "id");
$rem_sql = "DELETE FROM unique_id WHERE id = '{$pinvnum}'";
$run_rem = db_exec($rem_sql) or errDie("Unable to remove unique id check");
#further check to see if an invoice has this is should be done here...
pglib_transaction("COMMIT") or errDie("Could not commit database transaction");
}
$getpinvnum = "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Proforma Invoice Number</td>\n\t\t\t\t<td><input type='hidden' name='pinvnum' value='{$pinvnum}'>{$pinvnum}</td>\n\t\t\t</tr>";
} else {
$getpinvnum = "<input type='hidden' name='pinvnum' value='0'>";
}
// Which display method was selected
if (isset($sel_frm) && $sel_frm == "stkdes") {
$sel_frm_cod = "";
$sel_frm_des = "checked";
} else {
$sel_frm_cod = "checked";
$sel_frm_des = "";
}
// Retrieve VAT Setting
$sql = "SELECT value FROM cubit.settings WHERE constant='VAT_INC'";
$vatinc_rslt = db_exec($sql) or errDie("Unable to retrieve vat setting.");
$vatinc = pg_fetch_result($vatinc_rslt, 0);
if ($vatinc != "yes" && $vatinc != "no") {
$vatinc = "no";
}
if ($vatinc == 'yes') {
$chrgvat = "inc";
} else {
$chrgvat = "exc";
}
if (isset($diffwhBtn) or isset($addprodBtn) or isset($addnon) or isset($saveBtn) or isset($upBtn) or isset($doneBtn) or isset($donePrnt) or isset($ria)) {
$jump_bot = "\n\t\t\t<script>\n\t\t\t\twindow.location.hash='bottom';\n\t\t\t</script>";
} else {
$jump_bot = "";
}
$optional_filter_setting = getCSetting("OPTIONAL_STOCK_FILTERS");
if (isset($optional_filter_setting) and $optional_filter_setting == "yes") {
db_connect();
$catsql = "SELECT catid, cat, catcod FROM stockcat WHERE div = '" . USER_DIV . "' ORDER BY cat ASC";
$catRslt = db_exec($catsql);
if (pg_numrows($catRslt) < 1) {
$cat_drop = "<input type='hidden' name='filter_cat' value='0'>";
} else {
$cat_drop = "<select name='filter_cat'>";
$cat_drop .= "<option value='0'>All Categories</option>";
while ($cat = pg_fetch_array($catRslt)) {
if (isset($filter_cat) and $filter_cat == $cat['catid']) {
$cat_drop .= "<option value='{$cat['catid']}' selected>({$cat['catcod']}) {$cat['cat']}</option>";
} else {
$cat_drop .= "<option value='{$cat['catid']}'>({$cat['catcod']}) {$cat['cat']}</option>";
}
}
$cat_drop .= "</select>";
}
# Select classification
$classsql = "SELECT * FROM stockclass WHERE div = '" . USER_DIV . "' ORDER BY classname ASC";
$clasRslt = db_exec($classsql);
if (pg_numrows($clasRslt) < 1) {
$class_drop = "<input type='hidden' name='filter_class' value='0'>";
} else {
$class_drop = "<select name='filter_class' style='width: 167'>";
$class_drop .= "<option value='0'>All Classifications</option>";
while ($clas = pg_fetch_array($clasRslt)) {
if (isset($filter_class) and $filter_class == $clas['clasid']) {
$class_drop .= "<option value='{$clas['clasid']}' selected>{$clas['classname']}</option>";
} else {
$class_drop .= "<option value='{$clas['clasid']}'>{$clas['classname']}</option>";
}
}
$class_drop .= "</select>";
}
$display_optional_filters = "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Select Category</td>\n\t\t\t\t<td>{$cat_drop}</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Select Classification</td>\n\t\t\t\t<td>{$class_drop}</td>\n\t\t\t</tr>";
}
db_conn("exten");
$sql = "SELECT whid, whname, whno FROM warehouses WHERE div = '" . USER_DIV . "' ORDER BY whname ASC";
$whRslt = db_exec($sql);
if (pg_numrows($whRslt) < 1) {
$store_drop = "<input type='hidden' name='filter_store' value='0'>";
} else {
if (!isset($filter_store)) {
# check if setting exists
db_connect();
$sql = "SELECT value FROM set WHERE label = 'DEF_WH' AND div = '" . USER_DIV . "'";
$Rslt = db_exec($sql) or errDie("Unable to check database for existing settings.");
if (pg_numrows($Rslt) > 0) {
$set = pg_fetch_array($Rslt);
$filter_store = $set['value'];
}
}
$store_drop = "<select name='filter_store'>";
$store_drop .= "<option value='0'>All Stores</option>";
while ($wh = pg_fetch_array($whRslt)) {
if (isset($filter_store) and $filter_store == $wh['whid']) {
$store_drop .= "<option value='{$wh['whid']}' selected>({$wh['whno']}) {$wh['whname']}</option>";
} else {
$store_drop .= "<option value='{$wh['whid']}'>({$wh['whno']}) {$wh['whname']}</option>";
}
}
$store_drop .= "</select>";
}
$cust_del_addr = $sord['del_addr'];
$details = "\n\t\t<center>\n\t\t<h3>New Sales Order</h3>\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t<input type='hidden' name='key' value='update'>\n\t\t\t<input type='hidden' name='sordid' value='{$sordid}'>\n\t\t\t<input type='hidden' name='letters' value='{$letters}'>\n\t\t\t<input type='hidden' name='stkerr' value='{$stkerr}'>\n\t\t\t<input type='hidden' name='chrgvat' value='{$chrgvat}' />\n\t\t<table " . TMPL_tblDflts . " width='95%'>\n\t\t\t\t<tr>\n\t\t\t\t<td valign='top'>\n\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th colspan='2'> Customer Details </th>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Department</td>\n\t\t\t\t\t\t\t<td valign='center'>{$dept['deptname']}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Account No.</td>\n\t\t\t\t\t\t\t<td valign='center'>{$cust['accno']}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Customer</td>\n\t\t\t\t\t\t\t<td valign='center'>{$customers}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td valign='top'>Customer Address</td>\n\t\t\t\t\t\t\t<td valign='center'>" . nl2br($cust['addr1']) . "</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td valign='top'>Current Delivery Address</td>\n\t\t\t\t\t\t\t<td valign='center'>" . nl2br($cust_del_addr) . "</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td valign='top'>Delivery Address</td>\n\t\t\t\t\t\t\t<td valign='center'>\n\t\t\t\t\t\t\t\t<input type='button' onClick=\"\n\t\t\t\t\t\t\t\t\tvar windowReference;\n\t\t\t\t\t\t\t\t\tfunction openPopup() {\n\t\t\t\t\t\t\t\t\t\twindowReference = window.open('sorder-new-deladdr.php?sordid={$sordid}','windowName','width=500,height=400,status=1');\n\t\t\t\t\t\t\t\t\t\tif (!windowReference.opener)\n\t\t\t\t\t\t\t\t\t\t\twindowReference.opener = self;\n\t\t\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\t\t\topenPopup();\" value='Change Delivery Address'>\n\t\t\t\t\t\t\t</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Customer Order number</td>\n\t\t\t\t\t\t\t<td valign='center'><input type='text' size='10' name='cordno' value='{$sord['cordno']}'></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Customer VAT Number</td>\n\t\t\t\t\t\t\t<td>{$cust['vatnum']}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Select Using</td>\n\t\t\t\t\t\t\t<td>Stock Code<input type='radio' name='sel_frm' value='stkcod' onChange='javascript:document.form.submit();' {$sel_frm_cod}><br>Stock Description<input type='radio' name='sel_frm' value='stkdes' onChange='javascript:document.form.submit();' {$sel_frm_des}></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr><td><br></td></tr>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th colspan='2'>Additional Filters</th>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Select Store</td>\n\t\t\t\t\t\t\t<td>{$store_drop}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t{$display_optional_filters}\n\t\t\t\t\t\t<tr class='" . bg_class() . "' " . ass("Type the first letters of the stock code you are looking for.") . ">\n\t\t\t\t\t\t\t<td>Stock Filter</td>\n\t\t\t\t\t\t\t<td nowrap><input type='text' size='13' name='ria' value='{$ria}'> <input type='submit' value='Search'> <input type='submit' name='ria' value='Show All'></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t</table>\n\t\t\t\t</td>\n\t\t\t\t<td valign='top' align='right'>\n\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th colspan='2'> Sales Order Details </th>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Sales Order No.</td>\n\t\t\t\t\t\t\t<td valign='center'>{$sord['sordid']}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Proforma Invoice</td>\n\t\t\t\t\t\t\t<td valign='center'>Yes <input type='radio' name='proforma' value='yes' {$psel1} onChange='javascript:document.form.submit();'> No <input type='radio' name='proforma' value='no' {$psel2} onChange='javascript:document.form.submit();'></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t{$getpinvnum}\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Display Costs</td>\n\t\t\t\t\t\t\t<td>Yes <input type='radio' name='costs' value='yes' {$dc_sel['yes']}> No <input type='radio' name='costs' value='no' {$dc_sel['no']}></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Order No.</td>\n\t\t\t\t\t\t\t<td valign='center'><input type='text' size='5' name='ordno' value='{$sord['ordno']}'></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>VAT Inclusive</td>\n\t\t\t\t\t\t\t<td valign='center'>Yes <input type='radio' size='7' name='chrgvat' value='inc' {$chin}> No<input type='radio' size='7' name='chrgvat' value='exc' {$chex}></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Terms</td>\n\t\t\t\t\t\t\t<td valign='center'>{$termssel} Days</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Sales Person</td>\n\t\t\t\t\t\t\t<td valign='center'>{$salesps}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Sales Order Date</td>\n\t\t\t\t\t\t\t<td valign='center'>" . mkDateSelect("sord", $sord_year, $sord_month, $sord_day) . "</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Delivery/Due Date</td>\n\t\t\t\t\t\t\t<td valign='center'>\n\t\t\t\t\t\t\t\t" . mkDateSelect("ddate", $ddate_year, $ddate_month, $ddate_day) . "</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Available Credit</td>\n\t\t\t\t\t\t\t<td>" . CUR . " " . sprint($avcred) . "</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Trade Discount</td>\n\t\t\t\t\t\t\t<td valign='center'><input type='text' size='5' name='traddisc' value='{$sord['traddisc']}'>%</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Delivery Charge</td>\n\t\t\t\t\t\t\t<td valign='center'><input type='text' size='7' name='delchrg' value='{$sord['delchrg']}'>{$Vatcodes}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t</table>\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t" . TBL_BR . "\n\t\t\t<tr>\n\t\t\t\t<td colspan='2'><table " . TMPL_tblDflts . ">{$products}</table></td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td>\n\t\t\t\t\t<p>\n\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<td rowspan='2'>" . mkQuickLinks(ql("sorder-view.php", "View Sales Orders"), ql("customers-new.php", "New Customer")) . "\n\t\t\t\t\t\t\t</td>\n\t\t\t\t\t\t\t<th width='25%'>Comments</th>\n\t\t\t\t\t\t\t<td rowspan='5' valign='top' width='50%'>{$error}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<td class='" . bg_class() . "' rowspan='4' align='center' valign='top'><textarea name='comm' rows='4' cols='20'>{$sord['comm']}</textarea></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t</table>\n\t\t\t\t</td>\n\t\t\t\t<td align='right'>\n\t\t\t\t\t<table " . TMPL_tblDflts . " width='80%'>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>SUBTOTAL</td>\n\t\t\t\t\t\t\t<td align='right' nowrap>" . CUR . " <input type='hidden' name='SUBTOT' value='{$SUBTOT}'>{$SUBTOT}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Trade Discount</td>\n\t\t\t\t\t\t\t<td align='right' nowrap>" . CUR . " {$sord['discount']}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Delivery Charge</td>\n\t\t\t\t\t\t\t<td align='right' nowrap>" . CUR . " {$sord['delivery']}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td><b>VAT {$vat14}</b>\n\t\t\t\t\t\t\t<td align='right' nowrap>" . CUR . " {$VAT}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<th>GRAND TOTAL</th>\n\t\t\t\t\t\t\t<td align='right' nowrap>" . CUR . " {$TOTAL}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t</table>\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td colspan='2' align='center'><input name='addprodBtn' type='submit' value='Add Product'>| <input name='addnon' type='submit' value='Add Non stock Product'> | <input type='submit' name='saveBtn' value='Save'> | <input type='submit' name='upBtn' value='Update'>{$done}</td>\n\t\t\t</tr>\n\t\t</table>\n\t\t<a name='bottom'>\n\t\t</form>\n\t\t</center>\n\t\t{$jump_bot}";
return $details;
}
function cdetails($_GET)
{
$showvat = TRUE;
# get vars
extract($_GET);
if (!isset($button) && isset($starting)) {
return slct($_GET);
}
# validate input
require_lib("validate");
$v = new validate();
$v->isOk($invid, "num", 1, 20, "Invalid Invoice number.");
if (isset($ctyp) && $ctyp == 's') {
$v->isOk($cusnum, "num", 1, 20, "Invalid customer number.");
} elseif (isset($ctyp) && $ctyp == 'c') {
$v->isOk($deptid, "num", 1, 20, "Invalid Department.");
}
# display errors, if any
if ($v->isError()) {
$err = "";
$errors = $v->getErrors();
foreach ($errors as $e) {
$err .= "<li class='err'>" . $e["msg"] . "</li>";
}
$confirm = "<p><input type='button' onClick='JavaScript:history.back();' value='« Correct submission'>{$err}";
return $confirm;
}
if ($ctyp == "ac") {
return acdetails($_GET);
}
# Get Invoice info
db_connect();
$sql = "SELECT * FROM cubit.nons_invoices WHERE invid = '{$invid}' AND div = '" . USER_DIV . "'";
$invRslt = db_exec($sql) or errDie("Unable to get invoices information");
if (pg_numrows($invRslt) < 1) {
return "<i class='err'>Not Found</i>";
}
$inv = pg_fetch_array($invRslt);
$details = "";
if ($ctyp == 's') {
$sql = "SELECT * FROM customers WHERE cusnum = '{$cusnum}' AND div = '" . USER_DIV . "'";
$custRslt = db_exec($sql) or errDie("Unable to view customer");
$cust = pg_fetch_array($custRslt);
$details = "\r\n\t\t\t<table " . TMPL_tblDflts . ">\r\n\t\t\t\t<tr>\r\n\t\t\t\t\t<th colspan='2'> Customer Details </th>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<input type='hidden' name='cusnum' value='{$cusnum}'>\r\n\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t<td>Customer</td>\r\n\t\t\t\t\t<td valign='center'>{$cust['cusname']} {$cust['surname']}</td>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t<td>Customer Address</td>\r\n\t\t\t\t\t<td valign='center'><pre>{$cust['addr1']}</pre></td>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t<td>Customer VAT Number</td>\r\n\t\t\t\t\t<td valign='center'>{$cust['vatnum']}</td>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t<td>Customer Order number</td>\r\n\t\t\t\t\t<td valign='center'>{$inv['cordno']}</td>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t<td>Customer Balance (Excl this Invoice)</td>\r\n\t\t\t\t\t<td>" . CUR . sprint($cust["balance"]) . "</td>\r\n\t\t\t\t</tr>\r\n\t\t\t</table>";
} elseif ($ctyp == 'c') {
db_conn("exten");
$sql = "SELECT * FROM departments WHERE deptid = '{$deptid}'";
$deptRslt = db_exec($sql) or errDie("Unable to view customers");
$dept = pg_fetch_array($deptRslt);
$details = "\r\n\t\t\t<table " . TMPL_tblDflts . ">\r\n\t\t\t\t<tr>\r\n\t\t\t\t\t<th colspan='2'> Customer Details </th>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<input type='hidden' name='deptid' value='{$deptid}'>\r\n\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t<td>Customer</td>\r\n\t\t\t\t\t<td valign='center'>{$inv['cusname']} </td>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t<td>Customer Address</td>\r\n\t\t\t\t\t<td valign='center'><pre>{$inv['cusaddr']}</pre></td>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t<td>Customer VAT Number</td>\r\n\t\t\t\t\t<td valign='center'>{$inv['cusvatno']}</td>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t<td>Customer Order number</td>\r\n\t\t\t\t\t<td valign='center'>{$inv['cordno']}</td>\r\n\t\t\t\t</tr>\r\n\t\t\t</table>";
} elseif ($ctyp == 'cb') {
db_conn("cubit");
$sql = "SELECT * FROM bankacct WHERE bankid = '{$inv['accid']}'";
$deptRslt = db_exec($sql) or errDie("Unable to view customers");
if (pg_numrows($deptRslt) < 1) {
$error = "<li class='err'> Bank not Found.</li>";
$confirm .= "{$error}<p><input type='button' onClick='JavaScript:history.back();' value='« Correct submission'>";
return $confirm;
} else {
$dept = pg_fetch_array($deptRslt);
$supacc = "{$dept['bankname']} - {$dept['accname']}({$dept['acctype']})";
}
$details = "\r\n\t\t\t<table " . TMPL_tblDflts . ">\r\n\t\t\t\t<tr>\r\n\t\t\t\t\t<th colspan='2'> Customer Details </th>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<input type='hidden' name='bankid' value='{$inv['accid']}'>\r\n\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t<td>Customer</td>\r\n\t\t\t\t\t<td valign='center'>{$inv['cusname']} </td>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t<td>Customer Address</td>\r\n\t\t\t\t\t<td valign='center'><pre>{$inv['cusaddr']}</pre></td>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t<td>Customer VAT Number</td>\r\n\t\t\t\t\t<td valign='center'>{$inv['cusvatno']}</td>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t<td>Customer Order number</td>\r\n\t\t\t\t\t<td valign='center'>{$inv['cordno']}</td>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t<td>Account</td>\r\n\t\t\t\t\t<td>{$supacc}</td>\r\n\t\t\t\t</tr>\r\n\t\t\t</table>";
}
$stkacc = "";
core_connect();
$sql = "SELECT * FROM accounts WHERE div = '" . USER_DIV . "' ORDER BY accname ASC";
$accRslt = db_exec($sql);
if (pg_numrows($accRslt) < 1) {
return "<li>There are No accounts in Cubit.</li>";
}
while ($acc = pg_fetch_array($accRslt)) {
if (isb($acc['accid'])) {
continue;
}
$stkacc .= "<option value='{$acc['accid']}'>{$acc['topacc']}/{$acc['accnum']} - {$acc['accname']}</option>";
}
$stkacc .= "</select>";
/* --- Start Products Display --- */
# Products layout
$products = "\r\n\t\t<table " . TMPL_tblDflts . " width='100%'>\r\n\t\t\t<tr>\r\n\t\t\t\t<th width='5%'>#</th>\r\n\t\t\t\t<th width='55%'>DESCRIPTION</th>\r\n\t\t\t\t<th width='10%'>QTY</th>\r\n\t\t\t\t<th width='10%'>UNIT PRICE</th>\r\n\t\t\t\t<th width='10%'>AMOUNT</th>\r\n\t\t\t\t<th width='10%'>ACCOUNT</th>\r\n\t\t\t<tr>";
# get selected stock in this Invoice
db_connect();
$sql = "SELECT * FROM hire.hire_nons_inv_items WHERE invid = '{$invid}' AND div = '" . USER_DIV . "'";
$stkdRslt = db_exec($sql);
$i = 0;
while ($stkd = pg_fetch_array($stkdRslt)) {
$i++;
// Check Tax Excempt
db_conn("cubit");
$sql = "SELECT zero FROM vatcodes WHERE id='{$stkd['vatex']}'";
$zRslt = db_exec($sql) or errDie("Unable to retrieve vat code from Cubit.");
$vatex = pg_fetch_result($zRslt, 0);
if ($vatex == "Yes") {
$ex = "#";
} else {
$ex = "";
}
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes WHERE id='{$stkd['vatex']}'";
$Ri = db_exec($Sl);
$vd = pg_fetch_array($Ri);
if (TAX_VAT != $vd['vat_amount'] and $vd['vat_amount'] != "0.00") {
$showvat = FALSE;
}
# put in product
$products .= "\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td align='center'>{$i}</td>\r\n\t\t\t\t<td>{$ex} {$stkd['description']}</td>\r\n\t\t\t\t<td>{$stkd['qty']}</td>\r\n\t\t\t\t<td>{$stkd['unitcost']}</td>\r\n\t\t\t\t<td>" . CUR . " {$stkd['amt']}</td>\r\n\t\t\t\t<td " . ass("Select the account you wish to Credit") . "><select name='stkaccs[{$stkd['id']}]'>{$stkacc}</td>\r\n\t\t\t</tr>";
}
$products .= "</table>";
/* --- Start Some calculations --- */
# Get subtotal
$SUBTOT = sprint($inv['subtot']);
# Get Total
$TOTAL = sprint($inv['total']);
# Get vat
$VAT = sprint($inv['vat']);
/* --- End Some calculations --- */
# format date
list($syear, $smon, $sday) = explode("-", $inv['odate']);
if (!isset($showvat)) {
$showvat = TRUE;
}
if ($showvat == TRUE) {
$vat14 = AT14;
} else {
$vat14 = "";
}
/* -- Final Layout -- */
$details = "\r\n\t\t<center>\r\n\t\t<h3>Non-Stock Invoice Details</h3>\r\n\t\t<form action='" . SELF . "' method='POST' name='form'>\r\n\t\t\t<input type='hidden' name='key' value='cconfirm'>\r\n\t\t\t<input type='hidden' name='invid' value={$invid}>\r\n\t\t\t<input type='hidden' name='ctyp' value={$ctyp}>\r\n\t\t<table " . TMPL_tblDflts . " width=95%>\r\n\t\t\t<tr>\r\n\t\t\t\t<td valign='top'>{$details}</td>\r\n\t\t\t\t<td valign='top' align='right'>\r\n\t\t\t\t\t<table " . TMPL_tblDflts . ">\r\n\t\t\t\t\t\t<tr><th colspan='2'> Non-Stock Invoice Details </th></tr>\r\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t<td>Non-Stock Invoice No.</td>\r\n\t\t\t\t\t\t\t<td valign='center'>T {$inv['invid']}</td>\r\n\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t<td>Hire No.</td>\r\n\t\t\t\t\t\t\t<td valign='center'>H" . getHirenum($inv["hire_invid"], 1) . "</td>\r\n\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t<td>Date</td>\r\n\t\t\t\t\t\t\t<td valign='center'>{$sday}-{$smon}-{$syear}</td>\r\n\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t<td>VAT Inclusive</td>\r\n\t\t\t\t\t\t\t<td valign='center'>{$inv['chrgvat']}</td>\r\n\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t<td>Terms</td>\r\n\t\t\t\t\t\t\t<td valign='center'>{$inv['terms']} Days</td>\r\n\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t</table>\r\n\t\t\t\t</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr><td><br></td></tr>\r\n\t\t\t<tr>\r\n\t\t\t\t<td colspan='2'>{$products}</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr>\r\n\t\t\t\t<td>\r\n\t\t\t\t\t<table " . TMPL_tblDflts . ">\r\n\t\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t\t<th width='40%'>Quick Links</th>\r\n\t\t\t\t\t\t\t<th width='45%'>Remarks</th>\r\n\t\t\t\t\t\t\t<td rowspan='5' valign='top' width='15%'><br></td>\r\n\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t<td align='center'>\r\n\t\t\t\t\t\t\t\t<a href='javascript:popupOpen(\"../nons-invoice-new.php\")'>New Non-Stock Invoices</a>\r\n\t\t\t\t\t\t\t</td>\r\n\t\t\t\t\t\t\t<td class='" . bg_class() . "' rowspan=4 align=center valign=top>" . nl2br($inv['remarks']) . "</td>\r\n\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t<td align='center'><a href='javascript:popupOpen(\"nons-invoice-view.php\")'>View Non-Stock Invoices</a></td>\r\n\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t<script>document.write(getQuicklinkSpecial());</script>\r\n\t\t\t\t\t</table>\r\n\t\t\t\t</td>\r\n\t\t\t\t<td align='right'>\r\n\t\t\t\t\t<table " . TMPL_tblDflts . " width='80%'>\r\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t<td>SUBTOTAL</td>\r\n\t\t\t\t\t\t\t<td align='right'>" . CUR . " {$inv['subtot']}</td>\r\n\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t<td>VAT {$vat14}</td>\r\n\t\t\t\t\t\t\t<td align='right'>" . CUR . " {$inv['vat']}</td>\r\n\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t<th>GRAND TOTAL</th>\r\n\t\t\t\t\t\t\t<td align='right'>" . CUR . " {$inv['total']}</td>\r\n\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t</table>\r\n\t\t\t\t</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr>\r\n\t\t\t\t<td align='right'><input type='submit' value='Confirm »'></td>\r\n\t\t\t</tr>\r\n\t\t</table>\r\n\t\t</form>\r\n\t\t</center>";
return $details;
}
function slct($_GET, $err = "")
{
db_connect();
$sql = "SELECT * FROM suppliers WHERE location != 'int' AND div = '" . USER_DIV . "' ORDER BY supno ASC";
$supRslt = db_exec($sql) or errDie("Could not retrieve Suppliers Information from the Database.", SELF);
$sups = "<select name='supid'>";
if (pg_numrows($supRslt) < 1) {
$sups .= "<option value='-S'></option>";
}
while ($sup = pg_fetch_array($supRslt)) {
$sups .= "<option value='{$sup['supid']}'>{$sup['supno']} {$sup['supname']}</option>";
}
$sups .= "</select>";
$banks = "<select name='bankid'>";
$sql = "SELECT * FROM bankacct WHERE btype != 'int' AND div = '" . USER_DIV . "'";
$Rs = db_exec($sql);
$numrows = pg_numrows($Rs);
if (empty($numrows)) {
return "<li class='err'> There are no accounts held at the selected Bank.</li>\n\t\t\t<p><input type='button' onClick='JavaScript:history.back();' value='« Correct Selection'>";
}
while ($acc = pg_fetch_array($Rs)) {
$banks .= "<option value={$acc['bankid']}>{$acc['accname']} - {$acc['bankname']} ({$acc['acctype']})</option>";
}
$banks .= "</select>";
db_conn("exten");
$sql = "SELECT * FROM departments WHERE div = '" . USER_DIV . "' ORDER BY deptname ASC";
$deptRslt = db_exec($sql);
$depts = "<select name='deptid'>";
if (pg_numrows($deptRslt) < 1) {
$depts .= "<option value='-S'></option>";
}
while ($dept = pg_fetch_array($deptRslt)) {
$depts .= "<option value={$dept['deptid']}>{$dept['deptname']}</option>";
}
$depts .= "</select>";
//Option removed
//<tr class='bg-odd' ".ass("Select when tranferring goods between Departments or Stores")."><td colspan=2><input type=radio name=ctyp value='c' checked=yes>Accounts Order</td></tr>
//<tr class='bg-even' ".ass("Select when the Order of non stock goods is a bank Order")."><td><input type=radio name=ctyp value='cb'>Bank Order</td><td>$banks</td></tr>
$details = "\n\t\t<center>\n\t\t<h3>Non-Stock Order received</h3>\n\t\t<h4>Supplier Details</h4>\n\t\t<form action='" . SELF . "' method='post' name='form'>\n\t\t\t<input type='hidden' name='key' value='details'>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t<tr>\n\t\t\t\t<td colspan='2'>{$err}</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<th colspan='2'> Order Details </th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "' " . ass("Select when purchasing non stock goods from your suppliers") . ">\n\t\t\t\t<td><input type='radio' name='ctyp' value='s' checked='yes'> Select Supplier</td>\n\t\t\t\t<td>{$sups}</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "' " . ass("Select when the Order of non stock goods is a cash Order") . ">\n\t\t\t\t<td><input type='radio' name='ctyp' value='c'>Cash Order</td>\n\t\t\t\t<td>{$depts}</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "' " . ass("Select when tranferring goods between Departments or Stores") . ">\n\t\t\t\t<td colspan='2'><input type='radio' name='ctyp' value='ac'>Ledger Accounts Order</td>\n\t\t\t\t<td class='err'>This selection will credit the amount of the invoice<br /> to a General Ledger account instead of Creditors Control.</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td colspan='2'><input type='radio' name='ctyp' value='p'>Petty Cash Order</td>\n\t\t\t</tr>\n\t\t\t<tr><td><br></td></tr>\n\t\t\t<tr>\n\t\t\t\t<td align='center'><input type='button' value='« Back' onClick='javascript:history.back()'></td>\n\t\t\t\t<td align='center'><input type='submit' value='Continue »'></td>\n\t\t\t</tr>\n\t\t</table>\n\t\t</form>";
return $details;
}
ass("is_null(\\Sugi\\Filter::cookie('w'))");
ass("is_null(\\Sugi\\Filter::cookie('w', null))");
ass("\\Sugi\\Filter::cookie('w', false) === false");
ass("\\Sugi\\Filter::cookie('w', 1) === 1");
ass("\\Sugi\\Filter::cookie('cs') === 'alabalacookie'");
ass("\\Sugi\\Filter::cookie('ci') === '1'");
ass("\\Sugi\\Filter::cookie('ci', 2) == 1");
ass("\\Sugi\\Filter::cookie('ci', false) == 1");
echo '<h2>String from $_COOKIE</h2>';
ass("\\Sugi\\Filter::cookie_str('cs') === 'alabalacookie'");
ass("\\Sugi\\Filter::cookie_str('cs', 30) === false");
ass("\\Sugi\\Filter::cookie_str('cs', 1, 3) === false");
ass("\\Sugi\\Filter::cookie_str('cs', 1, 100) === 'alabalacookie'");
ass("\\Sugi\\Filter::cookie_str('cs', 1, 3, 'tralala') === 'tralala'");
ass("\\Sugi\\Filter::cookie_str('notexistingkey', 1, 3, 'tralala') === 'tralala'");
ass("\\Sugi\\Filter::cookie_str('notexistingkey', 1, 3, false) === false");
echo '<h2>Integers from $_COOKIE</h2>';
ass("\\Sugi\\Filter::cookie_int('cs') === false");
ass("\\Sugi\\Filter::cookie_int('cs', false, false, 2) === 2");
ass("\\Sugi\\Filter::cookie_int('ci') === 1");
ass("\\Sugi\\Filter::cookie_int('ci', -100, 100) === 1");
ass("\\Sugi\\Filter::cookie_int('ci', 100) === false");
ass("\\Sugi\\Filter::cookie_int('ci', 1, 1, 2) === 1");
ass("\\Sugi\\Filter::cookie_int('notexistingkey', 1, 1, 'error') === 'error'");
?>
<br />
<a href="index.php">back</a>
<br />
</body>
</html>
<?php
function my2us_datetime($date)
{
if ($date == null) {
return "";
}
if (substr($date, 0, 10) == "0000-00-00") {
return "";
}
$a = preg_match_all("!([0-9]{1,4})-?([0-1]?[0-9])-?([0-3]?[0-9]) ?([0-2]?[0-9]):?([0-6]?[0-9]):?([0-6]?[0-9])!", $date, $aa);
ass($a, "Invalid date/time value: \"{$date}\" (my2us_datetime())");
ass(count($aa) == 7);
return sprintf("%02d/%02d/%04d %02d:%02d", (int) $aa[2][0], (int) $aa[3][0], (int) $aa[1][0], (int) $aa[4][0], (int) $aa[5][0]);
}
function slct($_GET, $err = "")
{
# Get vars
foreach ($_GET as $key => $value) {
${$key} = $value;
}
# validate input
require_lib("validate");
$v = new validate();
$v->isOk($purid, "num", 1, 20, "Invalid Invoice number.");
$v->isOk($prd, "num", 1, 20, "Invalid prd number.");
# display errors, if any
if ($v->isError()) {
$err = "";
$errors = $v->getErrors();
foreach ($errors as $e) {
$err .= "<li class=err>" . $e["msg"];
}
$confirm .= "<p><input type=button onClick='JavaScript:history.back();' value='« Correct submission'>";
return $confirm;
}
# get purchase info
db_conn($prd);
$sql = "SELECT * FROM nons_purchases WHERE purid = '{$purid}' AND div = '" . USER_DIV . "'";
$purRslt = db_exec($sql) or errDie("Unable to get purchase information");
if (pg_numrows($purRslt) < 1) {
return "<li class=err>purchase Not Found</li>";
}
$pur = pg_fetch_array($purRslt);
db_connect();
$sql = "SELECT * FROM suppliers WHERE location != 'int' AND div = '" . USER_DIV . "' ORDER BY supno ASC";
$supRslt = db_exec($sql) or errDie("Could not retrieve Suppliers Information from the Database.", SELF);
$sups = "<select name=supid>";
if (pg_numrows($supRslt) < 1) {
$sups .= "<option value='-S'></option>";
}
while ($sup = pg_fetch_array($supRslt)) {
$sups .= "<option value='{$sup['supid']}'>{$sup['supno']} {$sup['supname']}</option>";
}
$sups .= "</select>";
db_conn("exten");
$sql = "SELECT * FROM departments WHERE div = '" . USER_DIV . "' ORDER BY deptname ASC";
$deptRslt = db_exec($sql);
$depts = "<select name=deptid>";
if (pg_numrows($deptRslt) < 1) {
$depts .= "<option value='-S'></option>";
}
while ($dept = pg_fetch_array($deptRslt)) {
$depts .= "<option value={$dept['deptid']}>{$dept['deptname']}</option>";
}
$depts .= "</select>";
//Removed option
// <tr><th colspan=2> Purchase Details </th></tr>
// <tr class='bg-odd' ".ass("Select when tranferring goods between Departments or Stores")."><td colspan=2><input type=
//radio name=ctyp value='c' checked=yes>Accounts Purchase</td></tr>
$details = "<center>\n\t<h3>Non-Stock Purchase received</h3>\n\t<h4>Supplier Details</h4>\n\t<form action='" . SELF . "' method=post name=form>\n\t<input type=hidden name=key value=slct>\n\t<input type=hidden name=purid value='{$purid}'>\n\t<table cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' border=0>\n\t<tr><td colspan=2>{$err}</td></tr>\n \t<tr><th colspan=2> Purchase Details </th></tr>\n\t<tr class='bg-even' " . ass("Select when purchasing non stock goods from your suppliers") . "><td><input type=radio name=ctyp value='s' checked> Select Supplier</td><td>{$sups}</td></tr>\n\t<tr class='bg-odd' " . ass("Select when the purchase of non stock goods is a cash purchase") . "><td><input type=radio name=ctyp value='c'>Cash Order</td><td>{$depts}</td></tr>\n\t<tr class='bg-even'><td colspan=2><input type=radio name=ctyp value='p'>Petty Cash Purchase</td></tr>\n\t<tr><td><br></td></tr>\n\t<tr><td align=center><input type=button value='« Back' onClick='javascript:history.back()'></td><td align=center><input type=submit value='Continue »'></td></tr>\n\t</table>";
return $details;
}
function details($_POST, $error = "")
{
if (PRD_STATE == 'p') {
return "<br><li class=err> - Error : You cannot acces this function when you are using a closed period.<br><br></li>";
}
# Get vars
foreach ($_POST as $key => $value) {
${$key} = $value;
}
# validate input
require_lib("validate");
$v = new validate();
if (isset($invid)) {
$v->isOk($invid, "num", 1, 20, "Invalid invoice number.");
} else {
$v->isOk($deptid, "num", 1, 20, "Invalid department number.");
$v->isOk($letters, "string", 0, 5, "Invalid First 3 Letters.");
}
# display errors, if any
if ($v->isError()) {
$errors = $v->getErrors();
foreach ($errors as $e) {
$error .= "<li class=err>" . $e["msg"];
}
$confirm .= "{$error}<p><input type=button onClick='JavaScript:history.back();' value='« Correct submission'>";
return $confirm;
}
if (isset($deptid)) {
db_connect();
# Query server for customer info
$sql = "SELECT cusnum,cusname,surname FROM customers WHERE deptid = '{$deptid}' AND location != 'int' AND lower(surname) LIKE lower('{$letters}%') AND blocked != 'yes' AND div = '" . USER_DIV . "' ORDER BY surname";
$custRslt = db_exec($sql) or errDie("Unable to view customers");
if (pg_numrows($custRslt) < 1) {
$err = "<li class=err>No customer names starting with <b>{$letters}</b> in database.";
return view_err($_POST, $err);
}
}
if (!isset($invid)) {
$invid = create_dummy($deptid);
$stkerr = "0,0";
}
if (!isset($done)) {
$done = "";
}
# Get invoice info
db_connect();
$sql = "SELECT * FROM invoices WHERE invid = '{$invid}' AND div = '" . USER_DIV . "'";
$invRslt = db_exec($sql) or errDie("Unable to get invoice information");
if (pg_numrows($invRslt) < 1) {
return "<li class=err>Invoice Not Found</li>";
}
$inv = pg_fetch_array($invRslt);
# Check if invoice has been printed
if ($inv['printed'] == "y") {
$error = "<li class=err> Error : Invoice number <b>{$invid}</b> has already been printed.";
$error .= "<p><input type=button onClick='JavaScript:history.back();' value='« Correct submission'>";
return $error;
}
# Get department
db_conn("exten");
$sql = "SELECT * FROM departments WHERE deptid = '{$inv['deptid']}' AND div = '" . USER_DIV . "'";
$deptRslt = db_exec($sql);
if (pg_numrows($deptRslt) < 1) {
$dept['deptname'] = "<li class=err>Department not Found.";
} else {
$dept = pg_fetch_array($deptRslt);
}
# Get selected Customer info
db_connect();
$sql = "SELECT * FROM customers WHERE cusnum = '{$inv['cusnum']}' AND location != 'int' AND div = '" . USER_DIV . "'";
$custRslt = db_exec($sql) or errDie("Unable to view customer");
if (pg_numrows($custRslt) < 1) {
db_connect();
# Query server for customer info
$sql = "SELECT cusnum,cusname,surname FROM customers WHERE deptid = '{$inv['deptid']}' AND location != 'int' AND lower(surname) LIKE lower('{$letters}%') AND blocked != 'yes' AND div = '" . USER_DIV . "' ORDER BY surname";
$custRslt = db_exec($sql) or errDie("Unable to view customers");
if (pg_numrows($custRslt) < 1) {
$err = "<li class=err>No customer names starting with <b>{$letters}</b> in database.";
return view_err($_POST, $err);
} else {
$customers = "<select name='cusnum' onChange='javascript:document.form.submit();'>";
$customers .= "<option value='-S' selected>Select Customer</option>";
while ($cust = pg_fetch_array($custRslt)) {
$customers .= "<option value='{$cust['cusnum']}'>{$cust['cusname']} {$cust['surname']}</option>";
}
$customers .= "</select>";
}
# Take care of the unset vars
$cust['addr1'] = "";
$cust['cusnum'] = "";
$cust['vatnum'] = "";
$cust['accno'] = "";
} else {
$cust = pg_fetch_array($custRslt);
$sql = "SELECT cusnum, cusname, surname FROM customers WHERE deptid = '{$inv['deptid']}' AND location != 'int' AND lower(surname) LIKE lower('{$letters}%') AND blocked != 'yes' AND div = '" . USER_DIV . "' ORDER BY surname";
$cusRslt = db_exec($sql) or errDie("Unable to view customers");
# Moarn if customer account has been blocked
if ($cust['blocked'] == 'yes') {
$error .= "<li class=err>Error : Selected customer account has been blocked.";
}
// $customers = "<input type=hidden name=cusnum value='$cust[cusnum]'>$cust[cusname] $cust[surname]";
$cusnum = $cust['cusnum'];
$customers = "<select name='cusnum' onChange='javascript:document.form.submit();'>";
// $customers .= "<option value='-S' selected>Select Customer</option>";
while ($cus = pg_fetch_array($cusRslt)) {
$sel = "";
if ($cust['cusnum'] == $cus['cusnum']) {
$sel = "selected";
}
$customers .= "<option value='{$cus['cusnum']}' {$sel}>{$cus['cusname']} {$cus['surname']}</option>";
}
$customers .= "</select>";
}
/* --- Start Drop Downs --- */
# Select warehouse
db_conn("exten");
$whs = "<select name='whidss[]' onChange='javascript:document.form.submit();'>";
$sql = "SELECT * FROM warehouses WHERE div = '" . USER_DIV . "' ORDER BY whname ASC";
$whRslt = db_exec($sql);
if (pg_numrows($whRslt) < 1) {
return "<li class=err> There are no Stores found in Cubit.";
} else {
$whs .= "<option value='-S' disabled selected>Select Store</option>";
while ($wh = pg_fetch_array($whRslt)) {
$whs .= "<option value='{$wh['whid']}'>({$wh['whno']}) {$wh['whname']}</option>";
}
}
$whs .= "</select>";
# Get sales people
db_conn("exten");
$sql = "SELECT * FROM salespeople WHERE div = '" . USER_DIV . "' ORDER BY salesp ASC";
$salespRslt = db_exec($sql) or errDie("Unable to get sales people.");
if (pg_numrows($salespRslt) < 1) {
return "<li class=err> There are no Sales People found in Cubit.";
} else {
$salesps = "<select name='salespn'>";
while ($salesp = pg_fetch_array($salespRslt)) {
if ($salesp['salesp'] == $inv['salespn']) {
$sel = "selected";
} else {
$sel = "";
}
$salesps .= "<option value='{$salesp['salesp']}' {$sel}>{$salesp['salesp']}</option>";
}
$salesps .= "</select>";
}
# Days drop downs
$days = array("0" => "0", "30" => "30", "60" => "60", "90" => "90", "120" => "120");
$termssel = extlib_cpsel("terms", $days, $inv['terms']);
# Keep the charge vat option stable
if ($inv['chrgvat'] == "inc") {
$chin = "checked=yes";
$chex = "";
$chno = "";
} elseif ($inv['chrgvat'] == "exc") {
$chin = "";
$chex = "checked=yes";
$chno = "";
} else {
$chin = "";
$chex = "";
$chno = "checked=yes";
}
# Format date
list($oyear, $omon, $oday) = explode("-", $inv['odate']);
/* --- End Drop Downs --- */
/* --- Start Products Display --- */
# Select all products
$products = "\n\t<table cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' border=0 width=100%>\n\t<tr><th>STORE</th><th>ITEM NUMBER</th><th>SERIAL NO.</th><th>DESCRIPTION</th><th>QTY</th><th>UNIT PRICE</th><th>UNIT DISCOUNT</th><th>AMOUNT</th><th>Remove</th><tr>";
# get selected stock in this invoice
db_connect();
$sql = "SELECT * FROM inv_items WHERE invid = '{$invid}' AND div = '" . USER_DIV . "'";
$stkdRslt = db_exec($sql);
$i = 0;
$key = 0;
while ($stkd = pg_fetch_array($stkdRslt)) {
# Keep track of selected stock amounts
$amts[$i] = $stkd['amt'];
$i++;
# Get warehouse name
db_conn("exten");
$sql = "SELECT whname FROM warehouses WHERE whid = '{$stkd['whid']}' AND div = '" . USER_DIV . "'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
# Get selected stock in this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE stkid = '{$stkd['stkid']}' AND div = '" . USER_DIV . "'";
$stkRslt = db_exec($sql);
$stk = pg_fetch_array($stkRslt);
# Serial number
if ($stk['serd'] == 'yes' && $inv['serd'] == 'n') {
$sers = ext_getavserials($stkd['stkid']);
$sernos = "<select class='width : 15' name='sernos[]'>";
foreach ($sers as $skey => $ser) {
$sernos .= "<option value='{$ser['serno']}'>{$ser['serno']}</option>";
}
$sernos .= "</select>";
} else {
$sernos = "<input type=hidden name=sernos[] value='{$stkd['serno']}'>{$stkd['serno']}";
}
# Input qty if not serialised
$qtyin = "<input type=text size=3 name=qtys[] value='{$stkd['qty']}'>";
if ($stk['serd'] == 'yes') {
$qtyin = "<input type=hidden size=3 name=qtys[] value='{$stkd['qty']}'>{$stkd['qty']}";
}
# check permissions
if (perm("invoice-unitcost-edit.php")) {
$viewcost = "<input type=text size=8 name=unitcost[] value='{$stkd['unitcost']}'>";
} else {
$viewcost = "<input type=hidden size=8 name=unitcost[] value='{$stkd['unitcost']}'>{$stkd['unitcost']}";
}
# Put in product
$products .= "<tr class='bg-odd'><td><input type=hidden name=whids[] value='{$stkd['whid']}'>{$wh['whname']}</td><td><input type=hidden name=stkids[] value='{$stkd['stkid']}'><a href='#bottom' onclick='openwindow(\"stock-amt-det.php?stkid={$stk['stkid']}\")'>{$stk['stkcod']}</a></td><td>{$sernos}</td><td>" . extlib_rstr($stk['stkdes'], 30) . "</td><td>{$qtyin}</td><td>{$viewcost}</td><td><input type=text size=4 name=disc[] value='{$stkd['disc']}'> OR <input type=text size=4 name=discp[] value='{$stkd['discp']}' maxlength=5>%</td><td><input type=hidden name=amt[] value='{$stkd['amt']}'> " . CUR . " {$stkd['amt']}</td><td><input type=checkbox name=remprod[] value='{$key}'><input type=hidden name=SCROLL value=yes></td></tr>";
$key++;
}
# Look above(remprod keys)
$keyy = $key;
# Look above(if i = 0 then there are no products)
if ($i == 0) {
$done = "";
} else {
$SCROLL = "yes";
}
# check if stock warehouse was selected
if (isset($whidss)) {
foreach ($whidss as $key => $whid) {
if (isset($stkidss[$key]) && $stkidss[$key] != "-S" && isset($cust['pricelist'])) {
# skip if not selected
if ($whid == "-S") {
continue;
}
# Get selected warehouse name
db_conn("exten");
$sql = "SELECT whname FROM warehouses WHERE whid = '{$whid}' AND div = '" . USER_DIV . "'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
# Get selected stock in this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE stkid = '{$stkidss[$key]}' AND div = '" . USER_DIV . "' ORDER BY stkcod ASC";
$stkRslt = db_exec($sql);
$stk = pg_fetch_array($stkRslt);
if ($stk['serd'] == 'yes') {
$sers = ext_getavserials($stkidss[$key]);
$sernos = "<select class='width : 15'name='sernos[]' onChange='javascript:document.form.submit();'>";
foreach ($sers as $skey => $ser) {
$sernos .= "<option value='{$ser['serno']}'>{$ser['serno']}</option>";
}
$sernos .= "</select>";
} else {
$sernos = "<input type=hidden name=sernos[] value=''>";
}
# Get price from price list if it is set
if (isset($cust['pricelist'])) {
# get selected stock in this warehouse
db_conn("exten");
$sql = "SELECT price FROM plist_prices WHERE listid = '{$cust['pricelist']}' AND stkid = '{$stk['stkid']}' AND div = '" . USER_DIV . "'";
$plRslt = db_exec($sql);
if (pg_numrows($plRslt) > 0) {
$pl = pg_fetch_array($plRslt);
$stk['selamt'] = $pl['price'];
}
}
/* -- Start Some Checks -- */
# check if they are selling too much
if ($stk['units'] - $stk['alloc'] < $qtyss[$key]) {
if (!in_array($stk['stkid'], explode(",", $stkerr))) {
if ($stk['type'] != 'lab') {
$stkerr .= ",{$stk['stkid']}";
$error .= "<li class=err>Warning : Item number <b>{$stk['stkcod']}</b> does not have enough items available.</li>";
}
}
}
/* -- End Some Checks -- */
# Calculate the Discount discount
if ($discs[$key] < 1) {
if ($discps[$key] > 0) {
$discs[$key] = round($discps[$key] / 100 * $stk['selamt'], 2);
}
} else {
$discps[$key] = round($discs[$key] * 100 / $stk['selamt'], 2);
}
# Calculate amount
$amt[$key] = $qtyss[$key] * ($stk['selamt'] - $discs[$key]);
# Input qty if not serialised
$qtyin = "<input type=text size=3 name=qtys[] value='{$qtyss[$key]}'>";
if ($stk['serd'] == 'yes') {
$qtyin = "<input type=hidden size=3 name=qtys[] value='{$qtyss[$key]}'>{$qtyss[$key]}";
}
# Check permissions
if (perm("invoice-unitcost-edit.php")) {
$viewcost = "<input type=text size=8 name=unitcost[] value='{$stk['selamt']}'>";
} else {
$viewcost = "<input type=hidden size=8 name=unitcost[] value='{$stk['selamt']}'>{$stk['selamt']}";
}
# Put in selected warehouse and stock
$products .= "<tr class='bg-odd'><td><input type=hidden name=whids[] value='{$whid}'>{$wh['whname']}</td><td><input type=hidden name=stkids[] value='{$stk['stkid']}'><a href='#bottom' onclick='openwindow(\"stock-amt-det.php?stkid={$stk['stkid']}\")'>{$stk['stkcod']}</a></td><td>{$sernos}</td><td>" . extlib_rstr($stk['stkdes'], 30) . "</td><td>{$qtyin}</td><td>{$viewcost}</td><td><input type=text size=4 name=disc[] value='{$discs[$key]}'> OR <input type=text size=4 name=discp[] value='{$discps[$key]}' maxlength=5>%</td><td><input type=hidden name=amt[] value='{$amt[$key]}'> " . CUR . " {$amt[$key]}</td><td><input type=checkbox name=remprod[] value='{$keyy}'></td></tr>";
$keyy++;
} else {
if (!isset($diffwhBtn)) {
# skip if not selected
if ($whid == "-S") {
continue;
}
# get warehouse name
db_conn("exten");
$sql = "SELECT whname FROM warehouses WHERE whid = '{$whid}' AND div = '" . USER_DIV . "'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
if (isset($ria) and $ria != "") {
$len = strlen($ria);
$Wh = "AND lower(substr(stkcod,1,'{$len}'))=lower('{$ria}')";
} else {
$Wh = "";
$ria = "";
}
# get stock on this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE whid = '{$whid}' AND blocked = 'n' AND div = '" . USER_DIV . "' {$Wh} ORDER BY stkcod ASC";
$stkRslt = db_exec($sql) or errDie("Unable to retrieve stocks from database.");
if (pg_numrows($stkRslt) < 1) {
$error .= "<li class=err>There are no stock items in the selected warehouse.";
continue;
}
if (pg_numrows($stkRslt) == 1) {
$ex = "selected";
} else {
$ex = "";
}
$stks = "<select class='width : 15'name='stkidss[]' onChange='javascript:document.form.submit();'>";
$stks .= "<option value='-S' disabled selected>Select Number</option>";
$count = 0;
while ($stk = pg_fetch_array($stkRslt)) {
$stks .= "<option value='{$stk['stkid']}'>{$stk['stkcod']} (" . ($stk['units'] - $stk['alloc']) . ")</option>";
}
$stks .= "</select> ";
# put in drop down and warehouse
$products .= "<tr class='bg-odd'><td><input type=hidden name=whidss[] value='{$whid}'>{$wh['whname']}</td><td>{$stks}</td><td> </td><td> </td><td><input type=hidden size=3 name='qtyss[]' value='1'>1</td><td> </td><td><input type=text size=4 name=discs[] value='0'> OR <input type=text size=4 name=discps[] value='0' maxlength=5>%</td><td><input type=hidden name=amts[] value='0.00'>" . CUR . " 0.00</td><td></td></tr>";
}
}
}
} else {
if (!isset($diffwhBtn)) {
# check if setting exists
db_connect();
$sql = "SELECT value FROM set WHERE label = 'DEF_WH' AND div = '" . USER_DIV . "'";
$Rslt = db_exec($sql) or errDie("Unable to check database for existing settings.");
if (pg_numrows($Rslt) > 0) {
$set = pg_fetch_array($Rslt);
$whid = $set['value'];
if (isset($wtd)) {
$whid = $wtd;
}
# get selected warehouse name
db_conn("exten");
$sql = "SELECT whname FROM warehouses WHERE whid = '{$whid}' AND div = '" . USER_DIV . "'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
if (isset($ria) and $ria != "") {
$len = strlen($ria);
$Wh = "AND lower(substr(stkcod,1,'{$len}'))=lower('{$ria}')";
} else {
$Wh = "";
$ria = "";
}
# get stock on this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE whid = '{$whid}' AND blocked = 'n' AND div = '" . USER_DIV . "' {$Wh} ORDER BY stkcod ASC";
$stkRslt = db_exec($sql) or errDie("Unable to retrieve stocks from database.");
if (pg_numrows($stkRslt) < 1) {
if (!isset($err)) {
$err = "";
}
$err .= "<li>There are no stock items in the selected store.";
//ontinue;
}
$stks = "<select name='stkidss[]' onChange='javascript:document.form.submit();'>";
$stks .= "<option value='-S' disabled selected>Select Number</option>";
$count = 0;
while ($stk = pg_fetch_array($stkRslt)) {
$stks .= "<option value='{$stk['stkid']}'>{$stk['stkcod']} (" . ($stk['units'] - $stk['alloc']) . ")</option>";
}
$stks .= "</select> ";
$products .= "<tr class='bg-odd'><td><input type=hidden name=whidss[] value='{$whid}'>{$wh['whname']}</td><td>{$stks}</td><td> </td><td></td><td><input type=hidden size=3 name=qtyss[] value='1'>1</td><td> </td><td><input type=text size=4 name=discs[] value='0'> OR <input type=text size=4 name=discps[] value='0' maxlength=5>%</td><td>" . CUR . " 0.00</td><td></td></tr>";
} else {
$products .= "<tr class='bg-odd'><td>{$whs}</td><td> </td><td></td><td> </td><td> </td><td> </td><td><input type=text size=4 name=discs[] value='0'> OR <input type=text size=4 name=discps[] value='0' maxlength=5>%</td><td>" . CUR . " 0.00</td><td></td></tr>";
}
}
}
/* -- start Listeners -- */
if (isset($diffwhBtn)) {
$products .= "<tr class='bg-odd'><td>{$whs}</td><td> </td><td></td><td> </td><td> </td><td> </td><td><input type=text size=4 name=discs[] value='0'> OR <input type=text size=4 name=discps[] value='0' maxlength=5>%</td><td>" . CUR . " 0.00</td><td></td></tr>";
}
/* -- End Listeners -- */
$products .= "</table>";
/* --- End Products Display --- */
/* --- Start Some calculations --- */
# Calculate subtotal
$SUBTOT = sprint($inv['subtot']);
//print "<br>TOTAL:$inv[total] VAT:$inv[vat]<br>";
# Calculate tradediscm
if ($inv['traddisc'] > 0) {
$traddiscm = sprint($inv['traddisc'] / 100 * $inv['total']);
} else {
$traddiscm = "0.00";
}
$VATP = TAX_VAT;
# Calculate subtotal
$SUBTOT = sprint($inv['subtot']);
$VAT = sprint($inv['vat']);
$TOTAL = sprint($inv['total']);
$inv['delchrg'] = sprint($inv['delchrg']);
/* --- End Some calculations --- */
/*--- Start checks --- */
# check only if the customer is selected
if (isset($cusnum) && $cusnum != "-S") {
#check againg credit limit
if ($TOTAL + $cust['balance'] > $cust['credlimit']) {
$error .= "<li class=err>Warning : Customers Credit limit of <b>" . CUR . " {$cust['credlimit']}</b> has been exceeded";
# Check permissions
if (!perm("invoice-limit-override.php")) {
$done = "";
}
}
$avcred = $cust['credlimit'] - $cust['balance'];
} else {
$avcred = "0.00";
}
/*--- Start checks --- */
/* -- Final Layout -- */
$details = "<center><h3>New Invoice</h3>\n\t<form action='" . SELF . "' method=post name=form>\n\t<input type=hidden name=key value=update>\n\t<input type=hidden name=invid value='{$invid}'>\n\t<input type=hidden name=letters value='{$letters}'>\n\t<input type=hidden name=stkerr value='{$stkerr}'>\n\t<table cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' border=0 width=95%>\n \t<tr><td valign=top width=50%>\n\t\t<table cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' border=0>\n\t\t\t<tr><th colspan=2> Customer Details </th></tr>\n\t\t\t<tr class='bg-odd'><td>Department</td><td valign=center>{$dept['deptname']}</td></tr>\n\t\t\t<tr class='bg-even'><td>Account No.</td><td valign=center>{$cust['accno']}</td></tr>\n\t\t\t<tr class='bg-odd'><td>Customer</td><td valign=center>{$customers}</td></tr>\n\t\t\t<tr class='bg-even'><td valign=top>Customer Address</td><td valign=center>" . nl2br($cust['addr1']) . "</td></tr>\n\t\t\t<tr class='bg-odd'><td>Customer Order number</td><td valign=center><input type=text size=10 name=cordno value='{$inv['cordno']}'></td></tr>\n\t\t\t<tr class='bg-even'><td>Customer Vat Number</td><td>{$cust['vatnum']}</td></tr>\n\t\t\t<tr><th colspan=2>Point of Sale</th></tr>\n\t\t\t<tr class='bg-even'><td>Barcode</td><td><input type=text size=13 name=bar value=''></td></tr>\n\t\t\t<tr class='bg-odd' " . ass("Type the first letters of the stock code you are looking for.") . "><td>Stock Filter</td><td><input type=text size=13 name=ria value='{$ria}' onkeyup='javasript:predict()'></td></tr>\n\t\t</table>\n\t</td><td valign=top align=right width=50%>\n\t\t<table cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' border=0>\n\t\t\t<tr><th colspan=2> Invoice Details </th></tr>\n\t\t\t<tr class='bg-odd'><td>Invoice No.</td><td valign=center>TI {$inv['invid']}</td></tr>\n\t\t\t<tr class='bg-even'><td>Proforma Inv No.</td><td valign=center><input type=text size=5 name=docref value='{$inv['docref']}'></td></tr>\n\t\t\t<tr class='bg-odd'><td>Sales Order No.</td><td valign=center><input type=text size=5 name=ordno value='{$inv['ordno']}'></td></tr>\n\t\t\t<tr class='bg-even'><td>VAT Inclusive</td><td valign=center>Yes <input type=radio size=7 name=chrgvat value='inc' {$chin}> No<input type=radio size=7 name=chrgvat value='exc' {$chex}> Excempt From Vat<input type=radio size=7 name=chrgvat value='nov' {$chno}></td></tr>\n\t\t\t<tr class='bg-odd'><td>Terms</td><td valign=center>{$termssel} Days</td></tr>\n\t\t\t<tr class='bg-even'><td>Sales Person</td><td valign=center>{$salesps}</td></tr>\n\t\t\t<tr class='bg-odd'><td>Invoice Date</td><td valign=center><table><tr><td><input type=text size=2 name=oday maxlength=2 value='{$oday}'></td><td>-</td><td><input type=text size=2 name=omon maxlength=2 value='{$omon}'></td><td>-</td><td><input type=text size=4 name=oyear maxlength=4 value='{$oyear}'></td><td></tr></table></td></tr>\n\t\t\t<tr class='bg-even'><td>Available Credit</td><td>" . CUR . " {$avcred}</td></tr>\n\t\t\t<tr class='bg-odd'><td>Trade Discount</td><td valign=center><input type=text size=5 name=traddisc value='{$inv['traddisc']}'>%</td></tr>\n\t\t\t<tr class='bg-even'><td>Delivery Charge</td><td valign=center><input type=text size=7 name=delchrg value='{$inv['delchrg']}'></td></tr>\n\t\t</table>\n\t</td></tr>\n\t<tr><td><br></td></tr>\n\t<tr><td colspan=2>{$products}</td></tr>\n\t<tr><td>\n\t\t<p>\n\t\t<table border=0 cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' width=100%>\n\t\t\t<tr><th width=25%>Quick Links</th><th width=25%>Comments</th><td rowspan=5 valign=top width=50%>{$error}</td></tr>\n\t\t\t<tr><td class='bg-odd'><a href='cust-credit-stockinv.php'>New Invoice</a></td><td class='bg-odd' rowspan=4 align=center valign=top><textarea name=comm rows=4 cols=20>{$inv['comm']}</textarea></td></tr>\n\t\t\t<tr class='bg-odd'><td><a href='invoice-view.php'>View Invoices</a></td></tr>\n\t\t\t<script>document.write(getQuicklinkSpecial());</script>\n\t\t\t<tr class='bg-odd'><td><a href='main.php'>Main Menu</a></td></tr>\n\t\t</table>\n\t</td><td align=right valign=top>\n\t\t<table cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' border=0 width=50%>\n\t\t\t<tr class='bg-odd'><td>SUBTOTAL</td><td align=right>" . CUR . " <input type=hidden name=SUBTOT value='{$SUBTOT}'>{$SUBTOT}</td></tr>\n\t\t\t<tr class='bg-even'><td>Trade Discount</td><td align=right>" . CUR . " {$inv['discount']}</td></tr>\n\t\t\t<tr class='bg-odd'><td>Delivery Charge</td><td align=right>" . CUR . " {$inv['delivery']}</td></tr>\n\t\t\t<tr class='bg-even'><td><b>VAT @ {$VATP}%</b></td><td align=right>" . CUR . " {$VAT}</td></tr>\n\t\t\t<tr class='bg-odd'><th>GRAND TOTAL</th><td align=right>" . CUR . " {$TOTAL}</td></tr>\n\t\t</table>\n\t</td></tr>\n\t<tr><td align=right><input type=button value='« Back' onClick='javascript:history.back()'> | <input name=diffwhBtn type=submit value='Different Store'> | <input name=addprodBtn type=submit value='Add Product'> | <input type=submit name='saveBtn' value='Save'> </td><td>| <input type=submit name='upBtn' value='Update'>{$done}</td></tr>\n\t</table><a name=bottom>\n\t</form></center>";
return $details;
}
function enter($err = "")
{
extract($_REQUEST);
$fields = grp(m("deptid", 0), m("accno", false), m("surname", ""), m("title", ""), m("location", ""), m("fcid", ""), m("category", 0), m("class", 0), m("init", ""), m("sales_rep", 0), m("paddr1", ""), m("addr1", ""), m("del_addr1", ""), m("comments", ""), m("vatnum", ""), m("contname", ""), m("bustel", ""), m("tel", ""), m("cellno", ""), m("fax", ""), m("email", ""), m("url", ""), m("pricelist", 0), m("traddisc", 0), m("setdisc", 0), m("setdays", 1), m("chrgint", 0), m("overdue", 0), m("intrate", 0), m("o_year", date("Y")), m("o_month", date("m")), m("o_day", date("d")), m("credterm", 0), m("credlimit", ""), m("lead_source", 0), m("bankname", ""), m("branname", ""), m("brancode", ""), m("bankaccname", ""), m("bankaccno", ""), m("bankacctype", ""), m("team_id", 0), m("registration", ""), m("bankacct", ""), m("bankid", 0), m("blocked", "no"));
if (isset($cusnum)) {
if ($cusnum == "-S") {
return "<li class='err'>Invalid Customer</li><br><input type='button' value='[X] Close' onClick=\"window.close();\">";
}
$qry = new dbSelect("customers", "cubit", grp(m("where", "cusnum='{$cusnum}'")));
$qry->run();
if ($qry->num_rows() <= 0) {
$OUT = "<li class='err'>Customer not found.</li>";
return $OUT;
}
$c = $qry->fetch_array();
$qry->free();
/* split the date into the fields */
list($c["o_year"], $c["o_month"], $c["o_day"]) = explode("-", $c["odate"]);
foreach ($fields as $k => $v) {
if (isset($c[$k])) {
$fields[$k] = $c[$k];
}
}
$cusid = "<input type='hidden' name='cusnum' value='{$cusnum}' />";
} else {
$cusid = "";
}
extract($fields, EXTR_SKIP);
/* get next available account number */
if ($accno === false) {
$lastid = pglib_lastid("cubit.customers", "cusnum");
$sql = "SELECT accno FROM cubit.customers WHERE cusnum = '{$lastid}' AND div = '" . USER_DIV . "'";
$accRslt = db_exec($sql);
if (pg_numrows($accRslt) < 1) {
do {
$lastid--;
# get last account number
$sql = "SELECT accno FROM cubit.customers WHERE cusnum = '{$lastid}' AND div = '" . USER_DIV . "'";
$accRslt = db_exec($sql);
if (pg_numrows($accRslt) < 1) {
$accno = "";
$naccno = "";
} else {
$acc = pg_fetch_array($accRslt);
$accno = $acc['accno'];
}
} while (strlen($accno) < 1 && $lastid > 1);
} else {
$acc = pg_fetch_array($accRslt);
$accno = $acc['accno'];
}
if (strlen($accno) > 0) {
$num = preg_replace("/[^\\d]+/", "", $accno);
$num++;
$chars = preg_replace("/[\\d]/", "", $accno);
$naccno = $chars . $num;
} else {
$naccno = 1;
}
$accno = $naccno;
}
/* customer categories */
$qry = qryCategory();
$cats = db_mksel($qry, "category", $category, "#catid", "#category");
/* customer class */
$qry = qryClass();
$classlist = db_mksel($qry, "class", $class, "#clasid", "#classname");
/* pricelists */
$qry = qryPricelist();
$pricelists = db_mksel($qry, "pricelist", $pricelist, "#listid", "#listname");
/* customer departments */
$qry = qryDepartment();
$depts = db_mksel($qry, "deptid", $deptid, "#deptid", "#deptname");
/* customer title */
$get_titles = "SELECT title FROM titles ORDER BY title";
$run_titles = db_exec($get_titles) or errDie("Unable to get title information.");
if (pg_numrows($run_titles) < 1) {
$titles = array("Mr" => "Mr", "Mrs" => "Mrs", "Miss" => "Miss");
} else {
$titles = array();
while ($tarr = pg_fetch_array($run_titles)) {
$titles[$tarr['title']] = $tarr['title'];
}
}
$titles = extlib_cpsel("title", $titles, $title);
/* credit terms */
$qry = new dbSelect("ct", "exten", grp(m("where", "div='" . USER_DIV . "'")));
$qry->run();
while ($cd = $qry->fetch_array()) {
$days[$cd['days']] = $cd['days'];
}
$cred_days = array("0" => "0", "30" => "30", "60" => "60");
$credterms = extlib_cpsel("credterm", $cred_days, $credterm);
// unset so we can use same array
unset($days);
/* overdue periods */
// $qry = new dbSelect("od", "exten", grp(
// m("where", "div='".USER_DIV."'")
// ));
// $qry->run();
// while ($cd = $qry->fetch_array()) {
// $days[$cd['days']] = $cd['days'];
// }
// $overdues = extlib_cpsel("overdue", $days, $overdue);
/* customer is local/international */
$locs = grp(m("loc", "Local"), m("int", "International"));
$locsel = extlib_cpsel("location", $locs, $location);
/* currency */
$qry = qryCurrency();
$currsel = db_mksel($qry, "fcid", $fcid, "#fcid", "#descrip");
/* lead sources */
$select_source = extlib_cpsel("lead_source", crm_get_leadsrc(-1), $lead_source);
/* something from crm */
if (isset($_GET["crm"])) {
$ex = "<input type='hidden' name='crm' value='' />";
} else {
$ex = "";
}
/* sales rep selection */
$qry = qrySalesPerson();
$sales_reps = db_mksel($qry, "sales_rep", $sales_rep, "#salespid", "#salesp", "0:None");
if (!isset($re)) {
$re = "not";
} else {
$re = remval($re);
}
if (isset($cusnum)) {
$bran = "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Branches</td>\n\t\t\t\t<td><input type='button' onClick=\"window.open('cust-branch-add.php?cusnum={$cusnum}','','width=380,height=300,status=1')\" value='Add Branch'><input type=button onClick=\"window.open('cust-branch-view.php?cusnum={$cusnum}','','width=500,height=400,status=1')\" value='View Branch'></td>\n\t\t\t</tr>";
} else {
$bran = "";
}
// Retrieve teams
$sql = "SELECT * FROM crm.teams ORDER BY name ASC";
$team_rslt = db_exec($sql) or errDie("Unable to retrieve teams.");
$team_sel = "<select name='team_id'>";
$team_sel .= "<option value='0'>[None]</option>";
while ($team_data = pg_fetch_array($team_rslt)) {
if ($team_id == $team_data["id"]) {
$sel = "selected";
} else {
$sel = "";
}
$team_sel .= "<option value='{$team_data['id']}' {$sel}>{$team_data['name']}</option>";
}
$team_sel .= "</select>";
$get_accts = "SELECT * FROM bankacct ORDER BY accname";
$run_accts = db_exec($get_accts) or errDie("Unable to get bank account information.");
if (pg_numrows($run_accts) < 1) {
$bankacct_drop = "";
} else {
$bankacct_drop = "<select name='bankid'>";
while ($barr = pg_fetch_array($run_accts)) {
if ($bankid == $barr['bankid']) {
$bankacct_drop .= "<option value='{$barr['bankid']}' selected>({$barr['acctype']}) {$barr['accname']}</option>";
} else {
$bankacct_drop .= "<option value='{$barr['bankid']}'>({$barr['acctype']}) {$barr['accname']}</option>";
}
}
$bankacct_drop .= "</select>";
}
$setdayssel1 = "";
$setdayssel2 = "";
$setdayssel3 = "";
$setdayssel4 = "";
$setdayssel5 = "";
if (isset($setdays) and $setdays == "0") {
$setdayssel1 = "selected";
}
if (isset($setdays) and $setdays == "1") {
$setdayssel2 = "selected";
}
if (isset($setdays) and $setdays == "7") {
$setdayssel3 = "selected";
}
if (isset($setdays) and $setdays == "15") {
$setdayssel4 = "selected";
}
if (isset($setdays) and $setdays == "25") {
$setdayssel5 = "selected";
}
// <option $setdayssel1 value='0'>Last Day Of The Month</option>
$setdays_drop = "\n\t\t<select name='setdays'>\n\t\t\t<option {$setdayssel2} value='1'>1st Day Of The Month</option>\n\t\t\t<option {$setdayssel3} value='7'>7th Of The Month</option>\n\t\t\t<option {$setdayssel4} value='15'>15th Of The Month</option>\n\t\t\t<option {$setdayssel5} value='25'>25th Of The Month</option>\n\t\t</select>";
//Overdue $overdues
$display_piclist = "";
$display_iframe = "";
#check if this cust has any pics ...
if (isset($cusnum) and strlen($cusnum) > 0) {
#editing customer ... show frame if we have pics
$get_pics = "SELECT * FROM display_images WHERE type = 'customer' AND ident_id = '{$cusnum}' LIMIT 1";
$run_pics = db_exec($get_pics) or errDie("Unable to get customer images information.");
if (pg_numrows($run_pics) < 1) {
#no pics for this customer
$display_iframe = "";
} else {
#compile listing for customer
$get_piclist = "SELECT * FROM display_images WHERE type = 'customer' AND ident_id = '{$cusnum}'";
$run_piclist = db_exec($get_piclist) or errDie("Unable to get customer images information.");
if (pg_numrows($run_piclist) < 1) {
#wth .. pic went missing somewhere ...
#so nothing
} else {
$display_piclist = "\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<td colspan='2'>\n\t\t\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t\t<th>Picture Name</th>\n\t\t\t\t\t\t\t\t\t<th>View</th>\n\t\t\t\t\t\t\t\t\t<th>Remove</th>\n\t\t\t\t\t\t\t\t</tr>";
while ($arr = pg_fetch_array($run_piclist)) {
$display_piclist .= "\n\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t<td>{$arr['image_name']}</td>\n\t\t\t\t\t\t\t\t\t<td><a target='iframe1' href='view_image.php?picid={$arr['id']}'>View</a></td>\n\t\t\t\t\t\t\t\t\t<td><input type='checkbox' name='rempicid[{$arr['id']}]' value='yes'></td>\n\t\t\t\t\t\t\t\t</tr>";
#at least 1 picture for this customer
$display_iframe = "<tr><td colspan='2'><iframe name='iframe1' width='200' height='260' scrolling='false' marginwidth='0' marginheight='0' frameborder='0' src='view_image.php?picid={$arr['id']}'></iframe></td></tr>";
}
$display_piclist .= "\n\t\t\t\t\t\t\t</table>\n\t\t\t\t\t\t</td>\n\t\t\t\t\t</tr>";
}
}
}
$show_back_button = "";
$show_next_button = "";
$showbuttons = "";
if (isset($cusnum) and strlen($cusnum) > 0 and $cusnum != 0) {
db_connect();
#get 1 lower cusnum
$get_prev = "SELECT cusnum FROM customers WHERE cusnum < '{$cusnum}' ORDER BY cusnum DESC LIMIT 1";
$run_prev = db_exec($get_prev) or errDie("Unable to get previous customer information.");
if (pg_numrows($run_prev) > 0) {
$back_cusnum = pg_fetch_result($run_prev, 0, 0);
$show_back_button = "<input type='button' onClick=\"document.location='customers-new.php?cusnum={$back_cusnum}';\" value='View Previous Customer'>";
}
$get_next = "SELECT cusnum FROM customers WHERE cusnum > '{$cusnum}' ORDER BY cusnum ASC LIMIT 1";
$run_next = db_exec($get_next) or errDie("Unable to get next customer information.");
if (pg_numrows($run_next) > 0) {
$next_cusnum = pg_fetch_result($run_next, 0, 0);
$show_next_button = "<input type='button' onClick=\"document.location='customers-new.php?cusnum={$next_cusnum}';\" value='View Next Customer'>";
}
$showbuttons = "{$show_back_button} {$show_next_button} <br><br>";
$showcontact = "<input type='button' onClick=\"popupSized('conper-add.php?type=cust&id={$cusnum}','Add Additional Contact','880','580')\" value='Add Additional Contact'>";
}
//http://127.0.0.1/cubit3.33/conper-add.php?type=cust&id=2
// Layout
$OUT = "\n\t\t{$showbuttons}\n\t\t<form action='" . SELF . "' method='POST'>\n\t\t\t{$err}\n\t\t\t<input type='hidden' name='key' value='confirm' />\n\t\t\t<input type='hidden' name='re' value='{$re}' />\n\t\t\t<input type='hidden' name='blocked' value='{$blocked}' />\n\t\t\t{$ex}\n\t\t\t{$cusid}\n\t\t\t" . onthespot_passon() . "\n\t\t<table cellpadding='0' cellspacing='0'>\n\t\t\t<tr>\n\t\t\t\t<th colspan='2'>Add Customer : Customer Details</th>\n\t\t\t</tr>\n\t\t\t<tr valign='top'>\n\t\t\t\t<td>\n\t\t\t\t<table " . TMPL_tblDflts . " width='100%'>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>" . REQ . "Department</td>\n\t\t\t\t\t\t<td>{$depts}</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>" . REQ . "Acc No</td>\n\t\t\t\t\t\t<td><input type='text' size='20' name='accno' value='{$accno}' /></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>" . REQ . "Company/Name</td>\n\t\t\t\t\t\t<td><input type='text' size='20' name='surname' value='{$surname}' /></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>" . REQ . "Registration/ID</td>\n\t\t\t\t\t\t<td><input type='text' size='20' name='registration' value='{$registration}'></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>" . REQ . "Title {$titles}</td>\n\t\t\t\t\t\t<td>Initials <input type='text' size='15' name='init' value='{$init}' /></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>" . REQ . "Type</td>\n\t\t\t\t\t\t<td>{$locsel}</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>" . REQ . "Currency</td>\n\t\t\t\t\t\t<td>{$currsel}</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "' " . ass("Categories are used to group customers. For example: PTA,JHB,CT") . ">\n\t\t\t\t\t\t<td>" . REQ . "Category</td>\n\t\t\t\t\t\t<td>{$cats}</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "' " . ass("Classifications are used to group customers. For example: Wholesale,Retail") . ">\n\t\t\t\t\t\t<td>" . REQ . "Classification</td>\n\t\t\t\t\t\t<td>{$classlist}</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>Link to Sales rep</td>\n\t\t\t\t\t\t<td>{$sales_reps}</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td valign='top'>" . REQ . " Postal Address</td>\n\t\t\t\t\t\t<td valign='center'><textarea rows='4' cols='19' name='paddr1'>{$paddr1}</textarea></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td valign='top'>\n\t\t\t\t\t\t\t" . REQ . " Physical Address<br>\n\t\t\t\t\t\t\t<font size='-2'>\n\t\t\t\t\t\t\t\t<input style='width: 11px; height: 11px;' type='checkbox' name='addr_same' " . (isset($addr_same) ? "checked='t'" : "") . " />\n\t\t\t\t\t\t\t\tSame As Postal Address\n\t\t\t\t\t\t\t</font>\n\t\t\t\t\t\t</td>\n\t\t\t\t\t\t<td valign='center'><textarea rows='4' cols='19' name='addr1'>{$addr1}</textarea></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td valign='top'>Delivery Address</td>\n\t\t\t\t\t\t<td valign='center'><textarea rows='4' cols='19' name='del_addr1'>{$del_addr1}</textarea></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t{$bran}\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>Team Permissions</td>\n\t\t\t\t\t\t<td>{$team_sel}</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td valign='top'>Comments</td>\n\t\t\t\t\t\t<td valign='center'><textarea rows='4' cols='19' name='comments'>{$comments}</textarea></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr><td><br></td></tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<th colspan='2'> Bank Details</th>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>Bank </td>\n\t\t\t\t\t\t<td><input type='text' size='20' name='bankname' value='{$bankname}'></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>Branch</td>\n\t\t\t\t\t\t<td><input type='text' size='20' name='branname' value='{$branname}'></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>Branch Code</td>\n\t\t\t\t\t\t<td><input type='text' size='20' name='brancode' value='{$brancode}'></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>Account Name</td>\n\t\t\t\t\t\t<td><input type='text' size='20' name='bankaccname' value='{$bankaccname}'></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>Account Number</td>\n\t\t\t\t\t\t<td><input type='text' size='20' name='bankaccno' value='{$bankaccno}'></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>Account Type</td>\n\t\t\t\t\t\t<td><input type='text' size='20' name='bankacctype' value='{$bankacctype}'></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>Bank Account To Use</td>\n\t\t\t\t\t\t<td>{$bankacct_drop}</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr><td><br></td></tr>\n\t\t\t\t</table>\n\t\t\t\t</td>\n\t\t\t\t<td>\n\t\t\t\t<table " . TMPL_tblDflts . " width='100%'>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>" . REQ . "VAT Number</td>\n\t\t\t\t\t\t<td><input type='text' size='21' name='vatnum' value='{$vatnum}' /></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>" . REQ . "Business Tel.</td>\n\t\t\t\t\t\t<td><input type='text' size='21' name='bustel' value='{$bustel}' /></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>Contact Name</td>\n\t\t\t\t\t\t<td>\n\t\t\t\t\t\t\t<input type='text' size='21' name='contname' value='{$contname}' />\n\t\t\t\t\t\t\t{$showcontact}\n\t\t\t\t\t\t</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>Home Tel.</td>\n\t\t\t\t\t\t<td><input type='text' size='21' name='tel' value='{$tel}' /></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>Cell No.</td>\n\t\t\t\t\t\t<td><input type='text' size='21' name='cellno' value='{$cellno}' /></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>Fax No.</td>\n\t\t\t\t\t\t<td><input type='text' size='21' name='fax' value='{$fax}' /></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>E-mail</td>\n\t\t\t\t\t\t<td><input type='text' size='21' name='email' value='{$email}' /></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>Web Address</td>\n\t\t\t\t\t\t<td>http://<input type='text' size='30' name='url' value='{$url}' /></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "' " . ass("When invoicing prices comes from the pricelist. Add more at stock settings.") . ">\n\t\t\t\t\t\t<td>" . REQ . "Price List</td>\n\t\t\t\t\t\t<td>{$pricelists}</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td " . ass("This is the default discount on invoices, but can be changed per invoice") . ">Trade Discount <input type='text' size='6' name='traddisc' value='{$traddisc}' />%</td>\n\t\t\t\t\t\t<td>Settlement Discount <input type='text' size='7' name='setdisc' value='{$setdisc}' />%</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>" . REQ . "Charge Interest : Yes <input type='radio' name='chrgint' value='yes' " . ($chrgint == "yes" ? "checked='t'" : "") . " /> No<input type='radio' name='chrgint' value='no' " . ($chrgint != "yes" ? "checked='t'" : "") . " /></td>\n\t\t\t\t\t\t<td>Statement Day {$setdays_drop}</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td " . ass("Depending on interest settings, invoices older than this will get interest.") . ">Interest Rate <input type='text' size='7' name='intrate' value='{$intrate}' />%</td>\n\t\t\t\t\t\t<td></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>Account Open Date</td>\n\t\t\t\t\t\t<td>" . mkDateSelect("o", $o_year, $o_month, $o_day) . "</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>Default Credit Term {$credterms}</td>\n\t\t\t\t\t\t<td>Credit Limit <input type='text' size='7' name='credlimit' value='{$credlimit}'/></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>Lead Source</td>\n\t\t\t\t\t\t<td>{$select_source}</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr><td><br></td></tr>\n\t\t\t\t\t{$display_iframe}\n\t\t\t\t\t{$display_piclist}\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<td colspan='2' align='right'><input type='submit' value='Confirm »' /></td>\n\t\t\t\t\t</tr>\n\t\t\t\t</table>\n\t\t\t\t</form>\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td align='center'>\n\t\t\t\t\t</table>" . mkQuickLinks(ql("customers-view.php", "View Customers"));
return $OUT;
}
function slct($err = "")
{
global $_POST;
extract($_POST);
if (isset($letters)) {
$letters = remval($letters);
$whe = "AND lower(surname) LIKE lower('%{$letters}%')";
} else {
$letters = "";
$whe = "";
}
db_connect();
$sql = "SELECT * FROM customers WHERE div = '" . USER_DIV . "' AND location != 'int' {$whe} ORDER BY lower(surname) ASC";
$cusRslt = db_exec($sql) or errDie("Could not retrieve Customers Information from the Database.", SELF);
$custs = "<select name='sval'>";
if (pg_numrows($cusRslt) < 1) {
$custs .= "<option value='-S'></option>";
}
while ($cus = pg_fetch_array($cusRslt)) {
$custs .= "<option value='{$cus['cusnum']}'>{$cus['surname']}</option>";
}
$custs .= "</select>";
$sql = "SELECT * FROM bankacct WHERE btype != 'int' AND div = '" . USER_DIV . "'";
$Rs = db_exec($sql);
$numrows = pg_numrows($Rs);
if (empty($numrows)) {
return "<li class='err'> There are no accounts held at the selected Bank.</li>\n\t\t<p><input type='button' onClick='JavaScript:history.back();' value='« Correct Selection'>";
}
$banks = "<select name='bankid'>";
while ($acc = pg_fetch_array($Rs)) {
$banks .= "<option value={$acc['bankid']}>{$acc['accname']} - {$acc['bankname']} ({$acc['acctype']})</option>";
}
$banks .= "</select>";
db_conn("exten");
$sql = "SELECT * FROM departments WHERE div = '" . USER_DIV . "' ORDER BY deptname ASC";
$deptRslt = db_exec($sql);
$depts = "<select name='cval'>";
if (pg_numrows($deptRslt) < 1) {
$depts .= "<option value='-S'></option>";
}
while ($dept = pg_fetch_array($deptRslt)) {
$depts .= "<option value={$dept['deptid']}>{$dept['deptname']}</option>";
}
$depts .= "</select>";
//<tr class='bg-odd' ".ass("Select when the sale of non stock goods is a bank sale")."><td><input type=radio name=ctyp value='cb'>Bank Sale</td><td>$banks</td></tr>
$details = "\n\t\t<center>\n\t\t<h3>New Multi Line Invoice</h3>\n\t\t<h4>Customer Details</h4>\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t<input type='hidden' name='key' value='slct'>\n\t\t\t<input type='hidden' name='starting' value=''>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t<tr>\n\t\t\t\t<td colspan='2'>{$err}</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<th colspan='2'> Invoice Details </th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "' " . ass("Select when selling non stock goods to your customers") . ">\n\t\t\t\t<td><input type='radio' name='ctyp' value='s' checked='yes'> Select Customer</td>\n\t\t\t\t<td>{$custs}</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "' " . ass("Select when the sale of non stock goods is a cash sale") . ">\n\t\t\t\t<td><input type='radio' name='ctyp' value='c'>Cash Sale</td>\n\t\t\t\t<td>{$depts}</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "' " . ass("Select when the sale of non stock goods is not a cash sale") . ">\n\t\t\t\t<td><input type='radio' name='ctyp' value='ac'>Ledger Accounts Sale</td>\n\t\t\t\t<td class='err'>This selection will debit the amount of the invoice<br /> to a General Ledger account\n\t\t\t\t\tinstead of Debtors Control.</td>\n\t\t\t</tr>\n\t\t\t<tr><td><br></td></tr>\n\t\t\t<tr>\n\t\t\t\t<th colspan='2'>Search by surname</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td><input type='text' size='10' name='letters' value='{$letters}'></td>\n\t\t\t\t<td><input type='submit' value='Search »'></td>\n\t\t\t</tr>\n\t\t\t<tr><td><br></td></tr>\n\t\t\t<tr>\n\t\t\t\t<td align='center'></td>\n\t\t\t\t<td align='center'><input type='submit' name='button' value='Continue »'></td>\n\t\t\t</tr>\n\t\t</form>\n\t\t</table>";
return $details;
}
function acdetails($_GET)
{
# get vars
extract($_GET);
# validate input
require_lib("validate");
$v = new validate();
$v->isOk($invid, "num", 1, 20, "Invalid Invoice number.");
if (isset($ctyp) && $ctyp == 's') {
$v->isOk($cusnum, "num", 1, 20, "Invalid customer number.");
} elseif (isset($ctyp) && $ctyp == 'c') {
$v->isOk($deptid, "num", 1, 20, "Invalid Department.");
}
# display errors, if any
if ($v->isError()) {
$err = "";
$errors = $v->getErrors();
foreach ($errors as $e) {
$err .= "<li class='err'>" . $e["msg"] . "</li>";
}
$confirm = "{$err}<p><input type='button' onClick='JavaScript:history.back();' value='« Correct submission'>";
return $confirm;
}
# Get Invoice info
db_connect();
$sql = "SELECT * FROM nons_invoices WHERE invid = '{$invid}' AND div = '" . USER_DIV . "'";
$invRslt = db_exec($sql) or errDie("Unable to get invoices information");
if (pg_numrows($invRslt) < 1) {
return "<i class='err'>Not Found</i>";
}
$inv = pg_fetch_array($invRslt);
$details = "";
if ($ctyp == 's') {
$sql = "SELECT * FROM customers WHERE cusnum = '{$cusnum}' AND div = '" . USER_DIV . "'";
$custRslt = db_exec($sql) or errDie("Unable to view customer");
$cust = pg_fetch_array($custRslt);
$details = "\r\n\t\t<table " . TMPL_tblDflts . ">\r\n\t\t\t<tr><th colspan='2'> Customer Details </th></tr>\r\n\t\t\t<input type='hidden' name='cusnum' value={$cusnum}>\r\n\t\t\t<tr class='bg-odd'><td>Customer</td><td valign='center'>{$cust['cusname']} {$cust['surname']}</td></tr>\r\n\t\t\t<tr class='bg-even'><td>Customer Address</td><td valign='center'><pre>{$cust['addr1']}</pre></td></tr>\r\n\t\t\t<tr class='bg-odd'><td>Customer VAT Number</td><td valign='center'>{$cust['vatnum']}</td></tr>\r\n\t\t\t<tr class='bg-even'><td>Customer Order number</td><td valign='center'>{$inv['cordno']}</td></tr>\r\n\t\t</table>";
} elseif ($ctyp == 'ac') {
// db_conn("exten");
// $sql = "SELECT * FROM departments WHERE deptid = '$deptid'";
// $deptRslt = db_exec ($sql) or errDie ("Unable to view customers");
// $dept = pg_fetch_array($deptRslt);
$details = "\r\n\t\t<table " . TMPL_tblDflts . ">\r\n\t\t\t<tr><th colspan='2'> Customer Details </th></tr>\r\n\t\t\t<input type='hidden' name='deptid' value='{$deptid}'>\r\n\t\t\t<tr class='bg-odd'><td>Customer</td><td valign='center'>{$inv['cusname']} </td></tr>\r\n\t\t\t<tr class='bg-even'><td>Customer Address</td><td valign='center'><pre>{$inv['cusaddr']}</pre></td></tr>\r\n\t\t\t<tr class='bg-odd'><td>Customer VAT Number</td><td valign='center'>{$inv['cusvatno']}</td></tr>\r\n\t\t\t<tr class='bg-even'><td>Customer Order number</td><td valign='center'>{$inv['cordno']}</td></tr>\r\n\t\t";
}
$stkacc = "";
core_connect();
$sql = "SELECT * FROM accounts WHERE div = '" . USER_DIV . "' ORDER BY accname ASC";
$accRslt = db_exec($sql);
if (pg_numrows($accRslt) < 1) {
return "<li>There are No accounts in Cubit.";
}
while ($acc = pg_fetch_array($accRslt)) {
$stkacc .= "<option value='{$acc['accid']}'>{$acc['topacc']}/{$acc['accnum']} - {$acc['accname']}</option>";
}
$stkacc .= "</select>";
$details .= "<tr class='bg-even'><td>Select Account</td><td valign='center'><select name='accountc'>{$stkacc}</select></td></tr>\r\n\t</table>";
/* --- Start Products Display --- */
# Products layout
$products = "\r\n\t<table " . TMPL_tblDflts . " width='100%'>\r\n\t<tr>\r\n\t\t<th width='5%'>#</th>\r\n\t\t<th width='55%'>DESCRIPTION</th>\r\n\t\t<th width='10%'>QTY</th>\r\n\t\t<th width='10%'>UNIT PRICE</th>\r\n\t\t<th width='10%'>AMOUNT</th>\r\n\t\t<th width='10%'>ACCOUNT</th>\r\n\t<tr>";
# get selected stock in this Invoice
db_connect();
$sql = "SELECT * FROM nons_inv_items WHERE invid = '{$invid}' AND div = '" . USER_DIV . "'";
$stkdRslt = db_exec($sql);
$i = 0;
while ($stkd = pg_fetch_array($stkdRslt)) {
$i++;
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes WHERE id='{$stkd['vatex']}'";
$Ri = db_exec($Sl);
$vd = pg_fetch_array($Ri);
if (TAX_VAT != $vd['vat_amount'] and $vd['vat_amount'] != "0.00") {
$showvat = FALSE;
}
$stkacc = "<select name='stkaccs[{$stkd['id']}]'>";
core_connect();
$sql = "SELECT * FROM accounts WHERE div = '" . USER_DIV . "' ORDER BY accname ASC";
$accRslt = db_exec($sql);
if (pg_numrows($accRslt) < 1) {
return "<li>There are No accounts in Cubit.";
}
while ($acc = pg_fetch_array($accRslt)) {
$sel = fsel($stkd["accid"] == $acc["accid"]);
$stkacc .= "<option {$sel} value='{$acc['accid']}'>{$acc['topacc']}/{$acc['accnum']} - {$acc['accname']}</option>";
}
$stkacc .= "</select>";
# put in product
$products .= "\r\n\t\t<tr class='bg-odd'>\r\n\t\t\t<td align='center'>{$i}</td>\r\n\t\t\t<td>{$stkd['description']}</td>\r\n\t\t\t<td>{$stkd['qty']}</td>\r\n\t\t\t<td>{$stkd['unitcost']}</td>\r\n\t\t\t<td>" . CUR . " {$stkd['amt']}</td>\r\n\t\t\t<td " . ass("Select the account you wish to Credit") . ">{$stkacc}</td>\r\n\t\t</tr>";
}
$products .= "</table>";
/* --- Start Some calculations --- */
# Get subtotal
$SUBTOT = sprint($inv['subtot']);
# Get Total
$TOTAL = sprint($inv['total']);
# Get vat
$VAT = sprint($inv['vat']);
/* --- End Some calculations --- */
# format date
list($syear, $smon, $sday) = explode("-", $inv['odate']);
if (!isset($showvat)) {
$showvat = TRUE;
}
if ($showvat == TRUE) {
$vat14 = AT14;
} else {
$vat14 = "";
}
/* -- Final Layout -- */
$details = "<center><h3>Non-Stock Invoice Details</h3>\r\n\t<form action='" . SELF . "' method=post name=form>\r\n\t<input type=hidden name=key value=cconfirm>\r\n\t<input type=hidden name=invid value={$invid}>\r\n\t<input type=hidden name=ctyp value={$ctyp}>\r\n\t<table " . TMPL_tblDflts . " width='95%'>\r\n\t<tr><td valign=top>\r\n\t\t{$details}\r\n\t</td><td valign=top align=right>\r\n\t\t<table " . TMPL_tblDflts . ">\r\n\t\t\t<tr><th colspan=2> Non-Stock Invoice Details </th></tr>\r\n\t\t\t<tr class='bg-odd'><td>Non-Stock Invoice No.</td><td valign=center>T {$inv['invid']}</td></tr>\r\n\t\t\t<tr class='bg-even'><td>Proforma Inv No.</td><td valign=center>{$inv['docref']}</td></tr>\r\n\t\t\t<tr class='bg-odd'><td>Date</td><td valign=center>{$sday}-{$smon}-{$syear}</td></tr>\r\n\t\t\t<tr class='bg-even'><td>VAT Inclusive</td><td valign=center>{$inv['chrgvat']}</td></tr>\r\n\t\t\t<tr class='bg-odd'><td>Terms</td><td valign=center>{$inv['terms']} Days</td></tr>\r\n\t\t</table>\r\n\t</td></tr>\r\n\t<tr><td><br></td></tr>\r\n\t<tr><td colspan=2>\r\n\t{$products}\r\n\t</td></tr>\r\n\t<tr><td>\r\n\t\t<table " . TMPL_tblDflts . ">\r\n\t\t\t<tr><th width=40%>Quick Links</th><th width=45%>Remarks</th><td rowspan=5 valign=top width=15%><br></td></tr>\r\n\t\t\t<tr class='bg-odd'><td align='center'><a href='nons-invoice-new.php'>New Non-Stock Invoices</a></td><td class='bg-odd' rowspan=4 align=center valign=top>" . nl2br($inv['remarks']) . "</td></tr>\r\n\t\t\t<tr class='bg-odd'><td align='center'><a href='nons-invoice-view.php'>View Non-Stock Invoices</a></td></tr>\r\n\t\t\t<script>document.write(getQuicklinkSpecial());</script>\r\n\t\t</table>\r\n\t</td><td align=right>\r\n\t\t<table " . TMPL_tblDflts . " width=80%>\r\n\t\t\t<tr class='bg-odd'><td>SUBTOTAL</td><td align=right>" . CUR . " {$inv['subtot']}</td></tr>\r\n\t\t\t<tr class='bg-odd'><td>VAT {$vat14}</td><td align=right>" . CUR . " {$inv['vat']}</td></tr>\r\n\t\t\t<tr class='bg-even'><th>GRAND TOTAL</th><td align=right>" . CUR . " {$inv['total']}</td></tr>\r\n\t\t</table>\r\n\t</td></tr>\r\n\t<tr><td align=right><input type=submit value='Confirm »'></td></tr>\r\n\t</table></form>\r\n\t</center>";
return $details;
}
function details($_POST, $error = "")
{
# get vars
extract($_POST);
# Validate input
require_lib("validate");
$v = new validate();
$v->isOk($purid, "num", 1, 20, "Invalid Non-Stock Purchase number.");
if (isset($ctyp) && $ctyp == 's') {
$v->isOk($supid, "num", 1, 20, "Invalid supplier account number.");
} elseif (isset($ctyp) && $ctyp == 'c') {
$v->isOk($deptid, "num", 1, 20, "Invalid Department.");
}
# display errors, if any
if ($v->isError()) {
$errors = $v->getErrors();
foreach ($errors as $e) {
$error .= "<li class='err'>" . $e["msg"] . "</li>";
}
return slct($_POST, $error);
$confirm = "{$error}<p><input type='button' onClick='JavaScript:history.back();' value='« Correct submission'>";
return $confirm;
}
# Get purchase info
db_connect();
$sql = "SELECT * FROM nons_purchases WHERE purid = '{$purid}' AND div = '" . USER_DIV . "'";
$purRslt = db_exec($sql) or errDie("Unable to get purchase information");
if (pg_numrows($purRslt) < 1) {
return "<li class='err'>purchase Not Found</li>";
}
$pur = pg_fetch_array($purRslt);
# check if purchase has been printed
if ($pur['received'] == "y") {
$error = "<li class='err'> Error : purchase number <b>{$purid}</b> has already been received.</li>";
$error .= "<p><input type='button' onClick='JavaScript:history.back();' value='« Correct submission'>";
return $error;
}
/* --- Start Drop Downs --- */
# days drop downs
$days = array("30" => "30", "60" => "60", "90" => "90", "120" => "120");
$termssel = extlib_cpsel("terms", $days, $pur['terms']);
# format date
list($p_year, $p_month, $p_day) = explode("-", $pur['pdate']);
$supacc = "<select name='supacc'>";
core_connect();
$sql = "SELECT * FROM accounts WHERE div = '" . USER_DIV . "' ORDER BY accname ASC";
$accRslt = db_exec($sql);
if (pg_numrows($accRslt) < 1) {
return "<li>There are No accounts in Cubit.</li>";
}
while ($acc = pg_fetch_array($accRslt)) {
# Check Disable
if (isDisabled($acc['accid'])) {
continue;
}
$supacc .= "<option value='{$acc['accid']}'>{$acc['topacc']}/{$acc['accnum']} - {$acc['accname']}</option>";
}
$supacc .= "</select>";
# Get selected supplier info
db_connect();
$hide = "";
if (isset($ctyp) && $ctyp == 's') {
$sql = "SELECT * FROM suppliers WHERE supid = '{$supid}' AND div = '" . USER_DIV . "'";
$supRslt = db_exec($sql) or errDie("Unable to get supplier");
if (pg_numrows($supRslt) < 1) {
$error = "<li class='err'> Supplier not Found.</li>";
$confirm .= "{$error}<p><input type='button' onClick='JavaScript:history.back();' value='« Correct submission'>";
return $confirm;
} else {
$sup = pg_fetch_array($supRslt);
$pur['supplier'] = $sup['supname'];
$pur['supaddr'] = $sup['supaddr'];
$supacc = $sup['supno'];
$hide = "<input type='hidden' name='supid' value='{$supid}'><input type='hidden' name='ctyp' value='{$ctyp}'>";
}
} elseif (isset($ctyp) && $ctyp == 'c') {
db_conn("exten");
$sql = "SELECT * FROM departments WHERE deptid = '{$deptid}'";
$deptRslt = db_exec($sql) or errDie("Unable to view customers");
if (pg_numrows($deptRslt) < 1) {
$error = "<li class='err'> Department not Found.</li>";
$confirm .= "{$error}<p><input type='button' onClick='JavaScript:history.back();' value='« Correct submission'>";
return $confirm;
} else {
$dept = pg_fetch_array($deptRslt);
$supacc = "{$dept['deptname']} - Cash on Hand";
$hide = "<input type='hidden' name='deptid' value='{$deptid}'><input type='hidden' name='ctyp' value='{$ctyp}'>";
}
} elseif (isset($ctyp) && $ctyp == 'p') {
core_connect();
# Get Petty cash account
$cashacc = gethook("accnum", "bankacc", "name", "Petty Cash");
# Get account name for thy lame User's Sake
$accRslt = get("core", "*", "accounts", "accid", $cashacc);
if (pg_numrows($accRslt) < 1) {
return "<li class='err'> Petty Cash Account not found.</li>";
}
$acc = pg_fetch_array($accRslt);
$supacc = "{$acc['topacc']}/{$acc['accnum']} - {$acc['accname']}";
$hide = "<input type='hidden' name='supacc' value='{$cashacc}'><input type='hidden' name='ctyp' value='{$ctyp}'>";
}
/* --- End Drop Downs --- */
/* --- Start Products Display --- */
# select all products
$products = "\n\t\t<table " . TMPL_tblDflts . " width='100%'>\n\t\t\t<tr>\n\t\t\t\t<th>ITEM NUMBER</th>\n\t\t\t\t<th>DESCRIPTION</th>\n\t\t\t\t<th>QTY RECEIVED</th>\n\t\t\t\t<th>UNIT PRICE</th>\n\t\t\t\t<th>DELIVERY DATE</th>\n\t\t\t\t<th>AMOUNT</th>\n\t\t\t<tr>";
# get selected stock in this purchase
db_connect();
$sql = "SELECT *, (qty - rqty) as qty FROM nons_pur_items WHERE purid = '{$purid}' AND (qty - rqty) > 0 AND div = '" . USER_DIV . "'";
$stkdRslt = db_exec($sql);
$i = 0;
$key = 0;
while ($stkd = pg_fetch_array($stkdRslt)) {
# keep track of selected stock amounts
$amts[$i] = $stkd['amt'];
$i++;
list($syear, $smon, $sday) = explode("-", $stkd['ddate']);
# put in product
$products .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td><input type='hidden' size='4' name='cod[]' value='{$stkd['cod']}'>{$stkd['cod']}</td>\n\t\t\t\t<td>{$stkd['des']}</td>\n\t\t\t\t<td><input type='hidden' name='qts[]' value='{$stkd['qty']}'><input type='text' size='5' name='qtys[]' value='{$stkd['qty']}'></td>\n\t\t\t\t<td nowrap><input type='hidden' size='4' name='unitcost[]' value='{$stkd['unitcost']}'>" . CUR . " {$stkd['unitcost']}</td>\n\t\t\t\t<td>{$sday}-{$smon}-{$syear}</td>\n\t\t\t\t<td nowrap>" . CUR . " {$stkd['amt']}</td>\n\t\t\t</tr>";
$key++;
}
# look above(if i = 0 then there are no products)
if ($i == 0) {
$done = "";
}
$products .= "</table>";
/* --- End Products Display --- */
/* --- Start Some calculations --- */
# Get subtotal
$SUBTOT = sprint($pur['subtot']);
# Get Total
$TOTAL = sprint($pur['total']);
# Get vat
$VAT = sprint($pur['vat']);
/* --- End Some calculations --- */
/* -- Final Layout -- */
$details = "\n\t\t<center>\n\t\t<h3>Non-Stock Purchase received</h3>\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t<input type='hidden' name='key' value='update'>\n\t\t<input type='hidden' name='purid' value='{$purid}'>\n\t\t<input type='hidden' name='shipchrg' value='0'>\n\t\t{$hide}\n\t\t<table " . TMPL_tblDflts . " width='95%'>\n\t\t\t<tr>\n\t\t\t\t<td valign='top'>\n\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th colspan='2'> Supplier Details </th>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Supplier</td>\n\t\t\t\t\t\t\t<td valign='center'>{$pur['supplier']}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Supplier Address</td>\n\t\t\t\t\t\t\t<td valign='center'><pre>{$pur['supaddr']}</pre></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "' " . ass("Select the account you wish to Credit") . ">\n\t\t\t\t\t\t\t<td>Account</td>\n\t\t\t\t\t\t\t<td>{$supacc}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t</table>\n\t\t\t\t</td>\n\t\t\t\t<td valign='top' align='right'>\n\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th colspan='2'> Non-Stock Purchase Details </th>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Non-Stock Purchase No.</td>\n\t\t\t\t\t\t\t<td valign='center'>{$pur['purnum']}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Delivery Ref No.</td>\n\t\t\t\t\t\t\t<td valign='center'><input type='text' name='refno' size='10' value='{$pur['refno']}'></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Terms</td>\n\t\t\t\t\t\t\t<td valign='center'>{$pur['terms']} Days</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>Date</td>\n\t\t\t\t\t\t\t<td valign='center'>" . mkDateSelect("p", $p_year, $p_month, $p_day) . "</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>VAT Inclusive</td>\n\t\t\t\t\t\t\t<td valign='center'>{$pur['vatinc']}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t</table>\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr><td><br></td></tr>\n\t\t\t<tr>\n\t\t\t\t<td colspan='2'>{$products}</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td>\n\t\t\t\t\t<p>\n\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th width='25%'>Quick Links</th>\n\t\t\t\t\t\t\t<th width='25%'>Remarks</th>\n\t\t\t\t\t\t\t<td rowspan='5' valign='top' width='50%'>{$error}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<td class='" . bg_class() . "'><a href='nons-purchase-new.php'>New purchase</a></td>\n\t\t\t\t\t\t\t<td class='" . bg_class() . "' rowspan='4' align='center' valign='top'><textarea name='remarks' rows='4' cols='20'>{$pur['remarks']}</textarea></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td><a href='nons-purchase-view.php'>View purchases</a></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<script>document.write(getQuicklinkSpecial());</script>\n\t\t\t\t\t</table>\n\t\t\t\t</td>\n\t\t\t\t<td align='right'>\n\t\t\t\t\t<table " . TMPL_tblDflts . " width='80%'>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>SUBTOTAL</td>\n\t\t\t\t\t\t\t<td align='right' nowrap>" . CUR . " {$SUBTOT}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>VAT @ " . TAX_VAT . " %</td>\n\t\t\t\t\t\t\t<td align='right' nowrap>" . CUR . " {$pur['vat']}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<th>GRAND TOTAL</th>\n\t\t\t\t\t\t\t<td align='right' nowrap>" . CUR . " {$TOTAL}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t</table>\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td align='right'><input type='submit' name='upBtn' value='Write'></td>\n\t\t\t</tr>\n\t\t</table>\n\t\t</form>\n\t\t</center>";
return $details;
}
function enterLeave()
{
db_connect();
$sql = "SELECT empnum, sname, fnames, enum FROM employees WHERE div = '" . USER_DIV . "' ORDER BY sname";
$empRslt = db_exec($sql) or errDie("Unable to select employees from database.");
if (pg_numrows($empRslt) < 1) {
return "No employees found in database.";
}
# select employees
$employees = "<select size=1 name='empnum'>\n";
while ($myEmp = pg_fetch_array($empRslt)) {
$employees .= "<option value='{$myEmp['empnum']}'>{$myEmp['sname']}, {$myEmp['fnames']} ({$myEmp['enum']})</option>\n";
}
$employees .= "</select>\n";
// # get days
// $days = "<select size=1 name=days[]>\n";
// for ($i=1; $i <= 31; $i++) {
// $selected = ($i == date ("d")) ? "selected" : "";
// $days .= "<option value='$i' $selected>$i</option>\n";
// }
// $days .= "</select>\n";
// # get months
// $months = "<select size=1 name=months[]>\n";
// for ($i=1; $i <= 12; $i++) {
// $selected = ($i == date ("m")) ? "selected" : "";
// $months .= "<option value='$i' $selected>".getMonth ($i)."</option>\n";
// }
// $months .= "</select>\n";
// # get years
// $thisYear = date ("Y");
// $years = "<select size=1 name=years[]>\n";
// for ($i=$thisYear; $i <= ($thisYear+1); $i++) {
// $selected = ($i == date ("Y")) ? "selected" : "";
// $years .= "<option value='$i' $selected>$i</option>\n";
// }
// $years .= "</select>\n";
# today
$today = date("Y-m-d");
/*
<td align='center'>
<table border='0' cellpadding='".TMPL_tblCellPadding."' cellspacing='".TMPL_tblCellSpacing."'>
<tr>
<td>$days</td>
<td>$months</td>
<td>$years</td>
</tr>
</table>
</td>
*/
/*
<td align='center'>
<table border='0' cellpadding='".TMPL_tblCellPadding."' cellspacing='".TMPL_tblCellSpacing."'>
<tr>
<td>$days</td>
<td>$months</td>
<td>$years</td>
</tr>
</table>
</td>
*/
$enterLeave = "\n\t\t<h3>Employee Leave Application</h3>\n\t\t<table cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "'>\n\t\t<form action='" . SELF . "' method='POST'>\n\t\t\t<input type='hidden' name='key' value='confirm'>\n\t\t\t<input type='hidden' name='date' value='{$today}'>\n\t\t\t<input type='hidden' name='approvedby' value='" . USER_NAME . "'>\n\t\t\t<tr>\n\t\t\t\t<th>Field</th>\n\t\t\t\t<th>Value</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Employee</td>\n\t\t\t\t<td align='center'>{$employees}</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Date of Application</td>\n\t\t\t\t<td align='center'>{$today}</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "' " . ass("This is the first date the employee will be on leave.") . ">\n\t\t\t\t<td>Leave start date</td>\n\t\t\t\t<td align='center'>" . mkDateSelect("start") . "</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "' " . ass("This is the last date the employee will be on leave.") . ">\n\t\t\t\t<td>Leave end date</td>\n\t\t\t\t<td align='center'>" . mkDateSelect("fin") . "</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Approved by</td>\n\t\t\t\t<td align='center'>" . USER_NAME . "</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Type of leave</td>\n\t\t\t\t<td align='center'>\n\t\t\t\t\t<select size='1' name='type'>\n\t\t\t\t\t\t<option value='Paid vacation-leave'>Paid vacation-leave</option>\n\t\t\t\t\t\t<option value='Paid sick-leave'>Paid sick-leave</option>\n\t\t\t\t\t\t<option value='Paid study-leave'>Paid study-leave</option>\n\t\t\t\t\t\t<option value='Special paid-leave'>Special paid-leave</option>\n\t\t\t\t\t\t<option value='Unpaid leave'>Unpaid leave</option>\n\t\t\t\t\t</select>\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td colspan='2' align='right'><input type=submit value='Confirm »'></td>\n\t\t\t</tr>\n\t\t</form>\n\t\t</table>" . mkQuickLinks(ql("../admin-employee-add.php", "Add Employee"), ql("../admin-employee-view.php", "View Employees"));
return $enterLeave;
}
