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 details($_POST, $error = "")
{
# get vars
extract($_POST);
# validate input
require_lib("validate");
$v = new validate();
if (isset($purid)) {
$v->isOk($purid, "num", 1, 20, "Invalid Non-Stock Order number.");
} else {
$v->isOk($supid, "num", 1, 20, "Invalid Supplier number.");
}
# display errors, if any
if ($v->isError()) {
$errors = $v->getErrors();
foreach ($errors as $e) {
$error .= "<li class='err'>" . $e["msg"] . "</li>";
}
$confirm = $error . slct();
return $confirm;
}
if (!isset($purid)) {
$purid = create_dummy(0, $supid);
}
# Get Order info
db_connect();
$sql = "SELECT * FROM nons_purch_int 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.</li>";
$error .= "<p><input type='button' onClick='JavaScript:history.back();' value='« Correct submission'>";
return $error;
}
if ($pur['xrate'] == 0) {
$pur['xrate'] = 1;
}
# Get selected supplier info
db_connect();
$sql = "SELECT * FROM suppliers WHERE supid = '{$pur['supid']}' AND div = '" . USER_DIV . "'";
$supRslt = db_exec($sql) or errDie("Unable to view Supplier");
if (pg_numrows($supRslt) < 1) {
db_connect();
# Query server for supplier info
$sql = "SELECT * FROM suppliers WHERE location = 'int' AND div = '" . USER_DIV . "' ORDER BY supname ASC";
$supRslt = db_exec($sql) or errDie("Unable to view suppliers");
if (pg_numrows($supRslt) < 1) {
$err = "<li class='err'>No Supplier found in database.</li>";
return view_err($_POST, $err);
} else {
$suppliers = "<select name='supid' onChange='javascript:document.form.submit();'>";
$suppliers .= "<option value='-S' selected>Select Supplier</option>";
while ($sup = pg_fetch_array($supRslt)) {
$suppliers .= "<option value='{$sup['supid']}'>{$sup['supname']}</option>";
}
$suppliers .= "</select>";
}
# take care of the uset vars
$supaddr = "";
$accno = "";
$fcid = $pur['fcid'];
} else {
db_connect();
# Query server for supplier info
$sql = "SELECT * FROM suppliers WHERE location = 'int' AND div = '" . USER_DIV . "' ORDER BY supname ASC";
$supRslt = db_exec($sql) or errDie("Unable to view suppliers");
if (pg_numrows($supRslt) < 1) {
$err = "<li class='err'>No Supplier found in database.</li>";
return view_err($_POST, $err);
} else {
$supid = $pur['supid'];
$suppliers = "<select name='supid' onChange='javascript:document.form.submit();'>";
$sel = "";
$fcid = $pur['fcid'];
while ($sup = pg_fetch_array($supRslt)) {
if ($sup['supid'] == $supid) {
$sel = "selected";
$supaddr = "{$sup['supaddr']}";
$accno = $sup['supno'];
$fcid = $sup['fcid'];
$listid = $sup['listid'];
} else {
$sel = "";
$supaddr = "";
$accno = "";
}
$suppliers .= "<option value='{$sup['supid']}' {$sel}>{$sup['supname']}</option>";
}
$suppliers .= "</select>";
}
}
$currs = getSymbol($fcid);
$curr = $currs['symbol'];
$currsel = "{$currs['symbol']} - {$currs['descrip']}";
if (!isset($ordernum)) {
$ordernum = '';
}
/* --- Start Drop Downs --- */
# days drop downs
$days = array("0" => "0", "7" => "7", "14" => "14", "30" => "30", "60" => "60", "90" => "90", "120" => "120");
$termssel = extlib_cpsel("terms", $days, $pur['terms']);
# format date
list($npuri_year, $npuri_month, $npuri_day) = explode("-", $pur['pdate']);
list($del_year, $del_month, $del_day) = explode("-", $pur['ddate']);
/* --- 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</th>\n\t\t\t\t<th colspan='2'>UNIT PRICE</th>\n\t\t\t\t<th colspan='2'>DUTY</th>\n\t\t\t\t<th>LINE TOTAL</th>\n\t\t\t\t<th>COST PER UNIT</th>\n\t\t\t\t<th>Remove</th>\n\t\t\t<tr>";
# get selected stock in this Order
db_connect();
$sql = "SELECT * FROM nons_purint_items WHERE purid = '{$purid}' 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++;
/* -- Calculations -- */
# Calculate cost amount bought
$totamt = $stkd['qty'] * $stkd['cunitcost'];
# Calculate percentage from subtotal
if ($pur['subtot'] != 0) {
$perc = ($totamt + $stkd['duty']) / $pur['subtot'] * 100;
} else {
$perc = 0;
}
# Get percentage from shipping charges
$shipchrg = sprint($perc / 100 * $pur['shipchrg']);
# Add shipping charges to amt
$totamt = sprint($totamt + $shipchrg + $stkd['duty']);
$unitamt = sprint($totamt / $stkd['qty']);
/* -- End Calculations --*/
$stkd['amt'] = sprint($stkd['amt']);
$tip = " ";
if (isset($vatc[$key])) {
$tip = "<font color='red'>#</font>";
$error = "<div class='err'> {$tip} = Vat amount is different from amount calculated by cubit. To allow cubit to recalculate the vat amount, please delete the vat amount from the input box.";
}
# put in product
$products .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td align='center'><input type='text' size='10' name='cod[]' value='{$stkd['cod']}'></td>\n\t\t\t\t<td align='center'><input type='text' size='20' name='des[]' value='{$stkd['des']}'></td>\n\t\t\t\t<td align='center'><input type='text' size='3' name='qtys[]' value='{$stkd['qty']}'></td>\n\t\t\t\t<td>{$pur['curr']} <input type='text' size='6' name='cunitcost[]' value='{$stkd['cunitcost']}'> or </td>\n\t\t\t\t<td>" . CUR . " <input type='text' size='6' name='unitcost[]' value='{$stkd['unitcost']}'></td>\n\t\t\t\t<td>{$pur['curr']} <input type='text' size='6' name='duty[]' value='{$stkd['duty']}'> or </td>\n\t\t\t\t<td><input type='text' size='3' name='dutyp[]' value='{$stkd['dutyp']}'>%</td>\n\t\t\t\t<td><input type='hidden' name='amt[]' value='{$stkd['amt']}'> {$pur['curr']} {$stkd['amt']}</td>\n\t\t\t\t<td align='right'>{$pur['curr']} {$unitamt}</td>\n\t\t\t\t<td>\n\t\t\t\t\t<input type='checkbox' name='remprod[]' value='{$key}'>\n\t\t\t\t\t<input type='hidden' name='SCROLL' value='yes'>\n\t\t\t\t</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 = "";
list($year, $mon, $day) = explode("-", date("Y-m-d"));
# add one
$products .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td align='center'><input type='text' size='10' name='cod[]' value=''></td>\n\t\t\t\t<td align='center'><input type='text' size='20' name='des[]' value=''></td>\n\t\t\t\t<td align='center'><input type='text' size='3' name='qtys[]' value='1'></td>\n\t\t\t\t<td>{$pur['curr']} <input type='text' size='6' name='cunitcost[]'> or </td>\n\t\t\t\t<td>" . CUR . " <input type='text' size='6' name='unitcost[]'></td>\n\t\t\t\t<td>{$pur['curr']} <input type='text' size='6' name='duty[]'> or </td>\n\t\t\t\t<td><input type='text' size='3' name='dutyp[]'>%</td>\n\t\t\t\t<td>{$pur['curr']} 0.00</td>\n\t\t\t\t<td align='right'>{$pur['curr']} 0.00</td>\n\t\t\t\t<td> </td>\n\t\t\t</tr>";
}
/* -- start Listeners -- */
if (isset($diffwhBtn)) {
list($year, $mon, $day) = explode("-", date("Y-m-d"));
$products .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td align='center'><input type='text' size='10' name='cod[]' value=''></td>\n\t\t\t\t<td align='center'><input type='text' size='20' name='des[]' value=''></td>\n\t\t\t\t<td align='center'><input type='text' size='3' name='qtys[]' value='1'></td>\n\t\t\t\t<td>{$pur['curr']} <input type='text' size='6' name='cunitcost[]'> or </td>\n\t\t\t\t<td>" . CUR . " <input type='text' size='6' name='unitcost[]'></td>\n\t\t\t\t<td>{$pur['curr']} <input type='text' size='6' name='duty[]'> or </td>\n\t\t\t\t<td><input type='text' size='3' name='dutyp[]'>%</td>\n\t\t\t\t<td>{$pur['curr']} 0.00</td>\n\t\t\t\t<td align='right'>{$pur['curr']} 0.00</td>\n\t\t\t\t<td> </td>\n\t\t\t</tr>";
$key++;
}
/* -- End Listeners -- */
$products .= "</table>";
/* --- End Products Display --- */
/* --- Start Some calculations --- */
# Get subtotal
$SUBTOT = sprint($pur['subtot']);
# Get Total
$TOTAL = sprint($pur['total']);
$pur['tax'] = sprint($pur['tax']);
$pur['shipchrg'] = sprint($pur['shipchrg']);
$pur['cusid'] += 0;
if ($pur['cusid'] == 0) {
$Sl = "SELECT * FROM vatcodes WHERE del='Yes'";
$Ri = db_exec($Sl) or errDie("Unable to get data.");
$vd = pg_fetch_array($Ri);
$pur['cusid'] = $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'] == $pur['cusid']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
/* --- End Some calculations --- */
if (isset($diffwhBtn) or isset($upBtn) or isset($doneBtn) or isset($recv) or isset($donePrnt)) {
$jump_bot = "\n\t\t\t<script>\n\t\t\t\twindow.location.hash='bottom';\n\t\t\t</script>";
} else {
$jump_bot = "";
}
$details = "\n\t\t<center>\n\t\t<h3>New International Non-Stock 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='purid' value='{$purid}'>\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'>{$suppliers}</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</td>\n\t\t\t\t\t\t\t<td valign='center'>{$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 valign='top'>Supplier Address</td>\n\t\t\t\t\t\t\t<td valign='center'>" . nl2br($supaddr) . "</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 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>Non-Stock Order 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>Order No.</td>\n\t\t\t\t\t\t\t<td valign='center'><input type='text' size='10' name='ordernum' value='{$ordernum}'></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>Date</td>\n\t\t\t\t\t\t\t<td valign='center' nowrap='t'>" . mkDateSelect("npuri", $npuri_year, $npuri_month, $npuri_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>Foreign Currency</td>\n\t\t\t\t\t\t\t<td valign='center'>{$currsel} Exchange rate " . CUR . " <input type='text' size='7' name='xrate' value='{$pur['xrate']}'></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>Tax</td>\n\t\t\t\t\t\t\t<td valign='center'>{$pur['curr']} <input type='text' size='7' name='tax' value='{$pur['tax']}'>{$Vatcodes}</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>Shipping Charges</td>\n\t\t\t\t\t\t\t<td valign='center'>{$pur['curr']} <input type='text' size='7' name='shipchrg' value='{$pur['fshipchrg']}'></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 Date</td>\n\t\t\t\t\t\t\t<td valign='center'>" . mkDateSelect("del", $del_year, $del_month, $del_day) . "</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-purch-int-view.php'>View International Non-Stock Orders</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<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'>{$pur['curr']} <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>Shipping Charges</td>\n\t\t\t\t\t\t\t<td align='right'>{$pur['curr']} {$pur['shipchrg']}</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>Tax </td>\n\t\t\t\t\t\t\t<td align='right'>{$pur['curr']} {$pur['tax']}</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'>{$pur['curr']} <input type='hidden' name='total' value='{$TOTAL}'>{$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 type='button' value='« Back' onClick='javascript:history.back()'> | <input name='diffwhBtn' type='submit' value='Add Item'> | <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 write($_POST)
{
# Get vars
extract($_POST);
$supplier1 += 0;
$supplier2 += 0;
$supplier3 += 0;
if (isset($back)) {
return view_err($_POST);
}
$vatcode += 0;
# Validate input
require_lib("validate");
$v = new validate();
$v->isOk($whid, "num", 1, 50, "Invalid Store.");
$v->isOk($catid, "num", 1, 50, "Invalid Stock Category.");
$v->isOk($stkcod, "string", 1, 50, "Invalid stock code.");
$v->isOk($stkdes, "string", 0, 255, "Invalid stock description.");
$v->isOk($bar, "string", 0, 20, "Invalid bar code.");
$v->isOk($clasid, "num", 1, 50, "Invalid Classification.");
$v->isOk($buom, "string", 0, 10, "Invalid bought unit of measure.");
$v->isOk($suom, "string", 0, 10, "Invalid selling unit of measure.");
$v->isOk($rate, "num", 1, 10, "Invalid selling units per bought unit.");
$v->isOk($shelf, "string", 0, 10, "Invalid Shelf number.");
$v->isOk($row, "string", 0, 10, "Invalid Row number.");
$v->isOk($minlvl, "num", 0, 10, "Invalid minimum stock level.");
$v->isOk($maxlvl, "num", 0, 10, "Invalid maximum stock level.");
$v->isOk($selamt, "float", 0, 10, "Invalid selling amount.");
$v->isOk($markup, "float", 0, 10, "Invalid markup percentage.");
$v->isOk($warranty, "string", 0, 80, "Invalid warranty.");
$v->isOk($rfidtype, "string", 0, 80, "Invalid RFID type of tag.");
$v->isOk($rfidfreq, "string", 0, 80, "Invalid RFID Frequency.");
$v->isOk($rfidrate, "string", 0, 80, "Invalid RFID Tag read rate.");
$minlvl += 0;
$maxlvl += 0;
$selamt += 0;
# Display errors, if any
if ($v->isError()) {
$confirm = "";
$errors = $v->getErrors();
foreach ($errors as $e) {
$confirm .= "<li class='err'>{$e['msg']}</li>";
}
$confirm .= "\n\t\t\t<p><input type='button' onClick='JavaScript:history.back();' value='« Correct submission'>\n\t\t\t<P>\n\t\t\t<table " . TMPL_tblDflts . " width='100'>\n\t\t\t\t<tr>\n\t\t\t\t\t<th>Quick Links</th>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td><a href='stock-view.php'>View Stock</a></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td><a href='main.php'>Main Menu</a></td>\n\t\t\t\t</tr>\n\t\t\t</form>\n\t\t\t</table>";
return $confirm;
}
# Get category name
db_connect();
$sql = "SELECT cat FROM stockcat WHERE catid = '{$catid}'";
$catRslt = db_exec($sql);
$cat = pg_fetch_array($catRslt);
# Get class
$sql = "SELECT classname FROM stockclass WHERE clasid = '{$clasid}' AND div = '" . USER_DIV . "'";
$clasRslt = db_exec($sql);
$clas = pg_fetch_array($clasRslt);
# Check stock code
db_connect();
$sql = "SELECT stkcod FROM stock WHERE lower(stkcod) = lower('{$stkcod}') AND whid = '{$whid}' AND div = '" . USER_DIV . "'";
$cRslt = db_exec($sql);
if (pg_numrows($cRslt) > 0) {
$error = "<li class='err'> An item with stock code : <b>{$stkcod}</b> already exists in the selected store.</li>";
return view_err($_POST, $error);
}
if (strlen($bar) > 0) {
$sql = "SELECT bar FROM stock WHERE lower(bar) = lower('{$bar}') AND div = '" . USER_DIV . "'";
$cRslt = db_exec($sql);
if (pg_numrows($cRslt) > 0) {
$error = "<li class='err'> An item with Bar Code : <b>{$bar}</b> already exists.</li>";
return $error;
}
}
# Insert into stock
db_connect();
$sql = "\n\t\tINSERT INTO stock (\n\t\t\tsupplier1, supplier2, supplier3, stkcod, stkdes, prdcls, \n\t\t\tclassname, csamt, units, buom, suom, rate, \n\t\t\tshelf, row, minlvl, maxlvl, csprice, selamt, \n\t\t\texvat, catid, catname, whid, blocked, type, \n\t\t\tserd, alloc, com, bar, div, vatcode, \n\t\t\tmarkup, rfidtype, rfidfreq, rfidrate, warranty\n\t\t) VALUES (\n\t\t\t'{$supplier1}', '{$supplier2}', '{$supplier3}', '{$stkcod}', '{$stkdes}', '{$clasid}', \n\t\t\t'{$clas['classname']}', '0', '0', '{$buom}', '{$suom}', '{$rate}', \n\t\t\t'{$shelf}', '{$row}', '{$minlvl}', '{$maxlvl}', '0', '{$selamt}', \n\t\t\t'n', '{$catid}', '{$cat['cat']}', '{$whid}', 'n', '{$stktp}', \n\t\t\t'{$serd}', '0', '0', '{$bar}', '" . USER_DIV . "', '{$vatcode}', \n\t\t\t'{$markup}', '{$rfidtype}', '{$rfidfreq}', '{$rfidrate}', '{$warranty}'\n\t\t)";
$rslt = db_exec($sql) or errDie("Unable to insert stock to Cubit.", SELF);
# Get last stock ID
$stkid = pglib_lastid("stock", "stkid");
# Add this product to all pricelists
db_conn("exten");
$sql = "SELECT * FROM pricelist WHERE div = '" . USER_DIV . "'";
$listRslt = db_exec($sql) or errDie("Unable to access databse.", SELF);
if (pg_numrows($listRslt) > 0) {
while ($list = pg_fetch_array($listRslt)) {
db_conn("exten");
$sql = "INSERT INTO plist_prices (listid, stkid, catid, clasid, price, div,show) VALUES ('{$list['listid']}', '{$stkid}', '{$catid}', '{$clasid}', '{$selamt}', '" . USER_DIV . "','Yes')";
$rslt = db_exec($sql) or errDie("Unable to insert price list items to Cubit.", SELF);
}
}
$sql = "SELECT * FROM spricelist WHERE div = '" . USER_DIV . "'";
$listRslt = db_exec($sql) or errDie("Unable to access databse.", SELF);
if (pg_numrows($listRslt) > 0) {
while ($list = pg_fetch_array($listRslt)) {
db_conn("exten");
$sql = "INSERT INTO splist_prices (listid, stkid, catid, clasid, price, div) VALUES ('{$list['listid']}', '{$stkid}', '{$catid}', '{$clasid}', '0', '" . USER_DIV . "')";
$rslt = db_exec($sql) or errDie("Unable to insert price list items to Cubit.", SELF);
}
}
/* adding from supplier stock */
if (isset($supid) && isset($supstkcod)) {
$cols = grp(m("suppid", $supid), m("stkid", $stkid), m("stkcod", $supstkcod));
$upd = new dbUpdate("suppstock", "cubit", $cols);
$upd->run(DB_INSERT);
}
db_conn('cubit');
$Sl = "SELECT * FROM stock WHERE stkid='{$stkid}'";
$Ri = db_exec($Sl) or errDie("Unable to get stock.");
$data = pg_fetch_array($Ri);
$date = date("Y-m-d");
db_conn('audit');
$Sl = "SELECT * FROM closedprd ORDER BY id";
$Ri = db_exec($Sl);
while ($pd = pg_fetch_array($Ri)) {
db_conn($pd['prdnum']);
$Sl = "\n\t\t\tINSERT INTO stkledger (\n\t\t\t\tstkid, stkcod, stkdes, trantype, edate, qty, \n\t\t\t\tcsamt, balance, bqty, details, div, yrdb\n\t\t\t) VALUES (\n\t\t\t\t'{$data['stkid']}', '{$data['stkcod']}', '{$data['stkdes']}', 'bal', '{$date}', '{$data['units']}', \n\t\t\t\t'{$data['csamt']}', '{$data['csamt']}', '{$data['units']}', 'Balance', '" . USER_DIV . "', '" . YR_DB . "'\n\t\t\t)";
$Ro = db_exec($Sl);
}
# deal with logo image
global $_FILES;
if ($change_image == "yes") {
if (empty($_FILES["image"])) {
return "<li class='err'>Please select an image to upload from your hard drive.</li>";
}
if (is_uploaded_file($_FILES["image"]["tmp_name"])) {
# Check file ext
if (preg_match("/(image\\/jpeg|image\\/png|image\\/gif)/", $_FILES["image"]["type"], $extension)) {
$type = $_FILES["image"]["type"];
// open file in "read, binary" mode
$img = "";
$file = fopen($_FILES['image']['tmp_name'], "rb");
while (!feof($file)) {
// fread is binary safe
$img .= fread($file, 1024);
}
fclose($file);
# base 64 encoding
$img = base64_encode($img);
db_connect();
$Sl = "INSERT INTO stkimgs (stkid, image, imagetype) VALUES ('{$data['stkid']}','{$img}','{$type}')";
$Ry = db_exec($Sl) or errDie("Unable to upload company logo Image to DB.", SELF);
# to show IMG
//$logoimg = "<br><img src='compinfo/getimg.php' width=230 height=47><br><br>";
//$logo = "compinfo/getimg.php";
} else {
return "<li class='err'>Please note that we only accept images of the types PNG,GIF and JPEG.</li>";
}
} else {
return "Unable to upload file, Please check file permissions.";
}
}
// Layout
$write = "\n\t\t<table " . TMPL_tblDflts . " width='50%'>\n\t\t\t<tr>\n\t\t\t\t<th>New Stock added to database</th>\n\t\t\t</tr>\n\t\t\t<tr class='datacell'>\n\t\t\t\t<td>New Stock, {$stkdes} ({$stkcod}) has been successfully added to Cubit.</td>\n\t\t\t</tr>\n\t\t</table>\n\t\t<p>\n\t\t<table border='0' cellpadding='2' cellspacing='1'>\n\t\t\t<tr>\n\t\t\t\t<th>Quick Links</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td><a href='stock-add.php'>Add Stock</a></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td><a href='stock-view.php'>View Stock</a></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td><a href='main.php'>Main Menu</a></td>\n\t\t\t</tr>\n\t\t</table>";
return $write;
}
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);
if (isset($noduty)) {
$exd = "<input type='hidden' name='noduty' value='yes'>";
} else {
$exd = "";
}
# Validate input
require_lib("validate");
$v = new validate();
if (isset($purid)) {
$v->isOk($purid, "num", 1, 20, "Invalid Order 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($purid)) {
$purid = create_dummy($deptid);
}
# Get Order info
db_connect();
$sql = "SELECT * FROM purch_int 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'>Order 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.</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 = '{$pur['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);
}
$deptid = $pur['deptid'];
$supid = $pur['supid'];
# Get selected supplier info
db_connect();
$sql = "SELECT * FROM suppliers WHERE supid = '{$pur['supid']}' AND div = '" . USER_DIV . "'";
$supRslt = db_exec($sql) or errDie("Unable to view Supplier");
if (pg_numrows($supRslt) < 1) {
db_connect();
if ($inv['deptid'] == 0) {
$searchdept = "";
} else {
$searchdept = "deptid = '{$deptid}' AND ";
}
# Query server for supplier info
$sql = "SELECT * FROM suppliers WHERE {$searchdept} location = 'int' AND lower(supname) LIKE lower('{$letters}%') AND div = '" . USER_DIV . "' ORDER BY supname ASC";
$supRslt = db_exec($sql) or errDie("Unable to view suppliers");
if (pg_numrows($supRslt) < 1) {
$err = "<li class='err'>No Supplier names starting with <b>{$letters}</b> in database.</li>";
return view_err($_POST, $err);
} else {
$suppliers = "<select name='supid' onChange='javascript:document.form.submit();'>";
$suppliers .= "<option value='-S' selected>Select Supplier</option>";
while ($sup = pg_fetch_array($supRslt)) {
$suppliers .= "<option value='{$sup['supid']}'>{$sup['supname']}</option>";
}
$suppliers .= "</select>";
}
# take care of the uset vars
$supaddr = "";
$accno = "";
$fcid = $pur['fcid'];
} else {
db_connect();
# Query server for supplier info
$sql = "SELECT * FROM suppliers WHERE deptid = '{$deptid}' AND location = 'int' AND lower(supname) LIKE lower('{$letters}%') AND div = '" . USER_DIV . "' ORDER BY supname ASC";
$supRslt = db_exec($sql) or errDie("Unable to view suppliers");
if (pg_numrows($supRslt) < 1) {
$err = "<li class='err'>No Supplier names starting with <b>{$letters}</b> in database.</li>";
return view_err($_POST, $err);
} else {
$suppliers = "<select name='supid' onChange='javascript:document.form.submit();'>";
$sel = "";
$fcid = $pur['fcid'];
while ($sup = pg_fetch_array($supRslt)) {
if ($sup['supid'] == $supid) {
$sel = "selected";
$supaddr = "{$sup['supaddr']}";
$accno = $sup['supno'];
$fcid = $sup['fcid'];
$listid = $sup['listid'];
} else {
$sel = "";
$supaddr = "";
$accno = "";
}
$suppliers .= "<option value='{$sup['supid']}' {$sel}>{$sup['supname']}</option>";
}
$suppliers .= "</select>";
}
}
# this is a quick fix for pricelist product avaibility
$listids = array();
if (isset($listid) && $listid > 0) {
# Get jobs stkids
db_conn("exten");
$sql = "SELECT stkid FROM splist_prices WHERE listid = '{$listid}' AND div = '" . USER_DIV . "'";
$lstkRslt = db_exec($sql);
while ($lstk = pg_fetch_array($lstkRslt)) {
$listids[] = $lstk['stkid'];
}
}
/* --- 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>";
# Days drop downs
$days = array("0" => "0", "7" => "7", "14" => "14", "30" => "30", "60" => "60", "90" => "90", "120" => "120");
$termssel = extlib_cpsel("terms", $days, $pur['terms']);
# Currency
$currs = getSymbol($fcid);
$curr = $currs['symbol'];
$currsel = "{$currs['symbol']} - {$currs['descrip']}";
# Format date
list($ipur_year, $ipur_month, $ipur_day) = explode("-", $pur['pdate']);
list($del_year, $del_month, $del_day) = explode("-", $pur['ddate']);
/* --- End Drop Downs --- */
/* --- Start Products Display --- */
if (isset($noduty)) {
$dd = "";
} else {
$dd = "<th colspan='2'>DUTY</th>";
}
# 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>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{$dd}\n\t\t\t\t<th>LINE TOTAL</th>\n\t\t\t\t<th>COST PER UNIT</th>\n\t\t\t\t<th>DEL</th>\n\t\t\t<tr>";
# Get selected stock in this Order
db_connect();
$sql = "SELECT * FROM purint_items WHERE purid = '{$purid}' 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);
/* -- Calculations -- */
# Calculate cost amount bought
$totamt = $stkd['qty'] * $stkd['cunitcost'];
$unittot = $totamt;
# Calculate percentage from subtotal
if ($pur['subtot'] != 0) {
$perc = ($totamt + $stkd['duty']) / $pur['subtot'] * 100;
} else {
$perc = 0;
}
# Get percentage from shipping charges
$shipchrg = sprint($perc / 100 * $pur['shipchrg']);
# Add shipping charges to amt
$totamt = sprint($totamt + $shipchrg + $stkd['duty']);
$unittot = sprint($unittot + $stkd["duty"]);
$lineamt = sprint($totamt / $stkd["qty"]);
$unitamt = sprint($unittot / $stkd['qty']);
/* -- End Calculations --*/
$stkd['amt'] = sprint($stkd['amt']);
if (isset($noduty)) {
$dd = "\n\t\t\t\t<input type='hidden' name='duty[]' value='{$stkd['duty']}'>\n\t\t\t\t<input type='hidden' name='dutyp[]' value='{$stkd['dutyp']}'>";
} else {
$dd = "\n\t\t\t\t<td nowrap>{$pur['curr']} <input type='text' size='6' name='duty[]' value='{$stkd['duty']}'> or </td>\n\t\t\t\t<td><input type='text' size='3' name='dutyp[]' value='{$stkd['dutyp']}'>%</td>";
}
# 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>\n\t\t\t\t\t<input type='hidden' name='stkids[]' value='{$stkd['stkid']}'>\n\t\t\t\t\t<a href='#' onclick='openwindow(\"stock-amt-det.php?stkid={$stk['stkid']}\")'>{$stk['stkcod']}</a>\n\t\t\t\t</td>\n\t\t\t\t<td>{$stk['stkdes']}</td>\n\t\t\t\t<td><input type='text' size='3' name='qtys[]' value='{$stkd['qty']}'></td>\n\t\t\t\t<td nowrap>{$pur['curr']} <input type='text' size='6' name='cunitcost[]' value='{$stkd['cunitcost']}'><b> OR </b></td>\n\t\t\t\t<td nowrap>" . CUR . " <input type='text' size='6' name='unitcost[]' value='{$stkd['unitcost']}'></td>\n\t\t\t\t{$dd}\n\t\t\t\t<td nowrap><input type='hidden' name='amt[]' value='{$stkd['amt']}'> {$pur['curr']} {$lineamt}</td>\n\t\t\t\t<td align='right' nowrap>{$pur['curr']} {$unitamt}</td>\n\t\t\t\t<td>\n\t\t\t\t\t<input type='checkbox' name='remprod[]' value='{$key}'>\n\t\t\t\t\t<input type='hidden' name='SCROLL' value='yes'>\n\t\t\t\t</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 = "";
}
if ($pur['xrate'] == 0) {
$pur['xrate'] = 1;
}
# check if stock warehouse was selected
if (isset($whidss)) {
foreach ($whidss as $key => $whid) {
if (isset($stkidss[$key]) && $stkidss[$key] != "-S") {
# 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);
# Calculate amount
$amt[$key] = sprint($qtyss[$key] * $stk['lcsprice'] / $pur['xrate']);
$cunitcost[$key] = sprint($pur['xrate'] * $stk['lcsprice']);
if (isset($noduty)) {
$dd = "\n\t\t\t\t\t\t<input type='hidden' name='duty[]' value='0'>\n\t\t\t\t\t\t<input type='hidden' name='dutyp[]' value='0'>";
} else {
$dd = "\n\t\t\t\t\t\t<td>{$pur['curr']} <input type='text' size='6' name='duty[]' value='0'> or </td>\n\t\t\t\t\t\t<td><input type='text' size='3' name='dutyp[]' value='0'>%</td>";
}
# 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>\n\t\t\t\t\t\t\t<input type='hidden' name='stkids[]' value='{$stk['stkid']}'>\n\t\t\t\t\t\t\t<a href='#' onclick='openwindow(\"stock-amt-det.php?stkid={$stk['stkid']}\")'>{$stk['stkcod']}</a>\n\t\t\t\t\t\t</td>\n\t\t\t\t\t\t<td>{$stk['stkdes']}</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 nowrap>{$pur['curr']} <input type='text' size='6' name='cunitcost[]' value='{$stkd['cunitcost']}'> or </td>\n\t\t\t\t\t\t<td nowrap>" . CUR . " <input type='text' size='6' name='unitcost[]' value='{$stk['lcsprice']}'></td>\n\t\t\t\t\t\t{$dd}\n\t\t\t\t\t\t<td nowrap><input type='hidden' name='amt[]' value='{$amt[$key]}'> {$pur['curr']} {$amt[$key]}</td>\n\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t<td>\n\t\t\t\t\t\t\t<input type='checkbox' name='remprod[]' value='{$keyy}'>\n\t\t\t\t\t\t\t<input type='hidden' name='SCROLL' value='yes'>\n\t\t\t\t\t\t</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);
# Get stock on this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE whid = '{$whid}' AND div = '" . USER_DIV . "' 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;
}
$stks = "<select name='stkidss[]' onChange='javascript:document.form.submit();'>";
$stks .= "<option value='-S' disabled selected>Select Item 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> ";
if (isset($noduty)) {
$dd = "";
} else {
$dd = "<td> </td><td> </td>";
}
# 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> </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> </td>\n\t\t\t\t\t\t\t{$dd}\n\t\t\t\t\t\t\t<td nowrap><input type='hidden' name='amts[]' value='0.00'>{$pur['curr']} 0.00</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</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'];
# 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 stock on this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE whid = '{$whid}' AND div = '" . USER_DIV . "' 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 Item 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> ";
if (isset($noduty)) {
$dd = "";
} else {
$dd = "<td>{$pur['curr']} 0.00</td><td></td>";
}
$products .= "\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><input type='text' size='3' name='qtyss[]' value='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> </td>\n\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t{$dd}\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>{$pur['curr']} 0.00</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</tr>";
}
}
}
/* -- start Listeners -- */
if (isset($diffwhBtn)) {
# take todays date
list($year, $mon, $day) = explode("-", $pur['pdate']);
$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>{$pur['curr']} 0.00</td>\n\t\t\t\t<td> </td>\n\t\t\t\t<td> </td>\n\t\t\t</tr>";
}
/* -- End Listeners -- */
$products .= "</table>";
/* --- End Products Display --- */
/* --- Start Some calculations --- */
# Get subtotal
$SUBTOT = sprint($pur['subtot']);
# Get Total
$TOTAL = sprint($pur['total']);
$pur['tax'] = sprint($pur['tax']);
$pur['shipchrg'] = sprint($pur['shipchrg']);
/* --- End Some calculations --- */
$pur['jobnum'] += 0;
if ($pur['jobnum'] == 0) {
$Sl = "SELECT * FROM vatcodes WHERE del='Yes'";
$Ri = db_exec($Sl) or errDie("Unable to get data.");
$vd = pg_fetch_array($Ri);
$pur['jobnum'] = $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'] == $pur['jobnum']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
if (isset($diffwhBtn) or isset($upBtn) or isset($doneBtn) or isset($donePrnt)) {
$jump_bot = "\n\t\t\t<script>\n\t\t\t\twindow.location.hash='bottom';\n\t\t\t</script>";
} else {
$jump_bot = "";
}
$details = "\n\t\t<center>\n\t\t<h3>New International 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='purid' value='{$purid}'>\n\t\t\t<input type='hidden' name='deptid' value='{$deptid}'>\n\t\t\t<input type='hidden' name='letters' value='{$letters}'>\n\t\t\t{$exd}\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>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>Supplier</td>\n\t\t\t\t\t\t\t<td valign='center'>{$suppliers}</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</td>\n\t\t\t\t\t\t\t<td valign='center'>{$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 valign='top'>Supplier Address</td>\n\t\t\t\t\t\t\t<td valign='center'>" . nl2br($supaddr) . "</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'> 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>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>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>Date</td>\n\t\t\t\t\t\t\t<td valign='center'>" . mkDateSelect("ipur", $ipur_year, $ipur_month, $ipur_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>Foreign Currency</td>\n\t\t\t\t\t\t\t<td valign='center'>{$currsel} Exchange rate " . CUR . " <input type='text' size='7' name='xrate' value='{$pur['xrate']}'></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>Tax</td>\n\t\t\t\t\t\t\t<td valign='center'>{$pur['curr']} <input type='text' size='7' name='tax' value='{$pur['tax']}'>{$Vatcodes}</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>Shipping Charges</td>\n\t\t\t\t\t\t\t<td valign='center' nowrap>{$pur['curr']} <input type='text' size='7' name='shipchrg' value='{$pur['fshipchrg']}'></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 Date</td>\n\t\t\t\t\t\t\t<td valign=center>" . mkDateSelect("del", $del_year, $del_month, $del_day) . "</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='purch-int-view.php'>View International Orders</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<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>{$pur['curr']} <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>Shipping Charges</td>\n\t\t\t\t\t\t\t<td align='right' nowrap>{$pur['curr']} {$pur['shipchrg']}</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>Tax </td>\n\t\t\t\t\t\t\t<td align='right' nowrap>{$pur['curr']} {$pur['tax']}</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>{$pur['curr']} <input type='hidden' name='total' value='{$TOTAL}'>{$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'> |</td>\n\t\t\t\t<td nowrap><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 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 = "")
{
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 slctCust($_POST)
{
# get vars
foreach ($_POST as $key => $value) {
${$key} = $value;
}
# validate input
require_lib("validate");
$v = new validate();
$v->isOk($deptid, "num", 1, 20, "Invalid department number.");
$v->isOk($letters, "string", 0, 5, "Invalid First 3 Letters.");
# no done button
$done = "";
# display errors, if any
$err = "";
if ($v->isError()) {
$errors = $v->getErrors();
foreach ($errors as $e) {
$err .= "<li class=err>" . $e["msg"];
}
return view_err($_POST, $err);
}
db_connect();
# Query server for customer info
$sql = "SELECT * FROM customers WHERE deptid = '{$deptid}' 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.";
return view_err($_POST, $err);
} else {
# connect to database
db_connect();
$discs = "";
$gtottrad = 0;
$gtotitems = 0;
$gtotdel = 0;
$ginvtot = 0;
while ($cust = pg_fetch_array($custRslt)) {
$tottrad = 0;
$totitems = 0;
$totdel = 0;
$invtot = 0;
$i = 0;
# Query server
$sql = "SELECT * FROM inv_discs WHERE cusnum = '{$cust['cusnum']}' AND div = '" . USER_DIV . "' ORDER BY inv_date DESC";
$discRslt = db_exec($sql) or errDie("Unable to retrieve invoices statement from database.");
if (pg_numrows($discRslt) < 1) {
$discs .= "<tr class='" . bg_class() . "'><td>{$cust['cusname']} {$cust['surname']}</td><td>0</td><td>" . CUR . " 0</td><td>" . CUR . " 0</td><td>" . CUR . " 0</td></tr>";
} else {
$invno = pg_numrows($discRslt);
while ($disc = pg_fetch_array($discRslt)) {
# keep track of da totals
$tottrad += $disc['traddisc'];
$totitems += $disc['itemdisc'];
$totdel += $disc['delchrg'];
$invtot += $disc['total'];
# keep track of da totals for all
$gtottrad += $disc['traddisc'];
$gtotitems += $disc['itemdisc'];
$gtotdel += $disc['delchrg'];
$ginvtot += $disc['total'];
}
if ($invtot == "0") {
$per = "0";
} else {
$per = sprint($tottrad / $invtot * 100);
}
vmoney($tottrad);
vmoney($totitems);
vmoney($totdel);
$discs .= "\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>{$cust['cusname']} {$cust['surname']}</td>\n\t\t\t\t\t\t\t<td>{$invno}</td>\n\t\t\t\t\t\t\t<td>" . CUR . " {$tottrad}</td>\n\t\t\t\t\t\t\t<td>" . CUR . " {$totitems}</td>\n\t\t\t\t\t\t\t<td>" . CUR . " {$totdel}</td>\n\t\t\t\t\t\t\t<td>" . CUR . " " . sprint($invtot) . "</td>\n\t\t\t\t\t\t\t<td>{$per}%</td>\n\t\t\t\t\t\t</tr>";
$i++;
}
}
}
if ($ginvtot == "0") {
$totper = "0";
} else {
$totper = sprint($gtottrad / $ginvtot * 100);
$ginvtot = sprint($ginvtot);
}
vmoney($gtottrad);
vmoney($gtotitems);
vmoney($gtotdel);
vmoney($invtot);
// Layout
$printInv = "\n\t<h3>Invoice Discounts</h3>\n\t<table " . TMPL_tblDflts . ">\n\t<tr>\n\t\t<th>Customer</th>\n\t\t<th>Number of Invoices</th>\n\t\t<th>Trade Discount</th>\n\t\t<th>Total Items Discount</th>\n\t\t<th>Total Delivery Charges</th>\n\t\t<th>Invoices Total(ex VAT)</th>\n\t\t<th>% Trade Discount</tr>\n\t{$discs}\n\t" . TBL_BR . "\n\t<tr class='bg-even'>\n\t\t<td colspan='2'><b>Total</b></td>\n\t\t<td>" . CUR . " {$gtottrad}</td>\n\t\t<td>" . CUR . " {$gtotitems}</td>\n\t\t<td>" . CUR . " {$gtotdel}</td>\n\t\t<td>" . CUR . " {$ginvtot}</td>\n\t\t<td>{$totper}%</td>\n\t</tr>\n\t</table>\n\t<p>\n\t<table border=0 cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "'>\n\t\t<tr><td><br></td></tr>\n\t\t<tr><th>Quick Links</th></tr>\n\t\t<tr class=datacell><td align=center><a href='sales-reports.php'>Sales Reports</td></tr>\n\t\t<tr class=datacell><td align=center><a href='main.php'>Main Menu</td></tr>\n\t</table>";
return $printInv;
}
function details($_POST, $error = "")
{
# get vars
foreach ($_POST as $key => $value) {
${$key} = $value;
}
# validate input
require_lib("validate");
$v = new validate();
if (isset($quoid)) {
$v->isOk($quoid, "num", 1, 20, "Invalid quote 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($quoid)) {
$quoid = create_dummy($deptid);
$stkerr = "0,0";
}
if (!isset($done)) {
$done = "";
}
# Get quote info
db_connect();
$sql = "SELECT * FROM quotes WHERE quoid = '{$quoid}' AND div = '" . USER_DIV . "'";
$quoRslt = db_exec($sql) or errDie("Unable to get quote information");
if (pg_numrows($quoRslt) < 1) {
return "<li class=err>Quote Not Found</li>";
}
$quo = pg_fetch_array($quoRslt);
# check if quote has been printed
if ($quo['accepted'] == "y") {
$error = "<li class=err> Error : Quote number <b>{$quoid}</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 = '{$quo['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 = '{$quo['cusnum']}' 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 = '{$quo['deptid']}' AND 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();'>";
$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'] == $quo['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, $quo['terms']);
# Keep the charge vat option stable
if ($quo['chrgvat'] == "inc") {
$chin = "checked=yes";
$chex = "";
$chno = "";
} elseif ($quo['chrgvat'] == "exc") {
$chin = "";
$chex = "checked=yes";
$chno = "";
} else {
$chin = "";
$chex = "";
$chno = "checked=yes";
}
# format date
list($oyear, $omon, $oday) = explode("-", $quo['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<table cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' border=0 width=100%>\n\t<tr><th>STORE</th><th>ITEM NUMBER</th><th>VAT CODE</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 quote
db_connect();
$sql = "SELECT * FROM quote_items WHERE quoid = '{$quoid}' 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 = "<select name=accounts[]>\n\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 = "<select name=vatcodes[]>\n\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>";
//print "fo";
# Put in product
$products .= "<tr class='bg-odd'><td colspan=2>{$Accounts}<input type=hidden name=whids[] value='{$stkd['whid']}'></td><td><input type=hidden name=stkids[] value='{$stkd['stkid']}'>{$Vatcodes}</td><td><input type=text size=20 name=descriptions[] value='{$stkd['description']}'> {$sernos}</td><td>{$qtyin}</td><td>{$viewcost}</td><td><input type=hidden name=disc[] value='{$stkd['disc']}'><input type=hidden name=discp[] value='{$stkd['discp']}'></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++;
} 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);
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "<select name=vatcodes[]>\n\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 .= "<input type=hidden name=accounts[] value=0>\n\t\t\t<input type=hidden name=descriptions[] value=''>\n\t\t\t<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='#' onclick='openwindow(\"stock-amt-det.php?stkid={$stk['stkid']}\")'>{$stk['stkcod']}</a></td><td>{$Vatcodes}</td><td>" . extlib_rstr($stk['stkdes'], 30) . "</td><td><input type=text size=3 name=qtys[] value='{$stkd['qty']}'></td><td><input type=text size=8 name=unitcost[] value='{$stkd['unitcost']}'></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 = "";
}
# 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);
# 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 = "<select name=vatcodes[]>\n\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 .= "<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-odd'><td><input type=hidden name=whids[] value='{$whid}'>{$wh['whname']}</td><td><input type=hidden name=stkids[] value='{$stk['stkid']}'><a href='#' onclick='openwindow(\"stock-amt-det.php?stkid={$stk['stkid']}\")'>{$stk['stkcod']}</a></td><td>{$Vatcodes}</td><td>" . extlib_rstr($stk['stkdes'], 30) . "</td><td><input type=text size=3 name=qtys[] value='{$qtyss[$key]}'></td><td><input type=text size=8 name='unitcost[]' value='{$stk['selamt']}'></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++;
} 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 = "<select name=vatcodes[]>\n\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 .= "<tr class='bg-odd'><td colspan=2>{$ad['accname']}<input type=hidden name=accounts[] value='{$accountss[$key]}'><input type=hidden name=whids[] value='0'></td><td>{$Vatcodes}<input type=hidden name=stkids[] value='0'></td><td><input type=text size=20 name=descriptions[] value='{$descriptionss[$key]}'></td><td>{$qtyin}</td><td>{$viewcost}</td><td><input type=hidden name=disc[] value='0'><input type=hidden name=discp[] value='0'></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;
}
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);
# get stock on this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE whid = '{$whid}' AND blocked = 'n' AND div = '" . USER_DIV . "' 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;
}
$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> ";
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes ORDER BY code";
$Ri = db_exec($Sl) or errDie("Unable to get vat codes");
$Vatcodes = "<select name=vatcodess[]>\n\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 .= "<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<tr class='bg-odd'><td><input type=hidden name=whidss[] value='{$whid}'>{$wh['whname']}</td><td>{$stks}<input type=hidden name=vatcodess value=0></td><td></td><td></td><td><input type=text size=3 name='qtyss[]' value='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 {
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 = "<select name=accountss[]>\n\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 = "<select name=vatcodess[]>\n\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 .= "<tr class='bg-odd'><td colspan=2>{$Accounts}<input type=hidden name=whidss[] value='{$FIRST_WH}'></td>\n\t\t\t\t\t\t<inpu type=hidden name='stkidss[]' value=''>\n\t\t\t\t\t\t<td>{$Vatcodes}</td><td><input type=text size=20 name=descriptionss[]></td><td>\n\t\t\t\t\t\t<input type=text size=3 name='qtyss[]' value='1'></td><td><input type=text name=unitcosts[] size=7></td><td></td><td>\n\t\t\t\t\t\t" . CUR . " 0.00</td><td><input type=hidden name=discs[] value='0'><input type=hidden name=discps[] value='0' >\n\t\t\t\t\t\t</td></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);
# get stock on this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE whid = '{$whid}' AND blocked = 'n' AND div = '" . USER_DIV . "' 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.";
}
$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> ";
$products .= "<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=accountss[] value='0'>\n\t\t\t\t<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=text size=3 name=qtyss[] value='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><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 {
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 = "<select name=accountss[]>\n\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 = "<select name=vatcodess[]>\n\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 .= "<tr class='bg-odd'><td colspan=2>{$Accounts}<input type=hidden name=whidss[] value='{$FIRST_WH}'></td>\n\t\t\t<inpu type=hidden name='stkidss[]' value=''>\n\t\t\t<td>{$Vatcodes}</td><td><input type=text size=20 name=descriptionss[]></td><td>\n\t\t\t<input type=text size=3 name='qtyss[]' value='1'></td><td><input type=text name=unitcosts[] size=7></td><td></td><td>\n\t\t\t" . CUR . " 0.00</td><td><input type=hidden name=discs[] value='0'><input type=hidden name=discps[] value='0' >\n\t\t\t</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($quo['subtot']);
$VATP = TAX_VAT;
# Calculate subtotal
$SUBTOT = sprint($quo['subtot']);
$VAT = sprint($quo['vat']);
$TOTAL = sprint($quo['total']);
/* --- 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";
}
$quo['delvat'] += 0;
if ($quo['delvat'] == 0) {
$Sl = "SELECT * FROM vatcodes WHERE del='Yes'";
$Ri = db_exec($Sl) or errDie("Unable to get data.");
$vd = pg_fetch_array($Ri);
$quo['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 = "<select name=delvat>\n\t<option value='0'>Select</option>";
while ($vd = pg_fetch_array($Ri)) {
if ($vd['id'] == $quo['delvat']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
/*--- Start checks --- */
/* -- Final Layout --No VAT<input type=radio size=7 name=chrgvat value='nov' $chno> */
$details = "<center><h3>New Quote</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=quoid value='{$quoid}'>\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>\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='{$quo['cordno']}'></td></tr>\n\t\t\t<tr class='bg-even'><td>Customer VAT Number</td><td>{$cust['vatnum']}</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> Quote Details </th></tr>\n\t\t\t<tr class='bg-even'><td>Quote No.</td><td valign=center>{$quo['quoid']}</td></tr>\n\t\t\t<tr class='bg-odd'><td>Order No.</td><td valign=center><input type=text size=5 name=ordno value='{$quo['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}> </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>Quote Date</td><td valign=center><input type=text size=2 name=oday maxlength=2 value='{$oday}'>-<input type=text size=2 name=omon maxlength=2 value='{$omon}'>-<input type=text size=4 name=oyear maxlength=4 value='{$oyear}'></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='{$quo['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='{$quo['delchrg']}'>{$Vatcodes}</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%>Comments</th><td rowspan=5 valign=top width=50%>{$error}</td></tr>\n\t\t\t<tr><td class='bg-odd'><a href='quote-new.php'>New Quote</a></td><td class='bg-odd' rowspan=4 align=center valign=top><textarea name=comm rows=4 cols=20>{$quo['comm']}</textarea></td></tr>\n\t\t\t<tr class='bg-odd'><td><a href='quote-view.php'>View Quotes</a></td></tr>\n\t\t\t<script>document.write(getQuicklinkSpecial());</script>\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 . " <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 . " {$quo['discount']}</td></tr>\n\t\t\t<tr class='bg-odd'><td>Delivery Charge</td><td align=right>" . CUR . " {$quo['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 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='saveBtn' value='Save'></td><td> | <input type=submit name='upBtn' value='Update'>{$done}</td></tr>\n\t</table>\n\t</form>\n\t</center>";
return $details;
}
function printInv($_POST)
{
# get vars
foreach ($_POST as $key => $value) {
${$key} = $value;
}
# validate input
require_lib("validate");
$v = new validate();
$v->isOk($cusnum, "num", 1, 20, "Invalid Customer number.");
# display errors, if any
$err = "";
if ($v->isError()) {
$errors = $v->getErrors();
foreach ($errors as $e) {
$err .= "<li class=err>" . $e["msg"];
}
return view_err($_POST, $err);
}
# Get selected customer info
db_connect();
$sql = "SELECT * FROM customers WHERE cusnum = '{$cusnum}'";
$custRslt = db_exec($sql) or errDie("Unable to view customer");
if (pg_numrows($custRslt) < 1) {
return "<li class=err>Invalid Customer Number.";
}
$cust = pg_fetch_array($custRslt);
# connect to database
db_connect();
$fdate = "01-" . date("m") . "-" . date("Y");
$stmnt = "";
$totout = 0;
# Query server
$sql = "SELECT * FROM stmnt WHERE cusnum = '{$cusnum}' AND date >= '{$fdate}' ORDER BY date ASC";
$stRslt = db_exec($sql) or errDie("Unable to retrieve invoices statement from database.");
if (pg_numrows($stRslt) < 1) {
$stmnt .= "<tr class='bg-even'><td colspan=4>No previous invoices.</td></tr>";
} else {
$i = 0;
while ($st = pg_fetch_array($stRslt)) {
# Get selected customer info
db_connect();
$sql = "SELECT * FROM customers WHERE cusnum = '{$st['cusnum']}'";
$custRslt = db_exec($sql) or errDie("Unable to get customer information");
if (pg_numrows($custRslt) < 1) {
$sql = "SELECT * FROM inv_data WHERE invid = '{$st['invid']}'";
$custRslt = db_exec($sql) or errDie("Unable to get customer information data");
$cust = pg_fetch_array($custRslt);
$cust['cusname'] = $cust['customer'];
$cust['surname'] = "";
} else {
$cust = pg_fetch_array($custRslt);
}
# Get invoice info
db_connect();
$sql = "SELECT * FROM invoices WHERE invid = '{$st['invid']}'";
$invRslt = db_exec($sql) or errDie("Unable to get invoice information");
if (pg_numrows($invRslt) < 1) {
$stmnt .= "<tr><td colspan=4 class=err>Invoice No. <b>{$st['invid']}</b> note found.</td></tr>";
$i++;
continue;
}
$inv = pg_fetch_array($invRslt);
# format date
$st['date'] = explode("-", $st['date']);
$st['date'] = $st['date'][2] . "-" . $st['date'][1] . "-" . $st['date'][0];
$stmnt .= "<tr class='" . bg_class() . "'><td>{$st['date']}</td><td>{$st['invid']}</td><td>{$st['type']}</td><td>" . CUR . " {$st['amount']}</td></tr>";
# keep track of da totals
$totout += $st['amount'];
$i++;
}
}
$balbf = $cust['balance'] - $totout;
// Layout
$printInv = "\r\n\t<h3>Monthly Statement</h3>\r\n\t<table border=0 cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "'>\r\n\t\t<tr class='bg-odd'><th>Account No.</th><td>{$cust['accno']}</th></tr>\r\n\t\t<tr class='bg-even'><td>Customer : </td><td>{$cust['cusname']} {$cust['surname']}</td></tr>\r\n\t\t<tr class='bg-odd'><td>Balance Brought Forward</td><td>" . CUR . " {$balbf}</td>\r\n\t\t<tr><td><br></td></tr>\r\n\t\t<tr><th>Date</th><th>Invoice No.</th><th>Details</th><th>Amount</th></tr>\r\n\t\t{$stmnt}\r\n\t\t<tr><td><br></td></tr>\r\n\t\t<tr class='bg-even'><td colspan=2><b>Total Outstanding</b></td><td colspan=2>" . CUR . " {$totout}</td></tr>\r\n\t</table>\r\n\t<p>\r\n\t<table border=0 cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "'>\r\n\t\t<tr><td><br></td></tr>\r\n\t\t<tr><th>Quick Links</th></tr>\r\n\t\t<tr class=datacell><td align=center><a href='cust-credit-stockinv.php'>New Invoice</td></tr>\r\n\t\t<script>document.write(getQuicklinkSpecial());</script>\r\n\t\t<tr class=datacell><td align=center><a href='main.php'>Main Menu</td></tr>\r\n\t</table>";
return $printInv;
}
function write($_POST)
{
# get vars
foreach ($_POST as $key => $value) {
${$key} = $value;
}
# validate input
require_lib("validate");
$v = new validate();
$v->isOk($whid, "num", 1, 20, "Invalid Store number.");
$v->isOk($incp, "float", 1, 20, "Invalid Increase Percentage.");
# display errors, if any
if ($v->isError()) {
$error = "";
$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 view_err($_POST, $error);
}
# get warehouse name
db_conn("exten");
$sql = "SELECT whname,whno FROM warehouses WHERE whid = '{$whid}' AND div = '" . USER_DIV . "'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
# Query server
db_connect();
$sql = "SELECT * FROM stock WHERE whid = '{$whid}' AND div = '" . USER_DIV . "' 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.";
return view_err($_POST, $error);
}
# Begin updating
pglib_transaction("BEGIN") or errDie("Unable to start a database transaction.", SELF);
while ($stk = pg_fetch_array($stkRslt)) {
$csprice = $stk['csprice'] * ($incp / 100);
$csprice = round($csprice + $stk['csprice'], 2);
$sql = "UPDATE stock SET selamt = '{$csprice}' WHERE stkid = '{$stk['stkid']}' AND div = '" . USER_DIV . "'";
$upRslt = db_exec($sql) or errDie("Unable to update stocks in Cubit.");
}
# Commit updating
pglib_transaction("COMMIT") or errDie("Unable to commit a database transaction.", SELF);
// Final Laytout
$write = "\n\t<table border=0 cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' width=50%>\n\t\t<tr><th>Selling Price Increased</th></tr>\n\t\t<tr class='bg-even'><td>Selling Price for All Items in Store <b>{$wh['whno']} - {$wh['whname']}</b> have been increase by <b>{$incp}%</b>.</td></tr>\n\t</table>\n\t<p>\n\t<table border=0 cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "'>\n\t\t<tr><th>Quick Links</th></tr>\n\t\t<script>document.write(getQuicklinkSpecial());</script>\n\t</table>";
return $write;
}
function details($_POST, $error = "")
{
# get vars
extract($_POST);
# Redirect, vars?
if (isset($cash) && $cash == 'yes') {
header("Location: purchase-new-cash.php?deptid={$deptid}");
}
# validate input
require_lib("validate");
$v = new validate();
if (isset($purid)) {
$v->isOk($purid, "num", 1, 20, "Invalid Order 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($purid)) {
$purid = create_dummy($deptid);
}
$supprice = 0;
# Get Order info
db_connect();
$sql = "SELECT * FROM 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);
$deptid = $pur['deptid'];
# check if Order has been printed
if ($pur['received'] == "y") {
$error = "<li class='err'> Error : Order number <b>{$purid}</b> has already been received.</li>";
$error .= "<p><input type='button' onClick='JavaScript:history.back();' value='« Correct submission'>";
return $error;
}
if (!isset($ordernum)) {
$ordernum = '';
}
if (!isset($supinv)) {
$supinv = '';
}
# get department
db_conn("exten");
$sql = "SELECT * FROM departments WHERE deptid = '{$pur['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 suppliers WHERE supid = '{$pur['supid']}' AND div = '" . USER_DIV . "'";
$supRslt = db_exec($sql) or errDie("Unable to view Supplier");
if (pg_numrows($supRslt) < 1) {
db_connect();
if ($inv['deptid'] == 0) {
$searchdept = "";
} else {
$searchdept = "deptid = '{$deptid}' AND ";
}
# Query server for supplier info
$sql = "SELECT * FROM suppliers WHERE {$searchdept} location != 'int' AND lower(supname) LIKE lower('{$letters}%') AND div = '" . USER_DIV . "' ORDER BY supname ASC";
$supRslt = db_exec($sql) or errDie("Unable to view suppliers");
if (pg_numrows($supRslt) < 1) {
$err = "<li class='err'>No Supplier names starting with <b>{$letters}</b> in database.</li>";
return view_err($_POST, $err);
} else {
$suppliers = "<select name='supid' onChange='javascript:document.form.submit();'>";
$suppliers .= "<option value='-S' selected>Select Supplier</option>";
while ($sup = pg_fetch_array($supRslt)) {
$suppliers .= "<option value='{$sup['supid']}'>{$sup['supname']}</option>";
}
$suppliers .= "</select>";
}
# take care of the uset vars
$supaddr = "";
$accno = "";
} else {
db_connect();
# Query server for supplier info
$sql = "SELECT * FROM suppliers WHERE deptid = '{$deptid}' AND location != 'int' AND lower(supname) LIKE lower('{$letters}%') AND div = '" . USER_DIV . "' ORDER BY supname ASC";
$supRslt = db_exec($sql) or errDie("Unable to view suppliers");
if (pg_numrows($supRslt) < 1) {
$err = "<li class='err'>No Supplier names starting with <b>{$letters}</b> in database.</li>";
return view_err($_POST, $err);
} else {
$suppliers = "<select name='supid' onChange='javascript:document.form.submit();'>";
$supaddr = "";
$accno = "";
while ($sup = pg_fetch_array($supRslt)) {
if ($sup['supid'] == $pur['supid']) {
$sel = "selected";
$supaddr = $sup['supaddr'];
$accno = $sup['supno'];
$supprice = $sup['listid'];
} else {
$sel = "";
}
$suppliers .= "<option value='{$sup['supid']}' {$sel}>{$sup['supname']}</option>";
}
$suppliers .= "</select>";
}
$get_codes = "SELECT * FROM suppstock WHERE suppid = '{$pur['supid']}' ORDER BY stkid";
$run_codes = db_exec($get_codes) or errDie("Unable to get supplier stock code information");
if (pg_numrows($run_codes) > 0) {
while ($codarr = pg_fetch_array($run_codes)) {
if (strlen($codarr['stkcod']) > 0) {
$stockcodes[$codarr['stkid']]['stkcod'] = $codarr['stkcod'];
}
if (strlen($codarr['stkdes']) > 0) {
$stockcodes[$codarr['stkid']]['stkdes'] = $codarr['stkdes'];
}
}
}
}
/* --- 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'> 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>";
# days drop downs
$days = array("0" => "0", "7" => "7", "14" => "14", "30" => "30", "60" => "60", "90" => "90", "120" => "120");
$termssel = extlib_cpsel("terms", $days, $pur['terms']);
# format date
list($pur_year, $pur_month, $pur_day) = explode("-", $pur['pdate']);
# keep the charge vat option stable
if ($pur['vatinc'] == "yes") {
$chy = "checked='yes'";
$chn = "";
$chv = "";
} elseif ($pur['vatinc'] == "no") {
$chy = "";
$chn = "checked='yes'";
$chv = "";
} else {
$chy = "";
$chn = "";
$chv = "checked='yes'";
}
/* --- 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>DESCRIPTION</th>\n\t\t\t\t<th>QTY</th>\n\t\t\t\t<th>UNIT PER PACK</th>\n\t\t\t\t<th>PRICE PER PACK</th>\n\t\t\t\t<th>UNITS</th>\n\t\t\t\t<th>PRICE PER UNIT</th>\n\t\t\t\t<th>DISCOUNT</th>\n\t\t\t\t<th>DELIVERY DATE</th>\n\t\t\t\t<th>AMOUNT</th>\n\t\t\t\t<th>VAT</th>\n\t\t\t\t<th>REM</th>\n\t\t\t</tr>";
# get selected stock in this purchase
db_connect();
$sql = "SELECT * FROM pur_items WHERE purid = '{$purid}' 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) {
if (!isset($stk['exvat'])) {
$stk['exvat'] = "";
}
# keep track of selected stock amounts
$amts[$i] = $stkd['amt'];
$i++;
db_conn('core');
$Sl = "SELECT * FROM accounts WHERE accid='{$stkd['account']}'";
$Rk = db_exec($Sl);
$ad = pg_fetch_array($Rk);
list($syear, $smonth, $sday) = explode("-", $stkd['ddate']);
$stkd['amt'] = sprint($stkd['amt']);
db_conn('cubit');
$Sl = "SELECT * FROM vatcodes WHERE id='{$stkd['vatcode']}'";
$Ri = db_exec($Sl);
if (pg_num_rows($Ri) < 1) {
// return "Please select the vatcode for all your stock.";
$_POST['done'] = "";
return details($_POST, "<li class='err'>Please select the vatcode for all your items.</li>");
}
$vd = pg_fetch_array($Ri);
if ($pur['vatinc'] == 'no' && $stk['exvat'] != 'yes' && $vd['zero'] != "Yes") {
$vunitamt = sprint($stkd['unitcost'] + $stkd['svat'] / $stkd['qty']);
} else {
$vunitamt = sprint($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>";
$tip = " ";
if (isset($vatc[$key])) {
$tip = "<font color='red'>#</font>";
$error = "<div class='err'> {$tip} = VAT amount is different from amount calculated by cubit. To allow cubit to recalculate the vat amount, please delete the vat amount from the input box.";
}
if ($stkd['udiscount'] > 0) {
$discps = round($stkd['udiscount'] / 100 * $stkd['unitcost'], 2);
}
$stkd['amt'] = sprint($stkd['qty'] * ($stkd['unitcost'] - $discps));
# put in product
$products .= "\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td><input type='hidden' name='whids[]' value='0'></td>\n\t\t\t\t\t<td>\n\t\t\t\t\t\t<input type='hidden' name='stkids[]' value='{$stkd['stkid']}'>\n\t\t\t\t\t\t{$ad['accname']}\n\t\t\t\t\t\t<input type='hidden' name='accounts[]' value='{$stkd['account']}'>\n\t\t\t\t\t</td>\n\t\t\t\t\t<td>{$Vatcodes}</td>\n\t\t\t\t\t<td><input type='text' name='descriptions[]' value='{$stkd['description']}'></td>\n\t\t\t\t\t<td><input type='text' size='4' name='qtys[]' value='{$stkd['qpack']}'></td>\n\t\t\t\t\t<td><input type='text' size='5' name='upack[]' value='{$stkd['upack']}'></td>\n\t\t\t\t\t<td><input type='text' size='8' name='ppack[]' value='" . sprint($stkd['ppack']) . "'></td>\n\t\t\t\t\t<td>" . sprint3($stkd['qty']) . "</td>\n\t\t\t\t\t<td align='right' nowrap>" . CUR . " {$vunitamt}</td>\n\t\t\t\t\t<td><input type='text' size='5' name='udiscount[]' value='{$stkd['udiscount']}'></td>\n\t\t\t\t\t<td>" . mkDateSelecta("d", $key, $syear, $smonth, $sday) . "</td>\n\t\t\t\t\t<td align='right' nowrap><input type='hidden' name='amt[]' value='{$stkd['amt']}'> " . CUR . " {$stkd['amt']}</td>\n\t\t\t\t\t<td>{$tip} <input type='text' name='svat[]' size='7' value='{$stkd['svat']}'></td>\n\t\t\t\t\t<td><input type='checkbox' name='remprod[]' value='{$key}'></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);
list($syear, $smonth, $sday) = explode("-", $stkd['ddate']);
$stkd['amt'] = sprint($stkd['amt']);
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>";
if ($pur['vatinc'] == 'no' && $stk['exvat'] != 'yes' && $vd['zero'] != "Yes") {
$vunitamt = sprint($stkd['unitcost'] + $stkd['svat'] / $stkd['qty']);
} else {
$vunitamt = sprint($stkd['unitcost']);
}
$tip = " ";
if (isset($vatc[$key])) {
$tip = "<font color='red'>#</font>";
$error = "<div class='err'> {$tip} = VAT amount is different from amount calculated by cubit. To allow cubit to recalculate the vat amount, please delete the vat amount from the input box.";
}
$discps = 0;
if ($stkd['udiscount'] > 0) {
$discps = round($stkd['udiscount'] / 100 * $stkd['unitcost'], 2);
}
$stkd['amt'] = sprint($stkd['qty'] * ($stkd['unitcost'] - $discps));
if (isset($stockcodes[$stk['stkid']]['stkcod'])) {
$stk['stkcod'] = $stockcodes[$stk['stkid']]['stkcod'];
}
if (isset($stockcodes[$stk['stkid']]['stkdes'])) {
$stk['stkdes'] = $stockcodes[$stk['stkid']]['stkdes'];
}
# 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='#' 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>{$stk['stkdes']}</td>\n\t\t\t\t\t<td><input type='text' size='4' name='qtys[]' value='{$stkd['qpack']}'></td>\n\t\t\t\t\t<td><input type='text' size='5' name='upack[]' value='{$stkd['upack']}'></td>\n\t\t\t\t\t<td><input type='text' size='8' name='ppack[]' value='" . sprint($stkd['ppack']) . "'></td>\n\t\t\t\t\t<td>" . sprint3($stkd['qty']) . "</td>\n\t\t\t\t\t<td align='right' nowrap>" . CUR . " {$vunitamt}</td>\n\t\t\t\t\t<td><input type='text' size='5' name='udiscount[]' value='{$stkd['udiscount']}'></td>\n\t\t\t\t\t<td>" . mkDateSelecta("d", $key, $syear, $smonth, $sday) . "</td>\n\t\t\t\t\t<td align='right' nowrap><input type='hidden' name='amt[]' value='{$stkd['amt']}'> " . CUR . " {$stkd['amt']}</td>\n\t\t\t\t\t<td>{$tip} <input type='text' name='svat[]' size='7' value='{$stkd['svat']}'></td>\n\t\t\t\t\t<td><input type='checkbox' name='remprod[]' value='{$key}'></td>\n\t\t\t\t</tr>";
$key++;
}
}
// select using selection
if (!isset($sel_frm)) {
$sel_frm = "stkcod";
}
# Look above(remprod keys)
$keyy = $key;
# look above(if i = 0 then there are no products)
if ($i == 0) {
$done = "";
}
# check if stock warehouse was selected
if (isset($whidss)) {
foreach ($whidss as $key => $whid) {
if (isset($stkidss[$key]) && $stkidss[$key] != "-S") {
# 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);
$Sl = "SELECT * FROM splist_prices WHERE listid='{$supprice}' AND div='" . USER_DIV . "' AND stkid='{$stkidss[$key]}'";
$Ry = db_exec($Sl) or errDie("Unable to get price.");
$listdata = pg_fetch_array($Ry);
$newprice = $listdata['price'];
# 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);
# Calculate amount
$amt[$key] = sprint($qtyss[$key] * 0);
$newprice += 0;
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>";
$discps = 0;
if ($udiscount[$key] > 0) {
$discps = round($udiscount[$key] / 100 * $newprice, 2);
}
$amt[$key] = sprint($qtyss[$key] * ($newprice - $discps));
if (isset($stockcodes[$stk['stkid']]['stkcod'])) {
$stk['stkcod'] = $stockcodes[$stk['stkid']]['stkcod'];
}
if (isset($stockcodes[$stk['stkid']]['stkdes'])) {
$stk['stkdes'] = $stockcodes[$stk['stkid']]['stkdes'];
}
# 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='#' 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>{$stk['stkdes']}</td>\n\t\t\t\t\t\t<td><input type='text' size='4' name='qtys[]' value='{$qtyss[$key]}'></td>\n\t\t\t\t\t\t<td><input type='hidden' name='novat[{$keyy}]' value='1'><input type='text' size='5' name='upack[]' value='{$stk['rate']}'></td>\n\t\t\t\t\t\t<td><input type='text' size='8' name='ppack[]' value='" . sprint($newprice) . "'></td>\n\t\t\t\t\t\t<td>{$stk['rate']}</td>\n\t\t\t\t\t\t<td align='right' nowrap>" . CUR . " 0.00</td>\n\t\t\t\t\t\t<td><input type='text' size='5' name='udiscount[]' value='" . sprint($udiscounts[$key]) . "'></td>\n\t\t\t\t\t\t<td>" . mkDateSelecta("d", $keyy, $d_year[$keyy], $d_month[$keyy], $d_day[$keyy]) . "</td>\n\t\t\t\t\t\t<td align='right' nowrap><input type='hidden' name='amt[]' value='{$amt[$key]}'> " . CUR . " {$amt[$key]}</td>\n\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t<td><input type='checkbox' name='remprod[]' value='{$keyy}'></td>\n\t\t\t\t\t</tr>";
} elseif (isset($accountss[$key]) && $accountss[$key] != "0") {
# skip if not selected
if ($whid == "-S") {
continue;
}
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[$keyy] * 0);
//$newprice+=0;
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[$keyy] == $vd['id']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
#we want to open the cost center popup here and now if this is and expense ....
/* $sql = "SELECT * FROM bankacct WHERE btype != 'int' AND div = '".USER_DIV."' LIMIT 1";
$banks = db_exec($sql);
if(pg_numrows($banks) < 1){
return "<li class=err> There are no accounts held at the selected Bank.
<p><input type=button onClick='JavaScript:history.back();' value='« Correct Selection'>";
}
$barr = pg_fetch_array($banks);
$bankid = $barr['bankid'];
core_connect();
$sql = "SELECT * FROM bankacc WHERE accid = '$bankid' AND div = '".USER_DIV."'";
$rslt = db_exec($sql) or errDie("Unable to retrieve bank account link from Cubit",SELF);
# Check if link exists
if(pg_numrows($rslt) <1){
return "<li class=err> ERROR : The bank account that you selected doesn't appear to have an account linked to it.";
}
$banklnk = pg_fetch_array($rslt);*/
/* if(cc_TranTypeAcc($accountss[$key], $banklnk['accnum']) != false){
$cc_trantype = cc_TranTypeAcc($accountss[$key], $banklnk['accnum']);
$date = date("d-m-Y");
$amount = $ppack[$key] * $qtyss[$key];
$cc = "<script> CostCenter('$cc_trantype', 'Bank Transaction', '$date', '$descriptionss[$key]', '$amount', ''); </script>";
}else{
$cc = "";
}*/
# THIS PRODUCT DISPLAYS DIRECTLY AFTER A NON STOCK ACCOUNT HAS BEEN SUBMITTED
# Put in selected warehouse and stock
$discps = 0;
if ($udiscount[$key] > 0) {
$discps = round($udiscount[$key] / 100 * $newprice, 2);
}
$amt[$key] = sprint($qtyss[$key] * ($newprice - $discps));
$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<input type='hidden' name='accounts[]' value='{$accountss[$key]}'>\n\t\t\t\t\t\t\t<input type='hidden' name='whids[]' value='0'>{$ad['accname']}\n\t\t\t\t\t\t</td>\n\t\t\t\t\t\t<td><input type='hidden' name='stkids[]' value='0'>{$Vatcodes}</td>\n\t\t\t\t\t\t<td><input type='text' size='20' name='descriptions[]' value='{$descriptionss[$keyy]}'></td>\n\t\t\t\t\t\t<td><input type='text' size='4' name='qtys[]' value='{$qtyss[$keyy]}'></td>\n\t\t\t\t\t\t<td><input type='hidden' name='novat[{$keyy}]' value='1'><input type='text' size='5' name='upack[]' value='{$upack[$key]}'></td>\n\t\t\t\t\t\t<td><input type='text' size='8' name='ppack[{$keyy}]' value='" . sprint($ppack[$keyy]) . "'></td>\n\t\t\t\t\t\t<td></td>\n\t\t\t\t\t\t<td align='right' nowrap>" . CUR . " 0.00</td>\n\t\t\t\t\t\t<td><input type='text' size='5' name='udiscount[{$keyy}]' value='" . sprint($udiscount[$keyy]) . "'></td>\n\t\t\t\t\t\t<td>" . mkDateSelecta("d", $keyy, $d_year[$key], $d_month[$key], $d_day[$key]) . "</td>\n\t\t\t\t\t\t<td align='right' nowrap><input type='hidden' name='amt[]' value='{$amt[$key]}'> " . CUR . " {$amt[$key]}</td>\n\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t<td><input type='checkbox' name='remprod[]' value='{$keyy}'></td>\n\t\t\t\t\t</tr>";
} 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 = '{$whid}' AND div = '" . USER_DIV . "'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
}
if (isset($des) and $des != "") {
$len = strlen($des);
if ($des == "Show All") {
$Wh = "";
$des = "";
} else {
$Wh = "AND (lower(stkdes) LIKE lower('%{$des}%')) OR (lower(stkcod) LIKE lower('%{$des}%'))";
}
} else {
$Wh = "AND FALSE";
$des = "";
}
$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 div = '" . USER_DIV . "' {$Wh} ORDER BY stkcod ASC LIMIT 200";
$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 ($sel_frm == "stkcod") {
$stks = "<select name='stkidss[]' style='width:200px' onChange='javascript:document.form.submit();'>";
$stks .= "<option value='-S' disabled selected>Select Number</option>";
$count = 0;
while ($stk = pg_fetch_array($stkRslt)) {
if (isset($stockcodes[$stk['stkid']]['stkcod'])) {
$stk['stkcod'] = $stockcodes[$stk['stkid']]['stkcod'];
}
if (isset($stockcodes[$stkd['stkid']]['stkdes'])) {
$stk['stkdes'] = $stockcodes[$stk['stkid']]['stkdes'];
}
$stks .= "<option value='{$stk['stkid']}'>{$stk['stkcod']} (" . sprint3($stk['units'] - $stk['alloc']) . ")</option>";
}
$stks .= "</select> ";
} else {
$stks = "<select name='stkidss[]' style='width:200px' onChange='javascript:document.form.submit();'>";
$stks .= "<option value='-S' disabled selected>Select Description</option>";
$count = 0;
while ($stk = pg_fetch_array($stkRslt)) {
if (isset($stockcodes[$stk['stkid']]['stkcod'])) {
$stk['stkcod'] = $stockcodes[$stk['stkid']]['stkcod'];
}
if (isset($stockcodes[$stkd['stkid']]['stkdes'])) {
$stk['stkdes'] = $stockcodes[$stk['stkid']]['stkdes'];
}
$stks .= "<option value='{$stk['stkid']}'>{$stk['stkdes']} (" . sprint3($stk['units'] - $stk['alloc']) . ")</option>";
}
$stks .= "</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='udiscounts[]' value='0.00'>\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='{$filter_store}'></td>\n\t\t\t\t\t\t\t<td>{$stks}</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='text' size='4' name='qtyss[]' value='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> </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>" . mkDateSelecta("d", $keyy, $d_year[$keyy], $d_month[$keyy], $d_day[$keyy]) . "</td>\n\t\t\t\t\t\t\t<td align='right' nowrap><input type='hidden' name='amts[]' value='0.00'>" . CUR . " 0.00</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</tr>\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=''>";
} 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_PURCHASES_ACCOUNTS");
if (isset($useaccdrop) and $useaccdrop == "yes") {
db_connect();
$acc_sql = "SELECT * FROM non_purchases_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 ORDER BY accname";
$Ri = db_exec($Sl) or errDie("Unable to get accounts.");
// WHERE acctype='I'
while ($ad = pg_fetch_array($Ri)) {
if (isDisabled($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[{$keyy}]'>\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 colspan='2'><input type='hidden' name='whidss[]' value='0'>{$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[{$keyy}]' value=''></td>\n\t\t\t\t\t\t\t<td><input type='text' size='4' name='qtyss[{$keyy}]' value='1'></td>\n\t\t\t\t\t\t\t<td><input type='hidden' name='upack[{$keyy}]' value='1'></td>\n\t\t\t\t\t\t\t<td><input type='text' size='8' name='ppack[{$keyy}]' value=''></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' name='udiscount[{$keyy}]' value='0.00'></td>\n\t\t\t\t\t\t\t<td>" . mkDateSelecta("d", $keyy, $d_year[$key], $d_month[$key], $d_day[$key]) . "</td>\n\t\t\t\t\t\t\t<td align='right' nowrap><input type='hidden' name='amts[{$keyy}]' value='0.00'>" . CUR . " 0.00</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</tr>";
}
}
$keyy++;
}
} else {
$ckey = $keyy;
# take todays date
list($year, $month, $day) = explode("-", $pur['pdate']);
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);
}
if (isset($des) and $des != "") {
$len = strlen($des);
if ($des == "Show All") {
$Wh = "";
$des = "";
} else {
$Wh = "AND (lower(stkdes) LIKE lower('%{$des}%')) OR (lower(stkcod) LIKE lower('%{$des}%'))";
}
} else {
$Wh = "AND FALSE";
$des = "";
}
$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 div = '" . USER_DIV . "' {$Wh} ORDER BY stkcod ASC LIMIT 200";
$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>";
}
if ($sel_frm == "stkcod") {
$stks = "<select name='stkidss[]' style='width:200px' onChange='javascript:document.form.submit();'>";
$stks .= "<option value='-S' disabled selected>Select Number</option>";
$count = 0;
while ($stk = pg_fetch_array($stkRslt)) {
if (isset($stockcodes[$stk['stkid']]['stkcod'])) {
$stk['stkcod'] = $stockcodes[$stk['stkid']]['stkcod'];
}
if (isset($stockcodes[$stkd['stkid']]['stkdes'])) {
$stk['stkdes'] = $stockcodes[$stk['stkid']]['stkdes'];
}
$stks .= "<option value='{$stk['stkid']}'>{$stk['stkcod']} (" . sprint3($stk['units'] - $stk['alloc']) . ")</option>";
}
$stks .= "</select> ";
} else {
$stks = "<select name='stkidss[]' style='width:200px' onChange='javascript:document.form.submit();'>";
$stks .= "<option value='-S' disabled selected>Select Description</option>";
$count = 0;
while ($stk = pg_fetch_array($stkRslt)) {
if (isset($stockcodes[$stk['stkid']]['stkcod'])) {
$stk['stkcod'] = $stockcodes[$stk['stkid']]['stkcod'];
}
if (isset($stockcodes[$stkd['stkid']]['stkdes'])) {
$stk['stkdes'] = $stockcodes[$stk['stkid']]['stkdes'];
}
$stks .= "<option value='{$stk['stkid']}'>{$stk['stkdes']} (" . sprint3($stk['units'] - $stk['alloc']) . ")</option>";
}
$stks .= "</select> ";
}
$products .= "\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<input type='hidden' name='accountss[]' value='0'>\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='udiscounts[]' value='0.00'>\n\t\t\t\t\t<td><input type='hidden' name='whidss[]' value='{$filter_store}'></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='4' name='qtyss[]' value='1'></td>\n\t\t\t\t\t<td> </td>\n\t\t\t\t\t<td> </td>\n\t\t\t\t\t<td> </td>\n\t\t\t\t\t<td> </td>\n\t\t\t\t\t<td> </td>\n\t\t\t\t\t<td>" . mkDateSelecta("d", $ckey, $year, $month, $day) . "</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\t<td></td>\n\t\t\t\t</tr>";
$ckey++;
}
$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']);
# Shipping Charges
$pur['shipchrg'] = sprint($pur['shipchrg']);
$pur['delvat'] += 0;
if ($pur['delvat'] == 0) {
$Sl = "SELECT * FROM vatcodes WHERE del='Yes'";
$Ri = db_exec($Sl) or errDie("Unable to get data.");
$vd = pg_fetch_array($Ri);
$pur['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'] == $pur['delvat']) {
$sel = "selected";
} else {
$sel = "";
}
$Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
}
$Vatcodes .= "</select>";
/* --- End Some calculations --- */
$ex = "";
if (strlen($supinv)) {
db_conn('cubit');
$Sl = "SELECT purnum,pdate FROM purchases WHERE supid='{$supid}' AND supinv='{$supinv}' AND purid!='{$purid}'";
$Ri = db_exec($Sl);
if (pg_num_rows($Ri) > 0) {
$pd = pg_fetch_array($Ri);
$ex .= "<li class='err'>Purchase {$pd['purnum']} on {$pd['pdate']} has the same supplier invoice number.</li>";
}
for ($i = 1; $i < 13; $i++) {
db_conn($i);
$Sl = "SELECT purnum,pdate FROM purchases WHERE supid='{$supid}' AND supinv='{$supinv}'";
$Ri = db_exec($Sl);
if (pg_num_rows($Ri) > 0) {
$pd = pg_fetch_array($Ri);
$ex .= "<li class='err'>Purchase {$pd['purnum']} on {$pd['pdate']} has same the supplier invoice number.</li>";
}
}
db_conn('cubit');
$Sl = "SELECT purnum,pdate FROM nons_purchases WHERE supplier='{$supid}' AND supinv='{$supinv}'";
$Ri = db_exec($Sl);
if (pg_num_rows($Ri) > 0) {
$pd = pg_fetch_array($Ri);
$ex .= "<li class='err'>Non Stock Purchase {$pd['purnum']} on {$pd['pdate']} has the same supplier invoice number.</li>";
}
for ($i = 1; $i < 13; $i++) {
db_conn($i);
$Sl = "SELECT purnum,pdate FROM nons_purchases WHERE supplier='{$supid}' AND supinv='{$supinv}'";
$Ri = db_exec($Sl);
if (pg_num_rows($Ri) > 0) {
$pd = pg_fetch_array($Ri);
$ex .= "<li class='err'>Non Stock Purchase {$pd['purnum']} on {$pd['pdate']} has same the supplier invoice number.</li>";
}
}
}
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 = "";
}
if (isset($addnon) or isset($upBtn) or isset($doneBtn) or isset($invoice) or isset($donePrnt)) {
$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);
$whid = $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>";
}
$details = "\n\t\t<center>\n\t\t<h3>New Order</h3>\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t<input type='hidden' name='SCROLL' value='1' />\n\t\t\t<input type='hidden' name='key' value='update' />\n\t\t\t<input type='hidden' name='purid' value='{$purid}' />\n\t\t\t<input type='hidden' name='deptid' value='{$deptid}' />\n\t\t\t<input type='hidden' name='letters' value='{$letters}' />\n\t\t\t<input type='hidden' name='total' value='{$TOTAL}' />\n\t\t\t<input type='hidden' name='subtot' value='{$SUBTOT}'>\n\t\t<table " . TMPL_tblDflts . " width='97%'>\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>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>Supplier</td>\n\t\t\t\t\t\t\t<td valign='center'>{$suppliers}</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 number</td>\n\t\t\t\t\t\t\t<td valign='center'>{$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 valign='top'>Supplier Address</td>\n\t\t\t\t\t\t\t<td valign='center'>" . nl2br($supaddr) . "</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>\n\t\t\t\t\t\t\t\tStock Code\n\t\t\t\t\t\t\t\t<input type='radio' name='sel_frm' value='stkcod' onChange='javascript:document.form.submit();' {$sel_frm_cod}> Stock Description<input type='radio' name='sel_frm' value='stkdes' onChange='javascript:document.form.submit();' {$sel_frm_des} />\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><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() . "'>\n\t\t\t\t\t\t\t<td>Stock Filter</td>\n\t\t\t\t\t\t\t<td>\n\t\t\t\t\t\t\t\t<input type='text' size='13' name='des' value='{$des}'> \n\t\t\t\t\t\t\t\t<input type='submit' value='Search'> \n\t\t\t\t\t\t\t\t<input type='submit' name='des' value='Show All'>\n\t\t\t\t\t\t\t</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' width='35%'>\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'>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>Order 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>Order No.</td>\n\t\t\t\t\t\t\t<td valign='center'><input type='text' size='10' name='ordernum' value='{$pur['ordernum']}'></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 Inv</td>\n\t\t\t\t\t\t\t<td><input type='text' size='10' name='supinv' value='{$pur['supinv']}'></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>Date</td>\n\t\t\t\t\t\t\t<td valign='center' nowrap='t'>" . mkDateSelect("pur", $pur_year, $pur_month, $pur_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'>\n\t\t\t\t\t\t\t\tYes <input type='radio' size='7' name='vatinc' value='yes' {$chy}> \n\t\t\t\t\t\t\t\tNo <input type='radio' size='7' name='vatinc' value='no' {$chn}></td></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 Charges</td>\n\t\t\t\t\t\t\t<td valign='center'><input type=text size=7 name=shipchrg value='{$pur['shipchrg']}'></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 Charges VAT Code</td>\n\t\t\t\t\t\t\t<td valign='center'>{$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'>{$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='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%'>{$ex} {$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() . "'>\n\t\t\t\t\t\t\t\t<a href='supp-new.php?re={$pur['purnum']}'>New Supplier</a>\n\t\t\t\t\t\t\t</td>\n\t\t\t\t\t\t\t<td class='" . bg_class() . "' rowspan='5' align='center' valign='top'>\n\t\t\t\t\t\t\t\t<textarea name='remarks' rows='4' cols='20'>{$pur['remarks']}</textarea>\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>\n\t\t\t\t\t\t\t<td class='" . bg_class() . "'><a href='purchase-view.php'>View Orders</a></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='main.php'>Main Menu</a></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 . " {$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>Delivery Charges</td>\n\t\t\t\t\t\t\t<td align='right' nowrap>" . CUR . " {$pur['shipping']}</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' 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='addnon' type='submit' value='Add Non stock Product'> | <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 details($_POST)
{
# get vars
foreach ($_POST as $key => $value) {
${$key} = $value;
}
# validate input
require_lib("validate");
$v = new validate();
$v->isOk($deptid, "num", 1, 20, "Invalid department number.");
if (!isset($cussel)) {
$v->isOk($cusnum, "num", 1, 20, "Please Select Customer.");
if (isset($selected)) {
$v->isOk($ordno, "num", 0, 20, "Invalid order number.");
$v->isOk($terms, "num", 1, 5, "Invalid terms days.");
$v->isOk($salespn, "string", 1, 255, "Invalid sales person.");
$v->isOk($oday, "num", 1, 2, "Invalid Quote Date day.");
$v->isOk($omon, "num", 1, 2, "Invalid Quote Date month.");
$v->isOk($oyear, "num", 1, 5, "Invalid Quote Date year.");
# $v->isOk ($disc, "float", 0, 20, "Invalid Discount.");
# $v->isOk ($discp, "float", 0, 20, "Invalid Discount percentage.");
$v->isOk($delchrg, "float", 0, 20, "Invalid Delivery Charge.");
$v->isOk($cordno, "num", 0, 20, "Invalid Customer Order Number.");
$v->isOk($traddisc, "float", 0, 20, "Invalid Trade Discount.");
$v->isOk($comm, "string", 0, 255, "Invalid Comments.");
$odate = $oyear . "-" . $omon . "-" . $oday;
if (!checkdate($omon, $oday, $oyear)) {
$v->isOk($odate, "num", 1, 1, "Invalid Quote Date.");
}
# check quantities and discounts
if (isset($qtys)) {
foreach ($qtys as $keys => $qty) {
$v->isOk($qty, "num", 0, 10, "Invalid Quantity for product number : <b>" . ($keys + 1) . "</b>");
$v->isOk($disc[$keys], "float", 0, 20, "Invalid Discount for product number : <b>" . ($keys + 1) . "</b>.");
$v->isOk($discp[$keys], "float", 0, 20, "Invalid Discount Percentage for product number : <b>" . ($keys + 1) . "</b>.");
$v->isOk($unitcost[$keys], "float", 0, 20, "Invalid Unit Price for product number : <b>" . ($keys + 1) . "</b>.");
if ($qty < 1) {
$v->isOk($error, "num", 0, 0, "Error : Item Quantity must be at least one. Product number : <b>" . ($keys + 1) . "</b>");
}
}
# everything is set place done button
$done = " | <input name=doneBtn type=submit value='Done'>";
} else {
# no done button
$done = "";
}
} else {
# no done button
$done = "";
}
# display errors, if any
$err = "";
if ($v->isError()) {
# theres an error?? remove done button
$done = "";
$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;
}
} else {
$v->isOk($letters, "string", 0, 5, "Invalid First 3 Letters.");
# no done button
$done = "";
# display errors, if any
$err = "";
if ($v->isError()) {
$errors = $v->getErrors();
foreach ($errors as $e) {
$err .= "<li class=err>" . $e["msg"];
}
return view_err($_POST, $err);
}
}
# get department
db_conn("exten");
$sql = "SELECT * FROM departments WHERE deptid = '{$deptid}'";
$deptRslt = db_exec($sql);
if (pg_numrows($deptRslt) < 1) {
$deptname = "<li class=err>Department not Found.";
} else {
$dept = pg_fetch_array($deptRslt);
$deptname = $dept['deptname'];
}
# Check if must select customer (is yes, make some vars void)
if (isset($cussel)) {
db_connect();
# Query server for customer info
$sql = "SELECT cusnum,cusname,surname FROM customers WHERE deptid = '{$deptid}' AND lower(surname) LIKE lower('{$letters}%') 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' disabled 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 uset vars
$cust['addr1'] = "";
$cust['addr2'] = "";
$cust['addr3'] = "";
$cust['cusnum'] = "";
$cust['vatnum'] = "";
$cust['traddisc'] = "";
$terms = "0";
$ordno = "";
$chrgvat = "yes";
$salespn = "";
$oday = date("d");
$omon = date("m");
$oyear = date("Y");
$disc = "0.00";
$discp = "0.00";
$delchrg = "0.00";
$cordno = "";
$comm = "";
$traddisc = 0;
} elseif ($cusnum == "-S" || strlen($cusnum) < 1) {
db_connect();
# Query server for customer info
$sql = "SELECT cusnum,cusname,surname FROM customers WHERE deptid = '{$deptid}' AND lower(cusname) LIKE lower('{$letters}%') ORDER BY cusname";
$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' disabled 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 uset vars
$cust['addr1'] = "";
$cust['addr2'] = "";
$cust['addr3'] = "";
$cust['cusnum'] = "";
$cust['vatnum'] = "";
$cust['traddisc'] = "";
$terms = "0";
$ordno = "";
$chrgvat = "yes";
$salespn = "";
$oday = date("d");
$omon = date("m");
$oyear = date("Y");
$disc = "0.00";
$discp = "0.00";
$delchrg = "0.00";
$cordno = "";
$terms = "";
$traddisc = 0;
} else {
# Get selected customer info
db_connect();
$sql = "SELECT * FROM customers WHERE cusnum = '{$cusnum}'";
$custRslt = db_exec($sql) or errDie("Unable to view customer");
if (pg_numrows($custRslt) < 1) {
return "<li class=err>Invalid Customer Number.";
}
$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.";
}
$customers = "<input type=hidden name=selected value='{$cust['cusnum']}'>{$cust['cusname']} {$cust['surname']}";
}
/* --- Start Drop Downs --- */
# Select warehouse
db_conn("exten");
$whs = "<select name='whids[]' onChange='javascript:document.form.submit();'>";
$sql = "SELECT * FROM warehouses ORDER BY whname ASC";
$whRslt = db_exec($sql);
if (pg_numrows($whRslt) < 1) {
return "<li class=err> There are no Warehouses found in Cubit.";
} else {
$whs .= "<option value='-S' disabled selected>Select Warehouse</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 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'] == $salespn) {
$sel = "selected";
} else {
$sel = "";
}
$salesps .= "<option value='{$salesp['salesp']}' {$sel}>{$salesp['salesp']}</option>";
}
$salesps .= "</select>";
}
# days drop downs
$days = array("30" => "30", "60" => "60", "90" => "90", "120" => "120");
$termssel = extlib_cpsel("terms", $days, $terms);
# keep the charge vat option stable
if ($chrgvat == "yes") {
$chy = "checked=yes";
$chn = "";
} else {
$chy = "";
$chn = "checked=yes";
}
/* --- End Drop Downs --- */
/*--- Start My Event Listeners ---*/
#if the Add button was clicked add one more product
if (isset($addprodBtn)) {
# check if setting exists
db_connect();
$sql = "SELECT value FROM set WHERE label = 'DEF_WH'";
$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'];
# get selected warehouse name
db_conn("exten");
$sql = "SELECT whname FROM warehouses WHERE whid = '{$whid}'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
# get stock on this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE whid = '{$whid}' ORDER BY stkcod ASC";
$stkRslt = db_exec($sql) or errDie("Unable to retrieve stocks from database.");
if (pg_numrows($stkRslt) < 1) {
$err .= "<li>There are no stock items in the selected warehouse.";
continue;
}
$stks = "<select name='stkids[]' onChange='javascript:document.form.submit();'>";
$stks .= "<option value='-S' disabled selected>Select Item Number</option>";
$count = 0;
while ($stk = pg_fetch_array($stkRslt)) {
$stks .= "<option value='{$stk['stkid']}'>{$stk['stkcod']} (" . ($stk['units'] - $stk['alloc']) . ")</option>";
}
$stks .= "</select> ";
$moreprod = "<tr class='bg-odd'><td><input type=hidden name=whids[] value='{$whid}'>{$wh['whname']}</td><td>{$stks}</td><td> </td><td><input type=text size=4 name=qtys[] value='1'></td><td><input type=text size=4 name=unitcost[] value='0'></td><td><input type=text size=4 name=disc[] value='0'> OR <input type=text size=4 name=discp[] value='0' maxlength=5>%</td><td>" . CUR . " 0.00</td></tr>";
$done = "";
} else {
$done = "";
$moreprod = "<tr class='bg-odd'><td>{$whs}</td><td> </td><td> </td><td> </td><td> </td><td><input type=text size=4 name=disc[] value='0'> OR <input type=text size=4 name=discp[] value='0' maxlength=5>%</td><td>" . CUR . " 0.00</td></tr>";
}
} else {
$moreprod = "";
}
# if different warehouse is pressed
if (isset($diffwhBtn)) {
$moreprod = "<tr class='bg-odd'><td>{$whs}</td><td> </td><td> </td><td> </td><td> </td><td><input type=text size=4 name=disc[] value='0'> OR <input type=text size=4 name=discp[] value='0' maxlength=5>%</td><td>" . CUR . " 0.00</td></tr>";
$done = "";
}
# if the customer was just selected
if (!isset($selected)) {
$traddisc = $cust['traddisc'];
}
/* --- End My Event Listeners --- */
/* --- Start Products Display --- */
# check if stock warehouse was selected
if (isset($whids)) {
$products = "\r\n\t\t<table cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' border=0 width=100%>\r\n\t\t<tr><th>WAREHOUSE</th><th>ITEM NUMBER</th><th>DESCRIPTION</th><th>QTY</th><th>UNIT PRICE</th><th>UNIT DISCOUNT</th><th>AMOUNT</th><th>Remove</th><tr>";
foreach ($whids as $key => $whid) {
# skip if not selected
if ($whid == "-S") {
continue;
}
if (isset($stkids[$key]) && $stkids[$key] != "-S") {
# skip if not selected
if ($whid == "-S") {
continue;
}
# get selected warehouse name
db_conn("exten");
$sql = "SELECT whname FROM warehouses WHERE whid = '{$whid}'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
# get selected stock in this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE stkid = '{$stkids[$key]}' ORDER BY stkcod ASC";
$stkRslt = db_exec($sql);
$stk = pg_fetch_array($stkRslt);
/* -- Start Some Checks -- */
# check stock availability
if ($stk['units'] - $stk['alloc'] < 1) {
}
# check if they are selling too much
if ($stk['units'] - $stk['alloc'] < $qtys[$key]) {
$err .= "<li class=err>Warnign : Item number <b>{$stk['stkcod']}</b> does not have enough items available.</li>";
}
/* -- End Some Checks -- */
# check the unitcost
if ($unitcost[$key] < 1) {
$unitcost[$key] = $stk['selamt'];
}
# Calculate the Discount discount
if ($disc[$key] < 1) {
if ($discp[$key] > 0) {
$disc[$key] = round($discp[$key] / 100 * $unitcost[$key], 2);
}
} else {
$discp[$key] = round($disc[$key] * 100 / $unitcost[$key], 2);
}
# Calculate amount
$amt[$key] = $qtys[$key] * $unitcost[$key] - $disc[$key];
# if product must be removed skip it
if (isset($remprod)) {
if (in_array($key, $remprod)) {
# skip product (wonder if $keys still align)
$products .= "";
} else {
# 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='#' onclick='openwindow(\"stock-amt-det.php?stkid={$stk['stkid']}\")'>{$stk['stkcod']}</a> (" . ($stk['units'] - $stk['alloc']) . ")</td><td>{$stk['stkdes']}</td><td><input type=text size=4 name=qtys[] value='{$qtys[$key]}'></td><td><input type=text size=4 name=unitcost[] value='{$unitcost[$key]}'></td><td><input type=text size=4 name=disc[] value='{$disc[$key]}'> OR <input type=text size=4 name=discp[] value='{$discp[$key]}' maxlength=5>%</td><td><input type=hidden name=amt[] value='{$amt[$key]}'> " . CUR . " {$amt[$key]}</td><td><input type=checkbox name=remprod[] value='{$key}'></td></tr>";
}
} else {
# 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='#' onclick='openwindow(\"stock-amt-det.php?stkid={$stk['stkid']}\")'>{$stk['stkcod']}</a> (" . ($stk['units'] - $stk['alloc']) . ")</td><td>{$stk['stkdes']}</td><td><input type=text size=4 name=qtys[] value='{$qtys[$key]}'></td><td><input type=text size=5 name=unitcost[] value='{$unitcost[$key]}'></td><td><input type=text size=4 name=disc[] value='{$disc[$key]}'> OR <input type=text size=4 name=discp[] value='{$discp[$key]}' maxlength=5>%</td><td><input type=hidden name=amt[] value='{$amt[$key]}'> " . CUR . " {$amt[$key]}</td><td><input type=checkbox name=remprod[] value='{$key}'></td></tr>";
}
} else {
# get warehouse name
db_conn("exten");
$sql = "SELECT whname FROM warehouses WHERE whid = '{$whid}'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
# get stock on this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE whid = '{$whid}' ORDER BY stkcod ASC";
$stkRslt = db_exec($sql) or errDie("Unable to retrieve stocks from database.");
if (pg_numrows($stkRslt) < 1) {
$err .= "<li>There are no stock items in the selected warehouse.";
continue;
}
$stks = "<select name='stkids[]' onChange='javascript:document.form.submit();'>";
$stks .= "<option value='-S' disabled selected>Select Item Number</option>";
$count = 0;
while ($stk = pg_fetch_array($stkRslt)) {
$stks .= "<option value='{$stk['stkid']}'>{$stk['stkcod']} (" . ($stk['units'] - $stk['alloc']) . ")</option>";
$count++;
}
$stks .= "</select> ";
$done = "";
# put in drop down and warehouse
$products .= "<tr class='bg-odd'><td><input type=hidden name=whids[] value='{$whid}'>{$wh['whname']}</td><td>{$stks}</td><td> </td><td><input type=text size=4 name='qtys[]' value='1'></td><td><input type=text size=4 name=unitcost[] value='0'></td><td><input type=text size=4 name=disc[] value='0'> OR <input type=text size=4 name=discp[] value='0' maxlength=5>%</td><td><input type=hidden name=amt[] value='0.00'>" . CUR . " 0.00</td><td></td></tr>";
}
}
$products .= "{$moreprod}</table>";
} else {
# check if setting exists
db_connect();
$sql = "SELECT value FROM set WHERE label = 'DEF_WH'";
$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'];
# get selected warehouse name
db_conn("exten");
$sql = "SELECT whname FROM warehouses WHERE whid = '{$whid}'";
$whRslt = db_exec($sql);
$wh = pg_fetch_array($whRslt);
# get stock on this warehouse
db_connect();
$sql = "SELECT * FROM stock WHERE whid = '{$whid}' ORDER BY stkcod ASC";
$stkRslt = db_exec($sql) or errDie("Unable to retrieve stocks from database.");
if (pg_numrows($stkRslt) < 1) {
$err .= "<li>There are no stock items in the selected warehouse.";
continue;
}
$stks = "<select name='stkids[]' onChange='javascript:document.form.submit();'>";
$stks .= "<option value='-S' disabled selected>Select Item Number</option>";
$count = 0;
while ($stk = pg_fetch_array($stkRslt)) {
$stks .= "<option value='{$stk['stkid']}'>{$stk['stkcod']}</option>";
}
$stks .= "</select> ";
$products = "\r\n\t\t\t<table cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' border=0 width=100%>\r\n\t\t\t\t<tr><th>WAREHOUSE</th><th>ITEM NUMBER</th><th>DESCRIPTION</th><th>QTY</th><th>UNIT PRICE</th><th>UNIT DISCOUNT</th><th>AMOUNT</th><tr>\r\n\t\t\t\t<tr class='bg-odd'><td><input type=hidden name=whids[] value='{$whid}'>{$wh['whname']}</td><td>{$stks}</td><td> </td><td><input type=text size=4 name=qtys[] value='1'></td><td><input type=text size=4 name=unitcost[] value='0'></td><td><input type=text size=4 name=disc[] value='0'> OR <input type=text size=4 name=discp[] value='0' maxlength=5>%</td><td>" . CUR . " 0.00</td></tr>\r\n\t\t\t</table>";
} else {
$products = "\r\n\t\t\t<table cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' border=0 width=100%>\r\n\t\t\t\t<tr><th>WAREHOUSE</th><th>ITEM NUMBER</th><th>DESCRIPTION</th><th>QTY</th><th>UNIT PRICE</th><th>UNIT DISCOUNT</th><th>AMOUNT</th><tr>\r\n\t\t\t\t<tr class='bg-odd'><td>{$whs}</td><td> </td><td> </td><td> </td><td> </td><td><input type=text size=4 name=disc[] value='0'> OR <input type=text size=4 name=discp[] value='0' maxlength=5>%</td><td>" . CUR . " 0.00</td></tr>\r\n\t\t\t</table>";
}
$done = "";
}
/* --- End Products Display --- */
/* --- Start Some calculations --- */
# Calculate subtotal
if (isset($amt)) {
$SUBTOT = array_sum($amt);
} else {
$SUBTOT = 0.0;
}
# Calculate tradediscm
if ($traddisc > 0) {
$traddiscm = round($traddisc / 100 * $SUBTOT, 2);
} else {
$traddiscm = 0;
}
# minus discount
# $SUBTOT -= $disc; --> already minused
# duplicate
$SUBTOTAL = $SUBTOT;
# minus trade discount
$SUBTOTAL -= $traddiscm;
# add del charge
$SUBTOTAL += $delchrg;
# if vat must be charged
if ($chrgvat == "yes") {
$VATP = TAX_VAT;
$VAT = sprintf("%01.2f", $VATP / 100 * $SUBTOTAL);
} else {
$VATP = 0;
$VAT = "0.00";
}
# total
$TOTAL = $SUBTOTAL + $VAT;
/* --- End Some calculations --- */
# quote number
$quono = pglib_lastid("quotes", "quoid");
$quono++;
/* -- Final Layout -- */
$details = "<center>\r\n\t<form action='" . SELF . "' method=post name=form>\r\n\t<input type=hidden name=key value=details>\r\n\t<input type=hidden name=deptid value='{$deptid}'>\r\n\t<input type=hidden name=cusnum value='{$cust['cusnum']}'>\r\n\t<input type=hidden name=letters value='{$letters}'>\r\n\t<table cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' border=0 width=95%>\r\n\t<tr><td>{$err}</td></tr>\r\n\t<tr><td valign=top>\r\n\t\t<table cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' border=0>\r\n\t\t\t<tr><th colspan=2> Customer Details </th></tr>\r\n\t\t\t<tr class='bg-odd'><td>Department</td><td valign=center>{$deptname}</td></tr>\r\n\t\t\t<tr class='bg-even'><td>Customer</td><td valign=center>{$customers}</td></tr>\r\n\t\t\t<tr class='bg-odd'><td valign=top>Customer Address</td><td valign=center>" . nl2br($cust['addr1']) . "</td></tr>\r\n\t\t\t<tr class='bg-even'><td>Customer Vat Number</td><td>{$cust['vatnum']}</td></tr>\r\n\t\t\t<tr class='bg-odd'><td>Customer Order number</td><td valign=center><input type=text size=10 name=cordno value='{$cordno}'></td></tr>\r\n\t\t\t<tr><th colspan=2 valign=top>Comments</th></tr>\r\n\t\t\t<tr class='bg-even'><td colspan=2 align=center><textarea name=comm rows=4 cols=20>{$comm}</textarea></td></tr>\r\n\t\t</table>\r\n\t</td><td valign=top align=right>\r\n\t\t<table cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' border=0>\r\n\t\t\t<tr><th colspan=2> Quote Details </th></tr>\r\n\t\t\t<tr class='bg-even'><td>Quote No.</td><td valign=center>{$quono}</td></tr>\r\n\t\t\t<tr class='bg-odd'><td>Order No.</td><td valign=center><input type=text size=5 name=ordno value='{$ordno}'></td></tr>\r\n\t\t\t<tr class='bg-even'><td>Charge VAT</td><td valign=center>Yes <input type=radio size=7 name=chrgvat value='yes' {$chy}> No<input type=radio size=7 name=chrgvat value='no' {$chn}></td></tr>\r\n\t\t\t<tr class='bg-odd'><td>Terms</td><td valign=center>{$termssel} Days</td></tr>\r\n\t\t\t<tr class='bg-even'><td>Sales Person</td><td valign=center>{$salesps}</td></tr>\r\n\t\t\t<tr class='bg-odd'><td>Quote Date</td><td valign=center><input type=text size=2 name=oday maxlength=2 value='{$oday}'>-<input type=text size=2 name=omon maxlength=2 value='{$omon}'>-<input type=text size=4 name=oyear maxlength=4 value='{$oyear}'> DD-MM-YYYY</td></tr>\r\n\t\t\t<tr class='bg-even'><td>Trade Discount</td><td valign=center><input type=text size=7 name=traddisc value='{$traddisc}'>%</td></tr>\r\n\t\t\t<tr class='bg-odd'><td>Delivery Charge</td><td valign=center><input type=text size=7 name=delchrg value='{$delchrg}'></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<p>\r\n\t\t<table border=0 cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "'>\r\n\t\t\t<tr><th>Quick Links</th></tr>\r\n\t\t\t<tr class='bg-odd'><td><a href='quote-view.php'>View Quotes</a></td></tr>\r\n\t\t\t<tr class='bg-odd'><td><a href='customers-new.php'>New Customer</a></td></tr>\r\n\t\t\t<script>document.write(getQuicklinkSpecial());</script>\r\n\t\t\t<tr class='bg-odd'><td><a href='main.php'>Main Menu</a></td></tr>\r\n\t\t</table>\r\n\t</td><td align=right>\r\n\t\t<table cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' border=0 width=80%>\r\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>\r\n\t\t\t<tr class='bg-even'><td>Trade Discount</td><td align=right>" . CUR . " {$traddiscm}</td></tr>\r\n\t\t\t<tr class='bg-odd'><td>Delivery Charge</td><td align=right>" . CUR . " {$delchrg}</td></tr>\r\n\t\t\t<tr class='bg-even'><td>VAT @ {$VATP}%</td><td align=right>" . CUR . " <input type=hidden name=vat value='{$VAT}'>{$VAT}</td></tr>\r\n\t\t\t<tr class='bg-odd'><th>GRAND TOTAL</th><td align=right>" . CUR . " <input type=hidden name=total value='{$TOTAL}'>{$TOTAL}</td></tr>\r\n\t\t</table>\r\n\t</td></tr>\r\n\t<tr><td></td></tr>\r\n\t<tr><td align=right><input type=button value='« Back' onClick='javascript:history.back()'> | <input name=diffwhBtn type=submit value='Different Warehouse'> | <input name=addprodBtn type=submit value='Add Product'></td><td><input type=submit name='updateBtn' value='Update'>{$done}</td></tr>\r\n\t</table></form>\r\n\t</center>";
return $details;
}
