function slctacc($err = "")
{
    extract($_POST);
    db_conn(PRD_DB);
    if (!isset($refnum)) {
        $refnum = getrefnum();
    }
    // 	if (empty($jr_year)) {
    // 		explodeDate(false, $jr_year, $jr_month, $jr_day);
    // 	}
    if (empty($dtaccid)) {
        $dtaccid = false;
    }
    if (empty($ctaccid)) {
        $ctaccid = false;
    }
    /** REFNUM **/
    //Select Account <input align='right' type='button' onClick=\"popupSized('acc-new2.php?update_parent=yes','accounts','700','400');\" value='Add Account'>
    if (!isset($yr_day)) {
        $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);
            $jr_year = $date_arr[0];
            $jr_month = $date_arr[1];
            $jr_day = $date_arr[2];
        } else {
            $jr_year = date("Y");
            $jr_month = date("m");
            $jr_day = date("d");
        }
    }
    $view = "\n\t\t<center>\n\t\t<h3> Journal transaction </h3>\n\t\t{$err}\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t<input type='hidden' name='key' value='details' />\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t<tr>\n\t\t\t\t<th>Field</th>\n\t\t\t\t<th>Value</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Date</td>\n\t\t\t\t<td>" . mkDateSelect("jr", $jr_year, $jr_month, $jr_day) . "</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Reference Number</td>\n\t\t\t\t<td><input type='text' size='10' name='refnum' value='" . $refnum++ . "'></td>\n\t\t\t</tr>\n\t\t\t" . TBL_BR . "\n\t\t\t<tr>\n\t\t\t\t<td align='center'>\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><h4>Debit</h4></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<th>Select Account <input align='right' type='button' onClick=\"window.open('acc-new2.php?update_parent=yes','accounts','width=700, height=400');\" value='New Account'></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 valign='center'>" . mkAccSelect("dtaccid", $dtaccid) . "</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='center'>\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><h4>Credit</h4></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<th>Select Account <input align='right' type='button' onClick=\"window.open('acc-new2.php?update_parent=yes','accounts','width=700, height=400');\" value='New Account'></th>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr bgcolor='" . bgcolorc(0) . "'>\n\t\t\t\t\t\t\t<td valign='center'>" . mkAccSelect("ctaccid", $ctaccid) . "</td>\n\t\t\t\t\t\t\t<td><input name='details' type='submit' value='Enter Details >'></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</table>\n\t\t<br />\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t<tr>\n\t\t\t\t<td align='center'>\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><h4>Debit</h4></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<th>Account number</th>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr bgcolor='" . bgcolorc(0) . "'>\n\t\t\t\t\t\t\t<td valign='center'><input type='text' name='dtaccnum' size='20'></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='center'>\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><h4>Credit</h4></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<th>Account number</th>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr bgcolor='" . bgcolorc(0) . "'>\n\t\t\t\t\t\t\t<td valign='center'><input type='text' name='ctaccnum' size='20'></td>\n\t\t\t\t\t\t\t<td><input type='submit' value='Enter Details >'></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</table>\n\t\t<br />\n\t\t</form>" . mkQuickLinks(ql("../reporting/index-reports.php", "Financials"), ql("../core/acc-new2.php", "Add New Account"), ql("trans-new.php", "Journal Transactions"));
    return $view;
}
function get_current_setting()
{
    db_connect();
    $get_list = "SELECT * FROM non_purchases_account_list";
    $run_list = db_exec($get_list) or errDie("Unable to get account lisit information.");
    if (pg_numrows($run_list) > 0) {
        $account_list = "\n\t\t\t<tr>\n\t\t\t\t<th>Account</th>\n\t\t\t\t<th>Options</th>\n\t\t\t</tr>";
        while ($aarr = pg_fetch_array($run_list)) {
            $account_list .= "\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>{$aarr['accname']}</td>\n\t\t\t\t\t<td><input type='submit' name='remove[{$aarr['accid']}]' value='Remove'></td>\n\t\t\t\t</tr>";
        }
    }
    $cur_setting = getCsetting("USE_NON_PURCHASES_ACCOUNTS");
    $yes_setting = "";
    $no_setting = "";
    if (!isset($cur_setting) or strlen($cur_setting) < 1) {
        $no_setting = "checked='yes'";
    } else {
        if ($cur_setting == "yes") {
            $yes_setting = "checked";
        } else {
            $no_setting = "checked";
        }
    }
    $display = "\n\t\t<h2>Accounts to Display for Non Stock Purchases</h2>\n\t\t<form action='" . SELF . "' method='POST'>\n\t\t\t<input type='hidden' name='key' value='confirm'>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t<tr>\n\t\t\t\t<th>Use These Accounts Only</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>\n\t\t\t\t\t<input type='radio' name='setting' value='yes' {$yes_setting}> Yes\n\t\t\t\t\t<input type='radio' name='setting' value='no' {$no_setting}> No\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td align='right'><input type='submit' name='save' value='Save'></td>\n\t\t\t</tr>\n\t\t</table>\n\t\t<br>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t<tr>\n\t\t\t\t<th colspan='2'>Add Account</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td colspan='2'>" . mkAccSelect("newaccount", $newaccount) . " <input type='submit' name='add' value='Add Account'></td>\n\t\t\t</tr>\n\t\t\t<tr><td><br></td></tr>\n\t\t\t{$account_list}\n\t\t</table>\n\t\t</form>";
    return $display;
}
function slctacc($err = "")
{
    extract($_POST);
    db_conn(PRD_DB);
    $refnum = getrefnum();
    if (empty($jr_year)) {
        explodeDate(false, $jr_year, $jr_month, $jr_day);
    }
    if (empty($dtaccid)) {
        $dtaccid = false;
    }
    if (empty($ctaccid)) {
        $ctaccid = false;
    }
    /** REFNUM **/
    $view = "\n\t\t\t\t<center>\n\t\t\t\t<h3> Journal transaction </h3>\n\t\t\t\t{$err}\n\t\t\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t\t\t<input type='hidden' name='key' value='details' />\n\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<th>Field</th>\n\t\t\t\t\t\t<th>Value</th>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>Date</td>\n\t\t\t\t\t\t<td>" . mkDateSelect("jr", $jr_year, $jr_month, $jr_day) . "</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>Reference Number</td>\n\t\t\t\t\t\t<td><input type='text' size='10' name='refnum' value='" . $refnum++ . "'></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t" . TBL_BR . "\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<td align='center'>\n\t\t\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t\t<td><h4>Debit</h4></td>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t\t<th>Select Account</th>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t<td valign='center'>" . mkAccSelect("dtaccid", $dtaccid) . "</td>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t</table>\n\t\t\t\t\t\t</td>\n\t\t\t\t\t\t<td align='center'>\n\t\t\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t\t<td><h4>Credit</h4></td>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t\t<th>Select Account</th>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t<tr bgcolor='" . bgcolorc(0) . "'>\n\t\t\t\t\t\t\t\t\t<td valign='center'>" . mkAccSelect("ctaccid", $ctaccid) . "</td>\n\t\t\t\t\t\t\t\t\t<td><input name='details' type='submit' value='Enter Details >'></td>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t</table>\n\t\t\t\t\t\t</td>\n\t\t\t\t\t</tr>\n\t\t\t\t</table>\n\t\t\t\t<br />\n\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<td align='center'>\n\t\t\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t\t<td><h4>Debit</h4></td>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t\t<th>Account number</th>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t<tr bgcolor='" . bgcolorc(0) . "'>\n\t\t\t\t\t\t\t\t\t<td valign='center'><input type='text' name='dtaccnum' size='20'></td>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t</table>\n\t\t\t\t\t\t</td>\n\t\t\t\t\t\t<td align='center'>\n\t\t\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t\t<td><h4>Credit</h4></td>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t\t<th>Account number</th>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t<tr bgcolor='" . bgcolorc(0) . "'>\n\t\t\t\t\t\t\t\t\t<td valign='center'><input type='text' name='ctaccnum' size='20'></td>\n\t\t\t\t\t\t\t\t\t<td><input type='submit' value='Enter Details >'></td>\n\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t</table>\n\t\t\t\t\t\t</td>\n\t\t\t\t\t</tr>\n\t\t\t\t</table>\n\t\t\t\t<br />\n\t\t\t\t</form>" . mkQuickLinks(ql("../reporting/index-reports.php", "Financials"), ql("../core/acc-new2.php", "Add New Account"), ql("../core/trans-new.php", "Journal Transactions"));
    return $view;
}
function slctAcc()
{
    core_connect();
    $accnts = mkAccSelect("accid", 1, ACCTYPE_B);
    // 	$sql = "SELECT * FROM accounts WHERE acctype ='B' AND div = '".USER_DIV."'";
    // 	$accRslt = db_exec($sql);
    // 	if(pg_numrows($accRslt) < 1){
    // 		return "<li> ERROR : There are no accounts in the category selected.";
    // 	}
    // 	$accnts = "<select name='accid'>";
    // 	while($acc = pg_fetch_array($accRslt)){
    // 		# Check Disable
    // 		if(isDisabled($acc['accid']))
    // 			continue;
    // 		$accnts .= "<option value='$acc[accid]'>$acc[accname]</option>";
    // 	}
    // 	$accnts .= "</select>";
    // Layout
    $slctAcc = "\n\t\t<h3>Set Petty Cash Account</h3>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t<input type='hidden' name='key' value='confirm'>\n\t\t\t<tr>\n\t\t\t\t<th colspan='2'>Select Account <input align='right' type='button' onClick=\"window.open('../core/acc-new2.php?update_parent=yes','accounts','width=700, height=400');\" value='New Account'></th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td colspan='2'>{$accnts}</td>\n\t\t\t</tr>\n\t\t\t<tr><td><br></td></tr>\n\t\t\t<tr>\n\t\t\t\t<td align='right'><input type='button' value='&laquo Back' onClick='javascript:history.back()'></td>\n\t\t\t\t<td align='right'><input type='submit' value='Set Account &raquo'></td>\n\t\t\t</tr>\n\t\t</table>\n\t\t</form>\n\t\t<p>\n\t\t<table " . TMPL_tblDflts . " width='100'>\n\t\t\t<tr>\n\t\t\t\t<th>Quick Links</th>\n\t\t\t</tr>\n\t\t\t<script>document.write(getQuicklinkSpecial());</script>\n\t\t</table>";
    return $slctAcc;
}
function add($_POST)
{
    # Get vars
    extract($_POST);
    if (!isset($lnum)) {
        $lnum = 1;
    }
    # validate input
    require_lib("validate");
    $v = new validate();
    $v->isOk($lnum, "num", 1, 30, "Invalid Number of ledger accounts.");
    # display errors, if any
    if ($v->isError()) {
        $confirm = "";
        $errors = $v->getErrors();
        foreach ($errors as $e) {
            $confirm .= "<li class='err'>" . $e["msg"] . "</li>";
        }
        $confirm .= "<p><input type='button' onClick='JavaScript:history.back();' value='&laquo; Correct submission'>";
        return $confirm;
    }
    $jump_bot = "";
    if (isset($another)) {
        $jump_bot = "\n\t\t\t<script>\n\t\t\t\twindow.location.hash='bottom';\n\t\t\t</script>";
        $lnum++;
    }
    db_connect();
    # bank accounts to choose from
    $sql = "SELECT * FROM bankacct WHERE btype != 'int' AND div = '" . USER_DIV . "' ORDER BY accname ASC";
    $bankRs = db_exec($sql);
    if (pg_numrows($bankRs) < 1) {
        return "<li class='err'> There are no accounts held at the selected Bank.\n\t\t<p><input type='button' onClick='JavaScript:history.back();' value='&laquo; Correct Selection'>";
    }
    $banks = "<select name='bankid'>";
    while ($bank = pg_fetch_array($bankRs)) {
        if (isset($bankid) and $bankid == $bank['bankid']) {
            $banks .= "<option value='{$bank['bankid']}' selected>{$bank['accname']} - {$bank['bankname']} ({$bank['acctype']})</option>";
        } else {
            $banks .= "<option value='{$bank['bankid']}'>{$bank['accname']} - {$bank['bankname']} ({$bank['acctype']})</option>";
        }
    }
    $banks .= "</select>";
    # compose accounts list
    $accounts = "";
    for ($i = 0; $i < $lnum; $i++) {
        if (!isset($accinv[$i])) {
            $accinv[$i] = 0;
            $accamt[$i] = 0;
            $vatcode[$i] = 0;
            $chrgvat[$i] = 'nov';
        }
        switch ($chrgvat[$i]) {
            case "nov":
                $chexc = "";
                $chinc = "";
                $chnov = "checked=yes";
                break;
            case "inc":
                $chexc = "";
                $chinc = "checked=yes";
                $chnov = "";
                break;
            case "exc":
                $chexc = "checked=yes";
                $chinc = "";
                $chnov = "";
                break;
            default:
                $chexc = "";
                $chinc = "";
                $chnov = "checked=yes";
                break;
        }
        $glacc = mkAccSelect("accinv[]", $accinv[$i]);
        # Accounts Drop down selections
        // 		core_connect();
        //
        // 		$sql = "SELECT * FROM accounts WHERE div = '".USER_DIV."' ORDER BY accname";
        // 		$accRslt = db_exec($sql);
        // 		if(pg_numrows($accRslt) < 1){
        // 			$glacc = "<li>There are no Income accounts yet in Cubit.</li>";
        // 		}
        // 		$glacc = "<select name='accinv[]' style='width: 167'>";
        // 		while($acc = pg_fetch_array($accRslt)){
        // 			# Check Disable
        // 			if(isDisabled($acc['accid']))
        // 				continue;
        // 			$sel = ($acc['accid'] == $accinv[$i]) ? "selected" : "";
        // 			$glacc .= "<option value='$acc[accid]' $sel>$acc[accname]</option>";
        // 		}
        // 		$glacc .="</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='vatcode[{$i}]'>";
        while ($vd = pg_fetch_array($Ri)) {
            if ($vatcode[$i] == $vd['id']) {
                $sel = "selected";
            } else {
                if ($vd['del'] == "Yes" and strlen($vatcode[$i]) < 1) {
                    $sel = "selected";
                } else {
                    $sel = "";
                }
            }
            $Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
        }
        $Vatcodes .= "</select>";
        $accounts .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>{$glacc}</td>\n\t\t\t\t<td align='center'>" . CUR . " <input type='text' size='8' name='accamt[]' value='{$accamt[$i]}'></td>\n\t\t\t\t<td>{$Vatcodes}</td>\n\t\t\t\t<td>\n\t\t\t\t\t<input type='radio' name='chrgvat[{$i}]' value='inc' {$chinc}>Inclusive &nbsp;&nbsp; \n\t\t\t\t\t<input type='radio' name='chrgvat[{$i}]' value='exc' {$chexc}>Exclusive &nbsp;&nbsp; \n\t\t\t\t\t<input type='radio' name='chrgvat[{$i}]' value='nov' {$chnov}>No VAT\n\t\t\t\t</td>\n\t\t\t</tr>";
    }
    $accounts .= "\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td align='right'><b>Total:</b></td>\n\t\t\t<td align='right'>" . CUR . " " . sprint(array_sum($accamt)) . "</td>\n\t\t\t<td colspan='2'></td>\n\t\t</tr>";
    # error control
    if (!isset($errata)) {
        $errata = "";
    }
    if (!isset($name)) {
        $name = "";
        $descript = "";
        $cheqnum = "";
        $reference = "";
    }
    if (!isset($date_day)) {
        $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);
            $date_year = $date_arr[0];
            $date_month = $date_arr[1];
            $date_day = $date_arr[2];
        } else {
            if (isset($_SESSION["global_day"]) and strlen($_SESSION["global_day"]) > 0) {
                $date_day = $_SESSION["global_day"];
            } else {
                $date_day = date("d");
            }
            if (isset($_SESSION["global_month"]) and strlen($_SESSION["global_month"]) > 0) {
                $date_month = $_SESSION["global_month"];
            } else {
                $date_month = date("m");
            }
            if (isset($_SESSION["global_year"]) and strlen($_SESSION["global_year"]) > 0) {
                $date_year = $_SESSION["global_year"];
            } else {
                $date_year = date("Y");
            }
        }
    }
    // Layout
    $add = "\n\t\t<h3>New Bank Receipt</h3>\n\t\t{$errata}\n\t\t<table " . TMPL_tblDflts . ">\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t<input type='hidden' name='key' value='confirm'>\n\t\t\t<input type='hidden' name='lnum' value='{$lnum}'>\n\t\t\t<tr>\n\t\t\t\t<th>Field</th>\n\t\t\t\t<th>Value</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Bank Account</td>\n\t\t\t\t<td>{$banks}</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Date</td>\n\t\t\t\t<td>" . mkDateSelect("date", $date_year, $date_month, $date_day) . "</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Received from</td>\n\t\t\t\t<td valign='center'><input size='20' name='name' value='{$name}'></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Description</td>\n\t\t\t\t<td valign='center'><textarea col='20' rows='5' name='descript'>{$descript}</textarea></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Reference</td>\n\t\t\t\t<td valign='center'><input size='25' name='reference' value='{$reference}'></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Cheque Number</td>\n\t\t\t\t<td valign='center'><input size='20' name='cheqnum' value='{$cheqnum}'></td>\n\t\t\t</tr>\n\t\t\t<tr><td><br></td></tr>\n\t\t</table>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t<tr>\n\t\t\t\t<th>Account <input align='right' type='button' onClick=\"window.open('../core/acc-new2.php?update_parent=yes','accounts','width=700, height=400');\" value='New Account'></th>\n\t\t\t\t<th>Amount</th>\n\t\t\t\t<th>Vat Code</th>\n\t\t\t\t<th>VAT</th>\n\t\t\t</tr>\n\t\t\t{$accounts}\n\t\t\t<tr><td><br></td></tr>\n\t\t\t<tr>\n\t\t\t\t<td><input type='submit' name='another' value='Add Another'></td>\n\t\t\t\t<td valign='center' align='right'><input type='submit' value='Confirm &raquo;'></td>\n\t\t\t</tr>\n\t\t</table>\n\t\t<p>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t<tr>\n\t\t\t\t<th>Quick Links</th>\n\t\t\t</tr>\n\t\t\t<script>document.write(getQuicklinkSpecial());</script>\n\t\t</table>\n\t\t<a name='bottom'>\n\t\t{$jump_bot}";
    return $add;
}
function confirm($_POST)
{
    # get vars
    extract($_POST);
    if (!isset($qty)) {
        $qty = "1";
    }
    # validate input
    require_lib("validate");
    $v = new validate();
    $v->isOk($grpid, "num", 1, 50, "Invalid Asset Group id.");
    $v->isOk($type_id, "num", 1, 50, "Invalid Type id.");
    $v->isOk($qty, "num", 0, 10, "Invalid quantity.");
    $v->isOk($serial, "string", 0, 20, "Invalid Serial[1] Number.");
    $v->isOk($serial2, "string", 0, 30, "Invalid Serial[2] Number.");
    $v->isOk($locat, "string", 1, 100, "Invalid location.");
    $v->isOk($des, "string", 1, 255, "Invalid description.");
    $v->isOk($details, "string", 0, 255, "Invalid Details.");
    $v->isOk($units, "num", 1, 10, "Invalid units");
    $v->isOk($amount, "float", 1, 255, "Invalid amount.");
    $v->isOk($date_day, "num", 1, 2, "Invalid Date day.");
    $v->isOk($date_month, "num", 1, 2, "Invalid Date month.");
    $v->isOk($date_year, "num", 4, 4, "Invalid Date Year.");
    $v->isOk($method, "string", 1, 255, "Invalid method.");
    $v->isOk($dep_perc, "float", 1, 16, "Invalid Yearly Depreciation Percentage.");
    $v->isOk($svdate_day, "num", 1, 2, "Invalid Next Service Date (day)");
    $v->isOk($svdate_month, "num", 1, 2, "Invalid Next Service Date (month)");
    $v->isOk($svdate_year, "num", 4, 4, "Invalid Next Service Date (year)");
    /*
    	$v->isOk($cost_acc, "num", 1, 9, "Invalid cost account selection.");
    	$v->isOk($accdep_acc, "num", 1, 9, "Invalid accumulated depreciation account selection.");
    	$v->isOk($dep_acc, "num", 1, 9, "Invalid depreciation account selection.");
    */
    if ($seryn == "yes" && empty($serial)) {
        $v->addError("", "Serial field requires a value.");
    } else {
        if ($seryn == "no" && empty($qty)) {
            $v->addError("", "Quantity field requires a value.");
        }
    }
    if ($seryn == "yes") {
        // Check for duplicate serials
        if (!empty($serial)) {
            $sql = "SELECT serial FROM cubit.assets WHERE serial='{$serial}'";
            $dupser1_rslt = db_exec($sql) or errDie("Unable to retrieve asset serial.");
            if (pg_num_rows($dupser1_rslt)) {
                $v->addError(0, "First serial already exists in the system.");
            }
        }
        if (!empty($serial2)) {
            $sql = "SELECT serial2 FROM cubit.assets WHERE serial2='{$serial2}'";
            $dupser2_rslt = db_exec($sql) or errDie("Unable to retrieve asset serial.");
            if (pg_num_rows($dupser2_rslt)) {
                $v->addError(0, "Second serial already exists in the system.");
            }
        }
    }
    /*
    	// Retrieve cost account
    	$sql = "
    	SELECT accid, topacc, accnum, accname FROM core.accounts
    	WHERE accid='$cost_acc'";
    	$cost_acc_rslt = db_exec($sql) or errDie("Unable to retrieve account.");
    	$cost_acc_data = pg_fetch_array($cost_acc_rslt);
    
    	// Retrieve Accumulated Depreciation
    	$sql = "
    	SELECT accid, topacc, accnum, accname FROM core.accounts
    	WHERE accid='$accdep_acc'";
    	$accdep_acc_rslt = db_exec($sql) or errDie("Unable to retrieve account.");
    	$accdep_acc_data = pg_fetch_array($accdep_acc_rslt);
    
    	// Retrieve Depreciation
    	$sql = "
    	SELECT accid, topacc, accnum, accname FROM core.accounts
    	WHERE accid='$dep_acc'";
    	$dep_acc_rslt = db_exec($sql) or errDie("Unable to retrieve account.");
    	$dep_acc_data = pg_fetch_array($dep_acc_rslt);
    */
    # mix dates
    $date = "{$date_day}-{$date_month}-{$date_year}";
    // Service Date
    $svdate = "{$svdate_day}-{$svdate_month}-{$svdate_year}";
    if (!checkdate($date_month, $date_day, $date_year)) {
        $v->isOk($date, "num", 1, 1, "Invalid date.");
    }
    if (!checkdate($svdate_month, $svdate_day, $svdate_year)) {
        $v->isOk($svdate, "num", 1, 1, "Invalid Next Service Date.");
    }
    # display errors, if any
    if ($v->isError()) {
        $confirm = "";
        $errors = $v->getErrors();
        foreach ($errors as $e) {
            $confirm .= "<li class='err'>{$e['msg']}</li>";
        }
        return enter($confirm);
        exit;
    }
    # Get group
    db_connect();
    $sql = "SELECT * FROM assetgrp WHERE grpid = '{$grpid}' AND div = '" . USER_DIV . "'";
    $grpRslt = db_exec($sql);
    $grp = pg_fetch_array($grpRslt);
    if (!isset($accnt)) {
        $accnt = "";
    }
    if ($method == 'purch') {
        $vmethod = "Purchase Asset";
        $accnt = "";
    } else {
        $vmethod = "Add Asset";
        $accnt = "\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td>Contra Account <input align='right' type='button' onClick=\"window.open('core/acc-new2.php?update_parent=yes','accounts','width=700, height=400');\" value='New Account'></td>\r\n\t\t\t\t<td>" . mkAccSelect("accnt", $accnt) . "</td>\r\n\t\t\t</tr>";
    }
    if ($seryn == "yes") {
        $serdisp = "\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td>Serial Number</td>\r\n\t\t\t\t<td><input type='hidden' name='serial' value='{$serial}'>{$serial}</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td>2nd Serial Number</td>\r\n\t\t\t\t<td>\r\n\t\t\t\t\t<input type='hidden' name='serial2' value='{$serial2}'>\r\n\t\t\t\t\t{$serial2}\r\n\t\t\t\t</td>\r\n\t\t\t</tr>";
    } else {
        $serdisp = "\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td>Quantity</td>\r\n\t\t\t\t<td><input type='hidden' name='qty' value='{$qty}'>{$qty}</td>\r\n\t\t\t</tr>";
    }
    $sql = "SELECT name FROM cubit.asset_types WHERE id='{$type_id}'";
    $at_rslt = db_exec($sql) or errDie("Unable to retrieve asset type.");
    $type_name = pg_fetch_result($at_rslt, 0);
    $confirm = "\r\n\t\t<h3>Confirm Asset</h3>\r\n\t\t<form action='" . SELF . "' method='POST' enctype='multipart/form-data' name='form'>\r\n\t\t\t<input type='hidden' name='key' value='write'>\r\n\t\t\t<input type='hidden' name='type_id' value='{$type_id}' />" . "\r\n\t<table cellpadding='0' cellspacing='0'>\r\n\t\t<tr valign='top'>\r\n\t\t\t<td>\r\n\t\t\t\t<table " . TMPL_tblDflts . ">\r\n\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t<th colspan='2'>Asset Details</th>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td>Group</td>\r\n\t\t\t\t\t\t<td><input type='hidden' name='grpid' value='{$grpid}'>{$grp['grpname']}</td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td>Type</td>\r\n\t\t\t\t\t\t<td>{$type_name}</td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td>Location</td>\r\n\t\t\t\t\t\t<td><input type='hidden' name='locat' value='{$locat}'>{$locat}</td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td>Description</td>\r\n\t\t\t\t\t\t<td><input type='hidden' name='des' value='{$des}'>{$des}</td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td>Details</td>\r\n\t\t\t\t\t\t<td><input type='hidden' name='details' value='{$details}'>" . nl2br($details) . "</td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td>Billing Requirement Ratio</td>\r\n\t\t\t\t\t\t<td><input type='hidden' name='units' value='{$units}' />{$units}</td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td>Percentage of Yearly Depreciation</td>\r\n\t\t\t\t\t\t<td>\r\n\t\t\t\t\t\t\t<input type='hidden' name='dep_perc' value='{$dep_perc}' />\r\n\t\t\t\t\t\t\t{$dep_perc}%\r\n\t\t\t\t\t\t</td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td>Auto Monthly Depreciation</td>\r\n\t\t\t\t\t\t<td>\r\n\t\t\t\t\t\t\t<input type='hidden' name='dep_month' value='{$dep_month}' />\r\n\t\t\t\t\t\t\t" . ucfirst($dep_month) . "\r\n\t\t\t\t\t\t</td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td>Method</td>\r\n\t\t\t\t\t\t<td><input type='hidden' name='method' value='{$method}'>{$vmethod}</td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t{$accnt}\r\n\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t<th colspan='2'>Bought</th>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td>Date</td>\r\n\t\t\t\t\t\t<td>\r\n\t\t\t\t\t\t\t<input type='hidden' name='date_year' value='{$date_year}' />\r\n\t\t\t\t\t\t\t<input type='hidden' name='date_month' value='{$date_month}' />\r\n\t\t\t\t\t\t\t<input type='hidden' name='date_day' value='{$date_day}' />\r\n\t\t\t\t\t\t\t{$date}\r\n\t\t\t\t\t\t</td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td>Amount</td>\r\n\t\t\t\t\t\t<td>\r\n\t\t\t\t\t\t\t<input type='hidden' name='amount' value='{$amount}'>" . CUR . " {$amount}\r\n\t\t\t\t\t\t</td>\r\n\t\t\t\t\t</tr>" . "\r\n\t\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t\t<th colspan='2'>Servicing</th>\r\n\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t<td>Next Service Date</td>\r\n\t\t\t\t\t\t\t<td>\r\n\t\t\t\t\t\t\t\t<input type='hidden' name='svdate_year' value='{$svdate_year}' />\r\n\t\t\t\t\t\t\t\t<input type='hidden' name='svdate_month' value='{$svdate_month}' />\r\n\t\t\t\t\t\t\t\t<input type='hidden' name='svdate_day' value='{$svdate_day}' />\r\n\t\t\t\t\t\t\t\t{$svdate}\r\n\t\t\t\t\t\t\t</td>\r\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t<td>Service Description</td>\r\n\t\t\t\t\t\t\t<td>\r\n\t\t\t\t\t\t\t\t<input type='hidden' name='sv_desc' value='{$sv_desc}' />\r\n\t\t\t\t\t\t\t\t{$sv_desc}\r\n\t\t\t\t\t\t\t</td>\r\n\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t\t<th colspan='2'>Serial/Quantity</th>\r\n\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t<input type='hidden' name='seryn' value='{$seryn}'>\r\n\t\t\t\t\t\t{$serdisp}\r\n\t\t\t\t\t\t<tr><td><br></td></tr>\r\n\t\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t\t<th colspan='2'>Add Picture</th>\r\n\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t<td>Image Name</td>\r\n\t\t\t\t\t\t\t<td><input type='text' size='40' name='picupload_name'></td>\r\n\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t<td>Image Location</td>\r\n\t\t\t\t\t\t\t<td><input type='file' name='picupload_image'></td>\r\n\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t\t<td><input type='submit' name='back' value='&laquo; Correction'></td>\r\n\t\t\t\t\t\t\t<td valign='bottom' align='right'><input type='submit' value='Write &raquo;'></td>\r\n\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t</table>\r\n\t\t\t\t</td>\r\n\t\t\t</tr>\r\n\t\t</form>\r\n\t\t</table>\r\n\t\t<p>\r\n\t\t<table border='0' cellpadding='2' cellspacing='1'>\r\n\t\t\t<tr>\r\n\t\t\t\t<th>Quick Links</th>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td><a href='asset-view.php'>View Assets</a></td>\r\n\t\t\t</tr>\r\n\t\t\t<script>document.write(getQuicklinkSpecial());</script>\r\n\t\t</table>";
    return $confirm;
}
function edit($cashid)
{
    # validate input
    require_lib("validate");
    $v = new validate();
    $v->isOk($cashid, "num", 1, 4, "Invalid Petty Cash Requisition ID.");
    # display errors, if any
    if ($v->isError()) {
        $confirm = "";
        $errors = $v->getErrors();
        foreach ($errors as $e) {
            $confirm .= "<li class='err'>{$e['msg']}</li>";
        }
        $confirm .= "<p><input type='button' onClick='JavaScript:history.back();' value='&laquo; Correct submission'>";
        return $confirm;
    }
    # Connect to database
    db_Connect();
    $sql = "SELECT * FROM pettycashbook WHERE cashid = '{$cashid}' AND div = '" . USER_DIV . "'";
    $cashRslt = db_exec($sql) or errDie("ERROR: Unable to retrieve cashbook entry details from database.", SELF);
    if (pg_numrows($cashRslt) < 1) {
        $OUTPUT = "<li class='err'>Requisistion not found in Cubit.</li>";
        return $OUTPUT;
    }
    $cash = pg_fetch_array($cashRslt);
    $accnts = mkAccSelect("accid", $cash['accid']);
    // 	core_connect();
    // 	$sql = "SELECT * FROM accounts WHERE div = '".USER_DIV."' ORDER BY accname ASC";
    // 	$accRslt = db_exec($sql);
    // 	if(pg_numrows($accRslt) < 1){
    // 		return "<li> ERROR : There are no accounts in the category selected.</li>";
    // 	}
    // 	$accnts = "<select name='accid'>";
    // 	while($acc = pg_fetch_array($accRslt)){
    // 		# Check Disable
    // 		if(isDisabled($acc['accid']))
    // 			continue;
    //
    // 		$sel = "";
    // 		if($acc['accid'] == $cash['accid'])
    // 			$sel = "selected";
    //
    // 		$accnts .= "<option value='$acc[accid]' $sel>$acc[accname]</option>";
    // 	}
    // 	$accnts .= "</select>";
    # check available funds
    $cashacc = gethook("accnum", "bankacc", "name", "Petty Cash");
    core_connect();
    $sql = "SELECT (debit - credit) as bal FROM trial_bal WHERE accid = '{$cashacc}' AND month='" . (int) date("m") . "' AND div = '" . USER_DIV . "'";
    $accbRslt = db_exec($sql);
    if (pg_numrows($accbRslt) < 1) {
        return "<li class='err'> Petty Cash Account not found.</li>";
    }
    $accb = pg_fetch_array($accbRslt);
    $accb['bal'] = sprint($accb['bal']);
    # mourn if the is no money
    if ($accb['bal'] < 1) {
        return "<li> There are no Petty Cash funds available.</li>";
    }
    list($date_year, $date_month, $date_day) = explode("-", $cash['date']);
    # Keep the charge vat option stable
    if ($cash['chrgvat'] == "inc") {
        $chin = "checked=yes";
        $chex = "";
        $chno = "";
    } elseif ($cash['chrgvat'] == "exc") {
        $chin = "";
        $chex = "checked=yes";
        $chno = "";
    } else {
        $chin = "";
        $chex = "";
        $chno = "checked=yes";
    }
    db_conn('cubit');
    $Sl = "SELECT * FROM vatcodes ORDER BY code";
    $Ri = db_exec($Sl) or errDie("Unable to get vat codes");
    $Vatcodes = "<select name='vatcode'>\r\n\t<option value='0'>Select</option>";
    while ($vd = pg_fetch_array($Ri)) {
        if ($vd['del'] == "Yes" || $cash["vatcode"] == $vd["id"]) {
            $sel = "selected";
        } else {
            $sel = "";
        }
        $Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
    }
    $Vatcodes .= "</select>";
    // Layout
    $add = "\r\n\t\t\t\t<h3>Edit Petty Cash Requisistion</h3>\r\n\t\t\t\t<table " . TMPL_tblDflts . " width='300'>\r\n\t\t\t\t<form action='" . SELF . "' method='POST' name='form'>\r\n\t\t\t\t\t<input type='hidden' name='key' value='confirm'>\r\n\t\t\t\t\t<input type='hidden' name='cashid' value='{$cashid}'>\r\n\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t<th>Field</th>\r\n\t\t\t\t\t\t<th>Value</th>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td>Date</td>\r\n\t\t\t\t\t\t<td>" . mkDateSelect("date", $date_year, $date_month, $date_day) . "</td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td>Paid to</td>\r\n\t\t\t\t\t\t<td valign='center'><input size='20' name='name' value='{$cash['name']}'></td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td>Details</td>\r\n\t\t\t\t\t\t<td valign='center'><textarea cols='18' rows='2' name='det'>{$cash['det']}</textarea></td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td>Available Funds</td>\r\n\t\t\t\t\t\t<td><input type='hidden' name='bal' value='{$accb['bal']}'>" . CUR . " {$accb['bal']}</td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td>Amount</td>\r\n\t\t\t\t\t\t<td valign='center'>" . CUR . " <input type='text' size='10' name='amount' value='{$cash['amount']}'></td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td>VAT Inclusive</td>\r\n\t\t\t\t\t\t<td valign='center'>\r\n\t\t\t\t\t\t\tYes <input type='radio' size='7' name='chrgvat' value='inc' {$chin}>\r\n\t\t\t\t\t\t\tNo<input type='radio' size='7' name='chrgvat' value='exc' {$chex}>\r\n\t\t\t\t\t\t\tNo VAT<input type='radio' size='7' name='chrgvat' value='nov' {$chno}>\r\n\t\t\t\t\t\t</td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td>VAT Code</td>\r\n\t\t\t\t\t\t<td>{$Vatcodes}</td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td>Account Paid to</td>\r\n\t\t\t\t\t\t<td>{$accnts}</td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t<td><br></td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t<td valign='center' align='right' colspan='2'><input type='submit' value='Confirm &raquo'></td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t</table>\r\n\t\t\t\t<p>\r\n\t\t\t\t<table " . TMPL_tblDflts . " width='15%'>\r\n\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t<th>Quick Links</th>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td><a href='pettycashbook-view.php'>View Petty Cash Requisitions</a></td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td><a href='../main.php'>Main Menu</a></td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t</table>";
    return $add;
}
function slctacc($_POST, $err = "")
{
    # Get vars
    extract($_POST);
    if (!isset($tnum)) {
        $tnum = 1;
    }
    # validate input
    require_lib("validate");
    $v = new validate();
    $v->isOk($tnum, "num", 1, 3, "Invalid Number of transactions.");
    if ($tnum < 1) {
        $v->isOk("#error#", "num", 1, 1, " - Number of transactions must be at least one.");
    }
    # display errors, if any
    if ($v->isError()) {
        $confirm = "";
        $errors = $v->getErrors();
        foreach ($errors as $e) {
            $confirm .= "<li class='err'>" . $e["msg"] . "</li>";
        }
        $confirm .= "<p><input type='button' onClick='JavaScript:history.back();' value='&laquo; Correct submission'>";
        return $confirm;
    }
    $jump_bot = "";
    if (isset($another)) {
        $jump_bot = "\n\t\t\t<script>\n\t\t\t\twindow.location.hash='bottom';\n\t\t\t</script>";
        $tnum++;
    }
    if (!isset($refnum)) {
        $refnum = getrefnum();
    }
    /*refnum*/
    // Accounts (debit)
    $view = "\n\t\t<center>\n\t\t<h3> Journal transactions </h3>\n\t\t{$err}\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t<input type='hidden' name='key' value='confirm'>\n\t\t\t<input type='hidden' name='vby' value='{$vby}'>\n\t\t\t<input type='hidden' name='tnum' value='{$tnum}'>\n\t\t<table " . TMPL_tblDflts . " align='center'>\n\t\t\t<tr>\n\t\t\t\t<th>Date</th>\n\t\t\t\t<th>Ref num</th>\n\t\t\t\t<th>Debit <input align='right' type='button' onClick=\"window.open('acc-new2.php?update_parent=yes&set_key=slct','accounts','width=700, height=400');\" value='New Account'></th>\n\t\t\t\t<th>Credit <input align='right' type='button' onClick=\"window.open('acc-new2.php?update_parent=yes&set_key=slct','accounts','width=700, height=400');\" value='New Account'></th>\n\t\t\t\t<th>Amount</th>\n\t\t\t\t<th>Description</th>\n\t\t\t</tr>";
    for ($i = 0; $i < $tnum; $i++) {
        if (!isset($date_day[$i])) {
            $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);
                $date_year[$i] = $date_arr[0];
                $date_month[$i] = $date_arr[1];
                $date_day[$i] = $date_arr[2];
            } else {
                $date_year[$i] = date("Y");
                $date_month[$i] = date("m");
                $date_day[$i] = date("d");
            }
        }
        $view .= "\n\t\t\t<tr bgcolor=" . bgcolorg() . ">\n\t\t\t\t<td>" . mkDateSelecta("date", $i, $date_year[$i], $date_month[$i], $date_day[$i]) . "</td>\n\t\t\t\t<td><input type='text' size='5' name='refnum[{$i}]' value='{$refnum[$i]}'></td>\n\t\t\t\t<td valign='center'>";
        core_connect();
        $sql = "SELECT * FROM accounts WHERE div = '" . USER_DIV . "' ORDER BY {$vby} ASC";
        $accRslt = db_exec($sql);
        if (pg_numrows($accRslt) < 1) {
            return "<li>There are No accounts in Cubit.</li>";
        }
        $dtaccid[$i] += 0;
        $view .= mkAccSelect("dtaccid[{$i}]", $dtaccid[$i]);
        $view .= "\n\t\t\t</td>\n\t\t\t<td valign='center'>";
        $ctaccid[$i] += 0;
        $view .= mkAccSelect("ctaccid[]", $ctaccid[$i]);
        if (isset($amount[$i])) {
            $a_val = $amount[$i];
        } else {
            $a_val = "";
        }
        if (isset($descript[$i])) {
            $d_val = $descript[$i];
        } else {
            $d_val = "";
        }
        $view .= "\n\t\t\t\t</td>\n\t\t\t\t<td><input type='text' size='7' name='amount[]' value='{$a_val}'></td>\n\t\t\t\t<td><input type='text' size='20' name='descript[]' value='{$d_val}'></td>\n\t\t\t</tr>";
    }
    $view .= "\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td colspan='4' align='right'><b>Total:</b></td>\n\t\t\t<td>" . CUR . " " . sprint(array_sum($amount)) . "</td>\n\t\t\t<td></td>\n\t\t</tr>";
    $view .= "\n\t\t\t<tr>\n\t\t\t\t<td><input type='submit' name='back' value='&laquo; Correction'></td>\n\t\t\t\t<td><input type='submit' name='another' value='Add Another'></td>\n\t\t\t\t<td valign='center' colspan='4' align='right'><input type='submit' value='Confirm &raquo;'></td>\n\t\t\t</tr>\n\t\t</form>\n\t\t</table>\n\t\t<a name='bottom'>\n\t\t{$jump_bot}\n\t\t<table border='0' cellpadding='2' cellspacing='1' width='15%'>\n\t\t\t<tr><td><br></td></tr>\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='datacell'>\n\t\t\t\t<td align='center'><a href='../reporting/index-reports.php'>Financials</a></td>\n\t\t\t</tr>\n\t\t\t<script>document.write(getQuicklinkSpecial());</script>\n\t\t</table>";
    return $view;
}
function slctOpt()
{
    extract($_POST);
    if (!isset($refnum)) {
        $refnum = "";
    }
    if (!isset($descript)) {
        $descript = "";
    }
    if (!isset($numtran)) {
        $numtran = "";
    }
    if (!isset($lname)) {
        $lname = "";
    }
    # accounts drop downs
    // 	core_connect();
    //
    // 	$dtacc = "<select name='dtaccid'>";
    // 	$sql = "SELECT * FROM accounts WHERE div = '".USER_DIV."' ORDER BY accname ASC";
    // 	$accRslt = db_exec($sql);
    // 	if(pg_numrows($accRslt) < 1){
    // 			return "<li>There are No accounts in Cubit.</li>";
    // 	}
    // 	while($acc = pg_fetch_array($accRslt)){
    // 		# Check Disable
    // 		if(isDisabled($acc['accid']))
    // 			continue;
    // 		$dtacc .= "<option value='$acc[accid]'>$acc[topacc]/$acc[accnum] - $acc[accname]</option>";
    // 	}
    // 	$dtacc .= "</select>";
    // 	$ctacc = "<select name='ctaccid'>";
    // 	$sql = "SELECT * FROM accounts WHERE div = '".USER_DIV."' ORDER BY accname ASC";
    // 	$accRslt = db_exec($sql);
    // 	if(pg_numrows($accRslt) < 1){
    // 		return "<li>There are No accounts in Cubit.</li>                ";
    // 	}
    // 	while($acc = pg_fetch_array($accRslt)){
    // 		# Check Disable
    // 		if(isDisabled($acc['accid']))
    // 			continue;
    // 		$ctacc .= "<option value='$acc[accid]'>$acc[topacc]/$acc[accnum] - $acc[accname]</option>";
    // 	}
    // 	$ctacc .= "</select>";
    // Options Layout
    $Opts = "\r\n\t\t<center>\r\n\t\t<h3> New High Speed Input Ledger </h3>\r\n\t\t<form action='" . SELF . "' method='POST' name='form'>\r\n\t\t\t<input type='hidden' name='key' value='details'>\r\n\t\t<table " . TMPL_tblDflts . " align='center'>\r\n\t\t\t<tr>\r\n\t\t\t\t<th colspan='3'>Details</th>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td>Ledger Name</td>\r\n\t\t\t\t<td><input type='text' size='30' name='lname' value='{$lname}'></td>\r\n\t\t\t</tr>\r\n\t\t\t<tr>\r\n\t\t\t\t<th><h4>Debit</h4></th>\r\n\t\t\t\t<th><h4>Credit</h4></th>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td align='center'>" . mkAccSelect("dtaccid", $dtaccid) . "</td>\r\n\t\t\t\t<td align='center'>" . mkAccSelect("ctaccid", $ctaccid) . "</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr>\r\n\t\t\t\t<td colspan='2' align='center'><input align='right' type='button' onClick=\"window.open('../core/acc-new2.php?update_parent=yes','accounts','width=700, height=400');\" value='New Account'></td>\r\n\t\t\t</tr>\r\n\t\t\t<tr><td><br></td></tr>\r\n\t\t\t<tr>\r\n\t\t\t\t<th colspan='3'>Options</th>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td>Number of Entries</td>\r\n\t\t\t\t<td><input type='text' size='10' name='numtran' value='{$numtran}'></td>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td>Date Entry</td>\r\n\t\t\t\t<td><input type='radio' name='dateopt' value='system' checked='yes'>System &nbsp;&nbsp; <input type='radio' name='dateopt' value='user'>User Input</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td>Charge Vat </td>\r\n\t\t\t\t<td><input type='radio' name='chrgvat' value='yes'>Yes &nbsp;&nbsp; <input type='radio' name='chrgvat' value='no' checked='yes'>No</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr>\r\n\t\t\t\t<th colspan='3'>Description</th>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td>Description</td>\r\n\t\t\t\t<td><input type='text' size='30' name='descript' value='{$descript}'></td>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td rowspan='3' valign='top'>Options</td>\r\n\t\t\t\t<td><input type='radio' name='desopt' value='emp' checked='yes'> Empty Input Box</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td><input type='radio' name='desopt' value='once'> Once Only Setting</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td><input type='radio' name='desopt' value='edit'> Default Editable</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr>\r\n\t\t\t\t<th colspan='3'>Reference Number</th>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td>Reference Number</td>\r\n\t\t\t\t<td><input type='text' size='10' name='refnum' value='{$refnum}'></td>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td rowspan='4' valign='top'>Options</td>\r\n\t\t\t\t<td><input type='radio' name='refopt' value='num' checked='yes'> Auto Number</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td><input type='radio' name=refopt value='emp'> Empty Input Box</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td><input type='radio' name='refopt' value='once'> Once Only Setting</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td><input type='radio' name='refopt' value='edit'> Default Editable Input</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr><td><br></td></tr>\r\n\t\t\t<tr>\r\n\t\t\t\t<td align='right'><input type='button' value='&laquo Back' onClick='javascript:history.back()'></td>\r\n\t\t\t\t<td align='right'><input type='submit' value='Continue &raquo'></td>\r\n\t\t\t</tr>\r\n\t\t</table>\r\n\t\t</form>\r\n\t\t<p>\r\n\t\t<table border=0 cellpadding='2' cellspacing='1' width=15%>\r\n\t\t\t<tr>\r\n\t\t\t\t<th>Quick Links</th>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td align='center'><a href='ledger-view.php'>View High Speed Input Ledgers</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td align='center'><a href='../main.php'>Main Menu</td>\r\n\t\t\t</tr>\r\n\t\t</table>";
    return $Opts;
}
function slctacc()
{
    extract($_POST);
    if (!isset($refnum)) {
        $refnum = getrefnum();
    }
    /*refnum*/
    // 	if(!isset($date_year)){
    // 		$date_year = date ("Y");
    // 		$date_month = date("m");
    // 		$date_day = date("d");
    // 	}
    $dtaccid += 0;
    $ctaccid += 0;
    core_connect();
    $sql = "SELECT * FROM accounts WHERE div = '" . USER_DIV . "' ORDER BY accname ASC";
    $accRslt = db_exec($sql);
    if (pg_numrows($accRslt) < 1) {
        return "<li>There are No accounts in Cubit.</li>";
    }
    $dtaccs = mkAccSelect("dtaccid", $dtaccid);
    // 	$dtaccs = "<select name='dtaccid'>";
    // 	while($acc = pg_fetch_array($accRslt)){
    // 		# Check Disable
    // 		if(isDisabled($acc['accid']))
    // 			continue;
    // 		if (isset($dtaccid) AND $dtaccid == $acc['accid']){
    // 			$dtaccs .= "<option value='$acc[accid]' selected>$acc[topacc]/$acc[accnum] - $acc[accname]</option>";
    // 		}else {
    // 			$dtaccs .= "<option value='$acc[accid]'>$acc[topacc]/$acc[accnum] - $acc[accname]</option>";
    // 		}
    // 	}
    // 	$dtaccs .= "</select>";
    // 	$sql = "SELECT * FROM accounts WHERE div = '".USER_DIV."' ORDER BY accname ASC";
    // 	$accRslt = db_exec($sql);
    // 	if(pg_numrows($accRslt) < 1){
    // 		return "<li>There are No accounts in Cubit.</li>";
    // 	}
    //
    $ctaccs = mkAccSelect("ctaccid", $ctaccid);
    // 	$ctaccs = "<select name='ctaccid'>";
    // 	while($acc = pg_fetch_array($accRslt)){
    // 		# Check Disable
    // 		if(isDisabled($acc['accid']))
    // 			continue;
    // 		if (isset($ctaccid) AND $ctaccid == $acc['accid']){
    // 			$ctaccs .= "<option value='$acc[accid]' selected>$acc[topacc]/$acc[accnum] - $acc[accname]</option>";
    // 		}else {
    // 			$ctaccs .= "<option value='$acc[accid]'>$acc[topacc]/$acc[accnum] - $acc[accname]</option>";
    // 		}
    // 	}
    // 	$ctaccs .= "</select>";
    if (!isset($date_day)) {
        $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);
            $date_year = $date_arr[0];
            $date_month = $date_arr[1];
            $date_day = $date_arr[2];
        } else {
            $date_year = date("Y");
            $date_month = date("m");
            $date_day = date("d");
        }
    }
    // Accounts (debit)
    $view = "\n\t\t<center>\n\t\t<h3>Add Recurring Transaction</h3>\n\t\t<br><br>\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t<input type='hidden' name='key' value='details'>\n\t\t<table " . TMPL_tblDflts . " align='center'>\n\t\t\t<tr>\n\t\t\t\t<th>Field</th>\n\t\t\t\t<th>Value</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Date</td>\n\t\t\t\t<td>" . mkDateSelect("date", $date_year, $date_month, $date_day) . "</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Reference Number</td>\n\t\t\t\t<td><input type='text' size='10' name='refnum' value='" . $refnum++ . "'></td>\n\t\t\t</tr>\n\t\t\t<tr><td><br></td></tr>\n\t\t\t<tr>\n\t\t\t\t<td align='center'>\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><h4>Debit</h4></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<th>Select Account <input align='right' type='button' onClick=\"window.open('acc-new2.php?update_parent=yes','accounts','width=700, height=400');\" value='New Account'></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 valign='center'>{$dtaccs}</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='center'>\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><h4>Credit</h4></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<th>Select Account <input align='right' type='button' onClick=\"window.open('acc-new2.php?update_parent=yes','accounts','width=700, height=400');\" value='New Account'></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 valign='center'>{$ctaccs}</td>\n\t\t\t\t\t\t\t<td><input name='detail' type='submit' value='Enter Details >'></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</table>\n\t\t<br><br><br>\n\t\t<table " . TMPL_tblDflts . " align='center'>\n\t\t\t<tr>\n\t\t\t\t<td align='center'>\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><h4>Debit</h4></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<th>Account number</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 valign='center'><input type='text' name='dtaccnum' size='20'></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='center'>\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><h4>Credit</h4></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<th>Account number</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 valign='center'><input type='text' name='ctaccnum' size='20'></td>\n\t\t\t\t\t\t\t<td><input type='submit' value='Enter Details >'></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</table>\n\t\t<br>\n\t\t<input type='button' value='< Go Back' onClick='javascript:history.back();'>\n\t\t</form>\n\t\t<p>\n\t\t<table border='0' cellpadding='2' cellspacing='1' width='15%'>\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 align='center'><a href='../reporting/index-reports.php'>Financials</a></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td align='center'><a href='rectrans-view.php'>View Recurring Transactions</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td align='center'><a href='trans-new.php'>Journal Transactions</td>\n\t\t\t</tr>\n\t\t\t<script>document.write(getQuicklinkSpecial());</script>\n\t\t</table>";
    return $view;
}
function slctacc($_POST, $err = "")
{
    extract($_POST);
    if (!isset($refnum)) {
        $refnum = getrefnum();
    }
    /*refnum*/
    // Accounts (debit)
    $view = "\n\t\t<center>\n\t\t<h3>Add Journal transactions to batch </h3>\n\t\t{$err}\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t<input type='hidden' name='key' value='confirm'>\n\t\t<table " . TMPL_tblDflts . " align='center'>\n\t\t\t<tr>\n\t\t\t\t<th>Date</th>\n\t\t\t\t<th>Ref num</th>\n\t\t\t\t<th>Debit <input align='right' type='button' onClick=\"window.open('acc-new2.php?update_parent=yes','accounts','width=700, height=400');\" value='New Account'></th>\n\t\t\t\t<th>Credit <input align='right' type='button' onClick=\"window.open('acc-new2.php?update_parent=yes','accounts','width=700, height=400');\" value='New Account'></th>\n\t\t\t\t<th>Amount</th>\n\t\t\t\t<th>Description</th>\n\t\t\t</tr>";
    for ($i = 0; $i != 20; $i++) {
        // 		if (!isset($date_year[$i])){
        // 			$date_year[$i] = date("Y");
        // 			$date_month[$i] = date("m");
        // 			$date_day[$i] = date ("d");
        // 		}
        if (!isset($date_year[$i])) {
            $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);
                $date_year[$i] = $date_arr[0];
                $date_month[$i] = $date_arr[1];
                $date_day[$i] = $date_arr[2];
            } else {
                $date_year[$i] = date("Y");
                $date_month[$i] = date("m");
                $date_day[$i] = date("d");
            }
        }
        $view .= "\n\t\t\t<tr bgcolor=" . bgcolorg() . ">\n\t\t\t\t<td>" . mkDateSelecta("date", $i, $date_year[$i], $date_month[$i], $date_day[$i]) . "</td>\n\t\t\t\t<td><input type='text' size='5' name='refnum[]' value='{$refnum[$i]}'></td>\n\t\t\t\t<td valign='center'>";
        core_connect();
        $sql = "SELECT * FROM accounts WHERE div = '" . USER_DIV . "' ORDER BY accname ASC";
        $accRslt = db_exec($sql);
        if (pg_numrows($accRslt) < 1) {
            return "<li>There are No accounts in Cubit.</li>";
        }
        if (isset($dtaccid[$i])) {
            $aval = $dtaccid[$i];
        } else {
            $aval = 0;
        }
        $view .= mkAccSelect("dtaccid[]", $aval);
        // 		$view .= "<select name='dtaccid[]' style='width: 230'>";
        // 		while($acc = pg_fetch_array($accRslt)){
        // 			# Check Disable
        // 			if(isDisabled($acc['accid']))
        // 				continue;
        // 			if($acc['accid'] == $aval) {
        // 				$sel = "selected";
        // 			} else {
        // 				$sel = "";
        // 			}
        // 			$view .= "<option value='$acc[accid]' $sel>$acc[accname]</option>";
        // 		}
        // 		$view .= "</select>";
        $view .= "\n\t\t\t</td>\n\t\t\t<td valign='center'>";
        // 		$sql = "SELECT * FROM accounts WHERE div = '".USER_DIV."' ORDER BY accname ASC";
        // 		$accRslt = db_exec($sql);
        // 		if(pg_numrows($accRslt) < 1){
        // 			return "<li>There are No accounts in Cubit.</li>";
        // 		}
        if (isset($ctaccid[$i])) {
            $aval = $ctaccid[$i];
        } else {
            $aval = 0;
        }
        $view .= mkAccSelect("ctaccid[]", $aval);
        // 		$view .= "<select name='ctaccid[]' style='width: 230'>";
        // 		while($acc = pg_fetch_array($accRslt)){
        // 			# Check Disable
        // 			if(isDisabled($acc['accid']))
        // 				continue;
        // 			if($aval == $acc['accid']) {
        // 				$sel = "selected";
        // 			} else {
        // 				$sel = "";
        // 			}
        // 			$view .= "<option value='$acc[accid]' $sel>$acc[accname]</option>";
        // 		}
        // 		$view .= "</select>";
        if (isset($amount[$i])) {
            $aval = $amount[$i];
        } else {
            $aval = "";
        }
        if (isset($descript[$i])) {
            $dval = $descript[$i];
        } else {
            $dval = "";
        }
        $view .= "\n\t\t\t\t</td>\n\t\t\t\t<td><input type='text' size='7' name='amount[]' value='{$aval}'></td>\n\t\t\t\t<td><input type='text' size='20' name='descript[]' value='{$dval}'></td>\n\t\t\t</tr>";
    }
    $view .= "\n\t\t\t<tr>\n\t\t\t\t<td></td>\n\t\t\t\t<td valign='center' colspan='4' align='right'><input type='submit' value='Confirm &raquo;'></td>\n\t\t\t</tr>\n\t\t</form>\n\t\t</table>\n\t\t<table border=0 cellpadding='2' cellspacing='1' width=15%>\n\t\t\t<tr><td><br></td></tr>\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='datacell'>\n\t\t\t\t<td align='center'><a href='../reporting/index-reports.php'>Financials</a></td>\n\t\t\t</tr>\n\t\t\t<tr class='datacell'>\n\t\t\t\t<td align='center'><a href='batch-view.php'>View batch Entries</td>\n\t\t\t</tr>\n\t\t\t<tr class='datacell'>\n\t\t\t\t<td align='center'><a href='trans-new.php'>Journal Transaction</td>\n\t\t\t</tr>\n\t\t\t<script>document.write(getQuicklinkSpecial());</script>\n\t\t</table>";
    return $view;
}
function get_items($_POST, $err = "")
{
    extract($_POST);
    $old_entries = "";
    $new_entry = "";
    $i = 0;
    $total = 0;
    $counter = 0;
    db_connect();
    #get all entries currently in db
    $get_entries = "SELECT * FROM purch_batch_entries ORDER BY id DESC";
    $run_entries = db_exec($get_entries) or errDie("Unable to get batch entries.");
    if (pg_numrows($run_entries) > 0) {
        $old_entries = "\n\t\t\t<tr>\n\t\t\t\t<td colspan='9' align='right'><input type='submit' name='remall' value='Select All'></td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<th>Supplier</th>\n\t\t\t\t<th>Item Account</th>\n\t\t\t\t<th>Date</th>\n\t\t\t\t<th>VAT Code</th>\n\t\t\t\t<th>Supp. Inv. 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 (Incl. VAT)</th>\n\t\t\t\t<th>Remove</th>\n\t\t\t</tr>";
        while ($earr = pg_fetch_array($run_entries)) {
            #supplier drop
            db_connect();
            $get_supp = "SELECT * FROM suppliers WHERE supid = '{$earr['supplier']}' LIMIT 1";
            $run_supp = db_exec($get_supp) or errDie("Unable to get supplier information.");
            if (pg_numrows($run_supp) < 1) {
                unset($_POST["new"]);
                $showsupplier = "Supplier Not Found.";
            } else {
                $sarr = pg_fetch_array($run_supp);
                $showsupplier = "{$sarr['supname']}";
            }
            #get account drop
            core_connect();
            $sql = "SELECT * FROM accounts WHERE accid = '{$earr['account']}' LIMIT 1";
            $accRslt = db_exec($sql);
            if (pg_numrows($accRslt) < 1) {
                unset($_POST["new"]);
                $showaccount = "Account Not Found.";
            } else {
                $aarr = pg_fetch_array($accRslt);
                $showaccount = "{$aarr['topacc']}/{$aarr['accnum']} - {$aarr['accname']}";
            }
            #get vatcode information
            db_connect();
            $Sl = "SELECT * FROM vatcodes WHERE id = '{$earr['vatcode']}' LIMIT 1";
            $Ri = db_exec($Sl) or errDie("Unable to get vat codes");
            if (pg_numrows($Ri) < 1) {
                $showvatcode = "Vatcode Not Found.";
            } else {
                $varr = pg_fetch_array($Ri);
                $showvatcode = $varr['code'];
            }
            $parr = explode("-", $earr['pdate']);
            $dates_year = $parr[0];
            $dates_month = $parr[1];
            $dates_day = $parr[2];
            if (isset($remall)) {
                $removetick = "checked=yes";
            } else {
                $removetick = "";
            }
            //								<input type='hidden' name='suppliers[$i]' value='$earr[supplier]'>
            //								<input type='hidden' name='accounts[$i]' value='$earr[account]'>
            //								<input type='hidden' name='dates_year[$i]' value='$dates_year'>
            //								<input type='hidden' name='dates_month[$i]' value='$dates_month'>
            //								<input type='hidden' name='dates_day[$i]' value='$dates_day'>
            //								<input type='hidden' name='vatcodes[$i]' value='$earr[vatcode]'>
            //								<input type='hidden' name='supinvs[$i]' value='$earr[supinv]'>
            //								<input type='hidden' name='descriptions[$i]' value='$earr[description]'>
            //								<input type='hidden' name='qtys[$i]' value='$earr[qty]'>
            //								<input type='hidden' name='prices[$i]' value='$earr[price]'>
            $old_entries .= "\n\t\t\t\t<input type='hidden' name='ids[{$i}]' value='{$earr['id']}'>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>{$showsupplier}</td>\n\t\t\t\t\t<td>{$showaccount}</td>\n\t\t\t\t\t<td nowrap>{$dates_year}-{$dates_month}-{$dates_day}</td>\n\t\t\t\t\t<td>{$showvatcode}</td>\n\t\t\t\t\t<td>{$earr['supinv']}</td>\n\t\t\t\t\t<td>{$earr['description']}</td>\n\t\t\t\t\t<td>{$earr['qty']}</td>\n\t\t\t\t\t<td>" . CUR . " {$earr['price']}</td>\n\t\t\t\t\t<td><input type='checkbox' name='remids[{$i}]' value='{$earr['id']}' {$removetick}></td>\n\t\t\t\t</tr>";
            $i++;
            $counter++;
            $total = $total + $earr['qty'] * $earr['price'];
            if ($counter == 20) {
                $old_entries .= "\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<td colspan='9' align='right'><input type='submit' name='process' value='Process'></td>\n\t\t\t\t\t</tr>";
                $counter = 0;
            }
        }
        $total = sprint($total);
        $old_entries .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td colspan='5'></td>\n\t\t\t\t<th colspan='2'>Total</th>\n\t\t\t\t<th align='left'>" . CUR . " {$total}</th>\n\t\t\t\t<td></td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td colspan='9' align='right'><input type='submit' name='rem_selected' value='Remove Selected'></td>\n\t\t\t</tr>";
    }
    $new = "";
    #generate new field
    if (isset($new)) {
        //		if(!isset($))
        //			$ = "";
        //			$supplier
        //			$account
        // 		if(!isset($date_year) OR (strlen($date_year) < 4))
        // 			$date_year = date("Y");
        // 		if(!isset($date_month) OR (strlen($date_month) < 2))
        // 			$date_month = date("m");
        // 		if(!isset($date_day) OR (strlen($date_day) < 2))
        // 			$date_day = date("d");
        if (!isset($date_day)) {
            $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);
                $date_year = $date_arr[0];
                $date_month = $date_arr[1];
                $date_day = $date_arr[2];
            } else {
                $date_year = date("Y");
                $date_month = date("m");
                $date_day = date("d");
            }
        }
        if (!isset($vatcode)) {
            $vatcode = "";
        }
        if (!isset($supinv)) {
            $supinv = "";
        }
        if (!isset($description)) {
            $description = "";
        }
        if (!isset($qty)) {
            $qty = "";
        }
        if (!isset($price)) {
            $price = "";
        }
        #get supplier drop
        db_connect();
        $get_supp = "SELECT * FROM suppliers WHERE div = '" . USER_DIV . "' AND ((length(blocked) < 3) OR (blocked IS NULL)) ";
        $run_supp = db_exec($get_supp) or errDie("Unable to get supplier information.");
        if (pg_numrows($run_supp) < 1) {
            unset($_POST["new"]);
            return "<li class='err'>No Suppliers Found.</li><br>" . mkQuickLinks(ql("supp-new.php", "Add Supplier"), ql("supp-view.php", "View Suppliers"), ql("purchase-new.php", "Add Purchase"), ql("purchase-view.php", "View Purchases"), ql("nons-purchase-new.php", "Add Non-Stock Purchase"), ql("nons-purchase-view.php", "View Non-Stock Purchases"));
            //			return get_items ($_POST,"<li class='err'>No Suppliers Found.</li>");
        } else {
            $supplier_drop = "<select name='supplier'>";
            while ($sarr = pg_fetch_array($run_supp)) {
                if (isset($supplier) and $supplier == $sarr['supid']) {
                    $supplier_drop .= "<option value='{$sarr['supid']}' selected>{$sarr['supname']}</option>";
                } else {
                    $supplier_drop .= "<option value='{$sarr['supid']}'>{$sarr['supname']}</option>";
                }
            }
            $supplier_drop .= "</select>";
        }
        #get account drop
        core_connect();
        $sql = "SELECT * FROM accounts WHERE div = '" . USER_DIV . "' ORDER BY accname ASC";
        $accRslt = db_exec($sql);
        if (pg_numrows($accRslt) < 1) {
            unset($_POST["new"]);
            return get_items($_POST, "<li class='err'>There are No accounts in Cubit.</li>");
        }
        $accounts_drop = mkAccSelect("account", $account);
        // 		$accounts_drop = "<select name='account'>";
        // 		while($acc = pg_fetch_array($accRslt)){
        // 			# Check Disable
        // 			if(isDisabled($acc['accid']))
        // 				continue;
        // 			if(isset($account) AND ($account == $acc['accid'])){
        // 				$accounts_drop .= "<option value='$acc[accid]' selected>$acc[topacc]/$acc[accnum] - $acc[accname]</option>";
        // 			}else {
        // 				$accounts_drop .= "<option value='$acc[accid]'>$acc[topacc]/$acc[accnum] - $acc[accname]</option>";
        // 			}
        // 		}
        // 		$accounts_drop .= "</select>";
        #get vatcode information
        db_connect();
        $Sl = "SELECT * FROM vatcodes ORDER BY code";
        $Ri = db_exec($Sl) or errDie("Unable to get vat codes");
        $vatcodes_drop = "\n\t\t\t<select name='vatcode'>\n\t\t\t\t<option value='0'>Select</option>";
        while ($vd = pg_fetch_array($Ri)) {
            if ($vatcode == $vd['id']) {
                $vatcodes_drop .= "<option value='{$vd['id']}' selected>{$vd['code']}</option>";
            } else {
                $vatcodes_drop .= "<option value='{$vd['id']}'>{$vd['code']}</option>";
            }
        }
        $vatcodes_drop .= "</select>";
        #get the projects
        $get_pros = "SELECT * FROM projects WHERE project_name != 'No Project' ORDER BY project_name";
        $run_pros = db_exec($get_pros) or errDie("Unable to get project information.");
        if (pg_numrows($run_pros) < 1) {
            $project_drop = "<li class='err'>No Projects Found.</li>";
        } else {
            $parr = pg_fetch_array($run_pros);
            $project_drop = "<select name='project'>";
        }
        $costs = "";
        $get_newpros = "SELECT * FROM purch_batch_entries_newcostcenters";
        $run_newpros = db_exec($get_newpros) or errDie("Unable to get cost center listing");
        if (pg_numrows($run_newpros) < 1) {
            $projects = array();
        } else {
            while ($parr = pg_fetch_array($run_newpros)) {
                $costs .= "\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='text' size='15' name='old_project[{$parr['id']}]' value='{$parr['project']}'>\n\t\t\t\t\t\t\t<input type='text' size='15' name='old_costcenter[{$parr['id']}]' value='{$parr['costcenter']}'>\n\t\t\t\t\t\t\t<input type='text' size='15' name='old_costperc[{$parr['id']}]' value='{$parr['costperc']}'>\n\t\t\t\t\t\t\t<input type='checkbox' name='remcost' value='{$parr['id']}' onChange='document.form.submit();'> (Remove)\n\t\t\t\t\t\t</td>\n\t\t\t\t\t</tr>";
            }
        }
        if (!isset($newproject) or strlen($newproject) < 1) {
            $showproject = "value='Project ' onFocus=\"value=''\"";
        } else {
            $showproject = "value='{$newproject}'";
        }
        if (!isset($newcostcenter) or strlen($newcostcenter) < 1) {
            $showcostcenter = "value='Cost Center' onFocus=\"value=''\"";
        } else {
            $showcostcenter = "value='{$newcostcenter}'";
        }
        if (!isset($newcostperc) or strlen($newcostperc) < 1) {
            $showcostperc = "value='100'";
        } else {
            $showcostperc = "value='{$newcostperc}'";
        }
        $csetting = getsetting("CC_USE");
        if ($csetting == "use") {
            $showcostcenters = "\n\t\t\t<tr>\n\t\t\t\t<th colspan='2'>Cost Center</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td colspan='2' nowrap>\n\t\t\t\t\t<input type='text' size='15' name='newproject' {$showproject}>\n\t\t\t\t\t<input type='text' size='15' name='newcostcenter' {$showcostcenter}>\n\t\t\t\t\t<input type='text' size='4' name='newcostperc' {$showcostperc}> Percent\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t{$costs}";
        } else {
            $showcostcenters = "";
        }
        $new_entry .= "\n\t\t\t<tr>\n\t\t\t\t<th>Supplier</th>\n\t\t\t\t<th colspan='3'>Item Account <input align='right' type='button' onClick=\"window.open('core/acc-new2.php?update_parent=yes','accounts','width=700, height=400');\" value='New Account'></th>\n\t\t\t\t<th>Date</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>{$supplier_drop}</td>\n\t\t\t\t<td colspan='3'>{$accounts_drop}</td>\n\t\t\t\t<td nowrap>" . mkDateSelect("date", $date_year, $date_month, $date_day) . "</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<th>Supp. Inv. 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 (Incl. VAT)</th>\n\t\t\t\t<th>VAT Code</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td><input type='text' size='5' name='supinv' value='{$supinv}'></td>\n\t\t\t\t<td><input type='text' size='25' name='description' value='{$description}'></td>\n\t\t\t\t<td><input type='text' size='5' name='qty' value='{$qty}'></td>\n\t\t\t\t<td><input type='text' size='15' name='price' value='{$price}'></td>\n\t\t\t\t<td>{$vatcodes_drop}</td>\n\t\t\t</tr>\n\t\t\t{$showcostcenters}";
    }
    $showsetting = getsetting("CC_USE");
    $display = "\n\t\t<h2>Batch Creditor Non-Stock Invoices</h2>\n\t\t{$err}\n\t\t<br>\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t<input type='hidden' name='key' value='save'>\n\t\t<table " . TMPL_tblDflts . " width='95%'>\n\t\t\t{$new_entry}\n\t\t\t<td><input type='submit' name='update' value='Add Item'></td>\n\t\t\t" . TBL_BR . "\n\t\t</table>\n\t\t<table " . TMPL_tblDflts . " width='95%'>\n\t\t\t{$old_entries}\n\t\t\t" . TBL_BR . "\n\t\t\t<tr>\n\t\t\t\t<td colspan='9' align='right'><input type='submit' name='process' value='Process'></td>\n\t\t\t</tr>\n\t\t</table>\n\t\t</form>\n\t\t<p>" . mkQuickLinks(ql("purchase-new.php", "Add Purchase"), ql("purchase-view.php", "View Purchases"), ql("nons-purchase-new.php", "Add Non-Stock Purchase"), ql("nons-purchase-view.php", "View Non-Stock Purchases"));
    return $display;
}
function enter($_POST, $error = "")
{
    # Get vars
    extract($_POST);
    if (!isset($number)) {
        $number = 1;
    }
    # validate input
    require_lib("validate");
    $v = new validate();
    $v->isOk($bankid, "num", 1, 20, "Invalid Bank ID.");
    $v->isOk($number, "num", 1, 3, "Invalid number of entries.");
    # display errors, if any
    if ($v->isError()) {
        $confirm = "";
        $errors = $v->getErrors();
        foreach ($errors as $e) {
            $confirm .= "<li class='err'>" . $e["msg"] . "</li>";
        }
        $confirm .= "<p><input type='button' onClick='JavaScript:history.back();' value='&laquo; Correct submission'>";
        return $confirm;
    }
    $jump_bot = "";
    if (isset($another)) {
        $jump_bot = "\n\t\t\t<script>\n\t\t\t\twindow.location.hash='bottom';\n\t\t\t</script>";
        $number++;
    }
    # Accounts Drop down
    core_connect();
    $glacc = mkAccSelect("accinv[]", 1);
    // 	$glacc = "<select name='accinv[]'>";
    // 	$sql = "SELECT * FROM accounts WHERE div = '".USER_DIV."'";
    // 	$accRslt = db_exec($sql);
    // 	if(pg_numrows($accRslt) < 1){
    // 		return "<li> There are no accounts yet in Cubit.</li>";
    // 	}
    // 	while($acc = pg_fetch_array($accRslt)){
    // 		# Check Disable
    // 		if(isDisabled($acc['accid']))
    // 			continue;
    // 		$glacc .= "<option value='$acc[accid]'>$acc[accname]</option>";
    // 	}
    // 	$glacc .= "</select>";
    # Get bank acc details
    $bankRslt = get("cubit", "*", "bankacct", "bankid", $bankid);
    $bank = pg_fetch_array($bankRslt);
    $vatarr = array("nov" => "No VAT", "inc" => "Inclusive", "exc" => "Exclusive");
    // Layout
    $enter = "\n\t\t<center>\n\t\t<h3>Type in Bank statement</h3>\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t<input type='hidden' name='key' value='confirm'>\n\t\t\t<input type='hidden' name='bankid' value='{$bankid}'>\n\t\t\t<input type='hidden' name='number' value='{$number}'>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t<tr>\n\t\t\t\t<td colspan='4'>{$error}</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<th align='center' colspan='10'>Bank Account : <b>({$bank['accnum']}) {$bank['accname']}</b></th>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<th>Date</th>\n\t\t\t\t<th>Paid to/Received from</th>\n\t\t\t\t<th>Transaction type</th>\n\t\t\t\t<th>Transaction Description</th>\n\t\t\t\t<th>Reference</th>\n\t\t\t\t<th>Cheque Number</th>\n\t\t\t\t<th>Amount</th>\n\t\t\t\t<th>VAT</th>\n\t\t\t\t<th>VAT Code</th>\n\t\t\t\t<th>Contra Account <input align='right' type='button' onClick=\"window.open('../core/acc-new2.php?update_parent=yes','accounts','width=700, height=400');\" value='New Account'></th>\n\t\t\t</tr>";
    for ($i = 0; $i < $number; $i++) {
        if (!isset($date[$i])) {
            $date[$i] = false;
        }
        if (strlen($date[$i]) < 1) {
            $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);
                $o_year[$i] = $date_arr[0];
                $o_month[$i] = $date_arr[1];
                $o_day[$i] = $date_arr[2];
                $date[$i] = "{$o_year[$i]}-{$o_month[$i]}-{$o_day[$i]}-";
            } else {
                if (!isset($o_day[$i]) or strlen($o_day[$i]) < 1) {
                    if (isset($_SESSION["global_day"]) and strlen($_SESSION["global_day"]) > 0) {
                        $o_day[$i] = $_SESSION["global_day"];
                    } else {
                        $o_day[$i] = date("d");
                    }
                    if (isset($_SESSION["global_month"]) and strlen($_SESSION["global_month"]) > 0) {
                        $o_month[$i] = $_SESSION["global_month"];
                    } else {
                        $o_month[$i] = date("m");
                    }
                    if (isset($_SESSION["global_year"]) and strlen($_SESSION["global_year"]) > 0) {
                        $o_year[$i] = $_SESSION["global_year"];
                    } else {
                        $o_year[$i] = date("Y");
                    }
                }
                $date[$i] = "{$o_year[$i]}-{$o_month[$i]}-{$o_day[$i]}-";
            }
        }
        explodeDate($date[$i], $o_year[$i], $o_month[$i], $o_day[$i]);
        if (!isset($to[$i])) {
            $to[$i] = "";
            $trantype[$i] = "";
            $descript[$i] = "";
            $ref[$i] = "";
            $cheqnum[$i] = "";
            $amount[$i] = "";
            $chrgvat[$i] = "";
            $accinv[$i] = "";
        }
        switch (strtolower($trantype[$i])) {
            case "deposit":
                $ch1 = "selected";
                $ch2 = "";
                break;
            case "withdrawal":
                $ch1 = "";
                $ch2 = "selected";
                break;
            default:
                $ch1 = "";
                $ch2 = "selected";
                break;
        }
        $vatsel = extlib_cpsel("chrgvat[]", $vatarr, $chrgvat[$i]);
        $glacc = mkAccSelect("accinv[]", $accinv[$i]);
        # Accounts Drop down
        // 		core_connect();
        // 		$glacc = "<select name='accinv[]'>";
        // 		$sql = "SELECT * FROM accounts WHERE div = '".USER_DIV."' ORDER BY accname";
        // 		$accRslt = db_exec($sql);
        // 		if(pg_numrows($accRslt) < 1){
        // 			return "<li> There are no accounts yet in Cubit.</li>";
        // 		}
        // 		while($acc = pg_fetch_array($accRslt)){
        // 			# Check Disable
        // 			if(isDisabled($acc['accid']))
        // 				continue;
        // 			$sel = "";
        // 			if($acc['accid'] == $accinv[$i]) $sel = "selected";
        // 			$glacc .= "<option value='$acc[accid]' $sel>$acc[accname]</option>";
        // 		}
        // 		$glacc .= "</select>";
        db_conn('cubit');
        $Sl = "SELECT * FROM vatcodes ORDER BY code";
        $Ri = db_exec($Sl) or errDie("cant get vat data.");
        $vats = "<select name='vatcode[]'>";
        while ($vd = pg_fetch_array($Ri)) {
            $vats .= "<option value='{$vd['id']}'>{$vd['code']}</option>";
        }
        $vats .= "</select>";
        $enter .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td align='center' nowrap='t'>" . mkDateSelectA("o", $i, $o_year[$i], $o_month[$i], $o_day[$i]) . "</td>\n\t\t\t\t<td align='center'><input type='text' name='to[]' value='{$to[$i]}'></td>\n\t\t\t\t<td align='center'>\n\t\t\t\t\t<select name='trantype[]'>\n\t\t\t\t\t\t<option value='Withdrawal' {$ch2}>Payment</option>\n\t\t\t\t\t\t<option value='Deposit' {$ch1}>Receipt</option>\n\t\t\t\t\t</select>\n\t\t\t\t</td>\n\t\t\t\t<td align='center'><input type='text' name='descript[]' value='{$descript[$i]}'></td>\n\t\t\t\t<td align='center'><input type='text' name='ref[]' value='{$ref[$i]}' size=7></td>\n\t\t\t\t<td align='center'><input type='text' name='cheqnum[]' value='{$cheqnum[$i]}' size='7'></td>\n\t\t\t\t<td align='center'>\n\t\t\t\t\t<table>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<td>" . CUR . "</td>\n\t\t\t\t\t\t\t<td><input type='text' name='amount[]' value='{$amount[$i]}' size='8'></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='center'>{$vatsel}</td>\n\t\t\t\t<td align='center'>{$vats}</td>\n\t\t\t\t<td align='center'>{$glacc}</td>\n\t\t\t</tr>";
    }
    $total_amount = 0;
    $payment_list = array_keys($trantype, "Deposit");
    foreach ($payment_list as $each => $own) {
        $total_amount += $amount[$own];
    }
    $receipt_list = array_keys($trantype, "Withdrawal");
    foreach ($receipt_list as $each => $own) {
        $total_amount -= $amount[$own];
    }
    $enter .= "\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td colspan='6' align='right'><b>Total:</b></td>\n\t\t\t<td align='right'>" . CUR . " " . sprint($total_amount) . "</td>\n\t\t\t<td colspan='3'></td>\n\t\t</tr>";
    $enter .= "\n\t\t\t\t<tr>\n\t\t\t\t\t<td><input type='submit' name='back' value='&laquo; Correction'></td>\n\t\t\t\t\t<td><input type='submit' name='another' value='Add Another'></td>\n\t\t\t\t\t<td colspan='4' align='right'><input type='submit' value='Confirm &raquo'></td>\n\t\t\t\t</tr>\n\t\t\t</table>\n\t\t\t</form>\n\t\t<p>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t<tr>\n\t\t\t\t<th>Quick Links</th>\n\t\t\t</tr>\n\t\t\t<script>document.write(getQuicklinkSpecial());</script>\n\t\t</table>\n\t\t<a name='bottom'>\n\t\t{$jump_bot}";
    return $enter;
}
function slctacc($_POST, $err = "")
{
    extract($_POST);
    $translist = "";
    if (!isset($total)) {
        $total = 1;
    }
    if (!isset($refnum)) {
        $refnum = getrefnum();
    }
    $jump_bot = "";
    if (isset($more)) {
        $jump_bot = "\n\t\t\t<script>\n\t\t\t\twindow.location.hash='bottom';\n\t\t\t</script>";
        $total++;
    }
    if (!isset($date_year)) {
        $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);
            $date_year = $date_arr[0];
            $date_month = $date_arr[1];
            $date_day = $date_arr[2];
        } else {
            $date_year = date("Y");
            $date_month = date("m");
            $date_day = date("d");
        }
    }
    for ($i = 0; $i != $total; $i++) {
        core_connect();
        $sql = "SELECT * FROM accounts WHERE div = '" . USER_DIV . "' ORDER BY accname ASC";
        $accRslt = db_exec($sql);
        if (pg_numrows($accRslt) < 1) {
            return "<li>There are No accounts in Cubit.</li>";
        }
        $dtaccid[$i] += 0;
        $dtamount[$i] += 0;
        $ctamount[$i] += 0;
        $translist .= "\n\t\t\t<tr bgcolor=" . bgcolorg() . ">\n\t\t\t\t<td valign='center'>" . mkAccSelect("accid[]", $accid[$i]) . "</td>\n\t\t\t\t<td><input type='text' size='20' name='descript[]' value='{$descript[$i]}'></td>\n\t\t\t\t<td><input type='text' size='7' name='dtamount[]' value='{$dtamount[$i]}'></td>\n\t\t\t\t<td><input type='text' size='7' name='ctamount[]' value='{$ctamount[$i]}'></td>\n\t\t\t</tr>";
    }
    $translist .= "\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td colspan='2' align='right'><b>Total:</b></td>\n\t\t\t<td>" . CUR . " " . sprint(array_sum($dtamount)) . "</td>\n\t\t\t<td>" . CUR . " " . sprint(array_sum($ctamount)) . "</td>\n\t\t</tr>";
    // Accounts (debit)
    $view = "\n\t\t<center>\n\t\t<h3>Process Multiple Account Journal Transactions</h3>\n\t\t{$err}\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t<input type='hidden' name='key' value='confirm'>\n\t\t\t<input type='hidden' name='total' value='{$total}'>\n\t\t<table " . TMPL_tblDflts . " align='center'>\n\t\t\t<tr>\n\t\t\t\t<th>Transaction Date</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td align='center'>" . mkDateSelect("date", $date_year, $date_month, $date_day) . "</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<th>Select Contra Account</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>" . mkAccSelect("account", $account) . "</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<th>Reference Number</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td align='center'><input type='text' size='5' name='refnum' value='{$refnum}'></td>\n\t\t\t</tr>\n\t\t\t" . TBL_BR . "\n\t\t</table>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t<tr>\n\t\t\t\t<th>Account <input align='right' type='button' onClick=\"window.open('acc-new2.php?update_parent=yes','accounts','width=700, height=400');\" value='New Account'></th>\n\t\t\t\t<th>Description</th>\n\t\t\t\t<th>Debit</th>\n\t\t\t\t<th>Credit</th>\n\t\t\t</tr>\n\t\t\t{$translist}\n\t\t\t<tr>\n\t\t\t\t<td colspan='3'><input type='submit' name='more' value='Add Another'></td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td valign='center' colspan='4' align='right'><input type='submit' name='confirm' value='Confirm &raquo;'></td>\n\t\t\t</tr>\n\t\t</table>\n\t\t</form>\n\t\t<a name='bottom'>\n\t\t{$jump_bot}\n\t\t<table border=0 cellpadding='2' cellspacing='1' width=15%>\n\t\t\t<tr><td><br></td></tr>\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='datacell'>\n\t\t\t\t<td align='center'><a href='../reporting/index-reports.php'>Financials</a></td>\n\t\t\t</tr>\n\t\t\t<tr class='datacell'>\n\t\t\t\t<td align='center'><a href='batch-view.php'>View batch Entries</td>\n\t\t\t</tr>\n\t\t\t<tr class='datacell'>\n\t\t\t\t<td align='center'><a href='trans-new.php'>Journal Transaction</td>\n\t\t\t</tr>\n\t\t\t<script>document.write(getQuicklinkSpecial());</script>\n\t\t</table>";
    return $view;
}
function add()
{
    global $_POST;
    extract($_POST);
    # Accounts Drop down selections
    core_connect();
    if (isset($account) && strlen($account) > 0) {
        $accinv = $account;
    }
    $glacc = mkAccSelect("accinv", $accinv);
    # Income accounts ($inc)
    // 	$glacc = "<select name='accinv'>";
    // 	$sql = "SELECT * FROM accounts WHERE div = '".USER_DIV."' ORDER BY accname ASC";
    // 	$accRslt = db_exec($sql);
    // 	$numrows = pg_numrows($accRslt);
    // 	if(empty($numrows)){
    // 		$glacc = "There are no Income accounts yet in Cubit.";
    // 	}
    // 	while($acc = pg_fetch_array($accRslt)){
    // 		# Check Disable
    // 		if(isDisabled($acc['accid']))
    // 			continue;
    // 		if((isset($accinv) && ($accinv == $acc['accid'])) ||
    // 			(isset($account) && ($account == $acc['accid']))) {
    // 			$sel = "selected";
    // 		} else {
    // 			$sel = "";
    // 		}
    // 		$glacc .= "<option value='$acc[accid]' $sel>$acc[accname]</option>";
    // 	}
    // 	$glacc .= "</select>";
    if (!isset($name)) {
        $bankid = 0;
        $name = "";
        $descript = "";
        $cheqnum = "";
        $amount = "";
        $reference = "";
    }
    db_connect();
    $sql = "SELECT * FROM bankacct WHERE btype != 'int' AND div = '" . USER_DIV . "'";
    $banks = db_exec($sql);
    if (pg_numrows($banks) < 1) {
        return "<li class='err'> There are no accounts held at the selected Bank.</li>\n\t\t<p><input type='button' onClick='JavaScript:history.back();' value='&laquo; Correct Selection'>";
    }
    $bank = "<select name='bankid'>";
    while ($acc = pg_fetch_array($banks)) {
        if ($bankid == $acc['bankid']) {
            $bank .= "<option value='{$acc['bankid']}' selected>{$acc['accname']} - {$acc['bankname']} ({$acc['acctype']})</option>";
        } else {
            $bank .= "<option value='{$acc['bankid']}'>{$acc['accname']} - {$acc['bankname']} ({$acc['acctype']})</option>";
        }
    }
    $bank .= "</select>";
    if (!isset($vatcode)) {
        $vatcode = "";
    }
    if (!isset($chrgvat)) {
        $chrgvat = "";
    }
    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='vatcode'>\n\t\t\t<option value='0'>Select</option>";
    while ($vd = pg_fetch_array($Ri)) {
        if ($vatcode == $vd['id']) {
            $sel = "selected";
        } else {
            if ($vd['del'] == "Yes" and strlen($vatcode) < 1) {
                $sel = "selected";
            } else {
                $sel = "";
            }
        }
        $Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
    }
    $Vatcodes .= "</select>";
    if (!isset($date_day)) {
        $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);
            $date_year = $date_arr[0];
            $date_month = $date_arr[1];
            $date_day = $date_arr[2];
        } else {
            #check if the global date is set .... else set it manually
            if (isset($_SESSION["global_day"]) and strlen($_SESSION["global_day"]) > 0) {
                $date_day = $_SESSION["global_day"];
            } else {
                $date_day = date("d");
            }
            if (isset($_SESSION["global_month"]) and strlen($_SESSION["global_month"]) > 0) {
                $date_month = $_SESSION["global_month"];
            } else {
                $date_month = date("m");
            }
            if (isset($_SESSION["global_year"]) and strlen($_SESSION["global_year"]) > 0) {
                $date_year = $_SESSION["global_year"];
            } else {
                $date_year = date("Y");
            }
        }
    }
    $cvat1 = "";
    $cvat2 = "";
    $cvat3 = "";
    if ($chrgvat == "inc") {
        $cvat1 = "checked='yes'";
    } elseif ($chrgvat == "exc") {
        $cvat2 = "checked='yes'";
    } else {
        $cvat3 = "checked='yes'";
    }
    # layout
    $add = "\n\t\t<h3>New Bank Payment</h3>\n\t\t<table " . TMPL_tblDflts . " width='80%'>\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t<input type='hidden' name='key' value='confirm'>\n\t\t\t<tr>\n\t\t\t\t<th>Field</th>\n\t\t\t\t<th>Value</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Bank Account</td>\n\t\t\t\t<td valign='center'>{$bank}</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Date</td>\n\t\t\t\t<td>" . mkDateSelect("date", $date_year, $date_month, $date_day) . " DD-MM-YYYY</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Paid to</td>\n\t\t\t\t<td valign='center'><input size='20' name='name' value='{$name}'></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td valign='top'>Description</td>\n\t\t\t\t<td valign='center'><textarea col='18' rows='3' name='descript'>{$descript}</textarea></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Reference</td>\n\t\t\t\t<td valign='center'><input type='text' size='25' name='reference' value='{$reference}'></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Cheque Number</td>\n\t\t\t\t<td valign='center'><input size='20' name='cheqnum' value='{$cheqnum}'></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Amount</td>\n\t\t\t\t<td valign='center'>" . CUR . " <input type='text' size='10' name='amount' value='{$amount}'></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>VAT </td>\n\t\t\t\t<td><input type='radio' name='chrgvat' value='inc' {$cvat1}>Inclusive &nbsp;&nbsp; <input type='radio' name='chrgvat' value='exc' {$cvat2}>Exclusive &nbsp;&nbsp; &nbsp;&nbsp; <input type='radio' name='chrgvat' value='nov' {$cvat3}>No VAT</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>VAT Code</td>\n\t\t\t\t<td>{$Vatcodes}</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td valign='top'>Select Contra Account <input align='right' type='button' onClick=\"window.open('../core/acc-new2.php?update_parent=yes','accounts','width=700, height=400');\" value='New Account'></td>\n\t\t\t\t<td>{$glacc}</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><input type='submit' name='back' value='&laquo; Correction'></td>\n\t\t\t\t<td valign='center' align='right'><input type='submit' value='Confirm &raquo;'></td>\n\t\t\t</tr>\n\t\t</form>\n\t\t</table>";
    # main table (layout with menu)
    $OUTPUT = "\n\t\t<center>\n\t\t<table width='100%'>\n\t\t\t<tr>\n\t\t\t\t<td width='65%' align='left'>{$add}</td>\n\t\t\t\t<td valign='top' align='center'>\n\t\t\t\t\t<table " . TMPL_tblDflts . " width='65%'>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th>Quick Links</th>\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</tr>\n\t\t</table>";
    return $OUTPUT;
}
function add($errors = "")
{
    global $_POST;
    extract($_POST);
    $fields["name"] = "";
    $fields["det"] = "";
    $fields["amount"] = "";
    $fields["chrgvat"] = "inc";
    $fields["vatcode"] = "";
    $fields["accid"] = "";
    foreach ($fields as $var_name => $value) {
        if (!isset(${$var_name})) {
            ${$var_name} = $value;
        }
    }
    core_connect();
    $accnts = mkAccSelect("accid", $accid);
    // 	$sql = "SELECT * FROM accounts WHERE div = '".USER_DIV."' ORDER BY accname ASC";
    // 	$accRslt = db_exec($sql);
    //
    // 	if(pg_numrows($accRslt) < 1){
    // 		return "<li class='err'> ERROR : There are no accounts in the category selected.</li>";
    // 	}
    //
    // 	$accnts = "<select name='accid'>";
    // 	while($acc = pg_fetch_array($accRslt)){
    // 		# Check Disable
    // 		if(isDisabled($acc['accid']))
    // 			continue;
    //
    // 		if ($accid == $acc["accid"]) {
    // 			$selected = "selected";
    // 		} else {
    // 			$selected = "";
    // 		}
    //
    // 		$accnts .= "<option value='$acc[accid]' $selected>$acc[accname]</option>";
    // 	}
    // 	$accnts .= "</select>";
    # check available funds
    $cashacc = gethook("accnum", "bankacc", "name", "Petty Cash");
    core_connect();
    $sql = "SELECT (debit - credit) as bal FROM trial_bal WHERE accid = '{$cashacc}' AND month='" . (int) date("m") . "' AND div = '" . USER_DIV . "'";
    $accbRslt = db_exec($sql);
    if (pg_numrows($accbRslt) < 1) {
        return "<li class='err'> Petty Cash Account not found.</li>";
    }
    $accb = pg_fetch_array($accbRslt);
    $accb['bal'] = sprint($accb['bal']);
    # mourn if the is no money
    if ($accb['bal'] < 1) {
        return "\n\t\t\t<li class='err'> There are no Petty Cash funds available.</li>\n\t\t\t<p>\n\t\t\t<table " . TMPL_tblDflts . ">\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='petty-trans.php'>Transfer funds to petty cash account</a></td>\n\t\t\t\t</tr>\n\t\t\t\t<script>document.write(getQuicklinkSpecial());</script>\n\t\t\t</table>";
    }
    // Vat Inclusive ?
    if ($chrgvat == "exc") {
        $vat_exc = "checked";
        $vat_inc = "";
    } else {
        $vat_exc = "";
        $vat_inc = "checked";
    }
    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='vatcode'>\n\t\t\t<option value='0'>Select</option>";
    while ($vd = pg_fetch_array($Ri)) {
        if ($vd['del'] == "Yes" || $vatcode == $vd["id"]) {
            $sel = "selected";
        } else {
            $sel = "";
        }
        $Vatcodes .= "<option value='{$vd['id']}' {$sel}>{$vd['code']}</option>";
    }
    $Vatcodes .= "</select>";
    if (!isset($date_day)) {
        $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);
            $date_year = $date_arr[0];
            $date_month = $date_arr[1];
            $date_day = $date_arr[2];
        } else {
            $date_year = date("Y");
            $date_month = date("m");
            $date_day = date("d");
        }
    }
    // Layout
    $add = "\n\t\t<h3>Add Petty Cash Requisistion</h3>\n\t\t<table " . TMPL_tblDflts . " width='600'>\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t<input type='hidden' name='key' value='confirm'>\n\t\t\t<tr>\n\t\t\t\t<td colspan='2'>{$errors}</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<th>Field</th>\n\t\t\t\t<th>Value</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Date</td>\n\t\t\t\t<td>" . mkDateSelect("date", $date_year, $date_month, $date_day) . "</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Paid to</td>\n\t\t\t\t<td valign='center'><input size='20' name='name' value='{$name}'></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Details</td>\n\t\t\t\t<td valign='center'><textarea cols='18' rows='2' name='det'>{$det}</textarea></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Available Funds</td>\n\t\t\t\t<td><input type='hidden' name='bal' value='{$accb['bal']}'>" . CUR . " {$accb['bal']}</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Amount</td>\n\t\t\t\t<td valign='center'>" . CUR . " <input type='text' size='10' name='amount' value='{$amount}'></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>VAT Inclusive</td>\n\t\t\t\t<td valign='center'>\n\t\t\t\t\tYes <input type='radio' size='7' name='chrgvat' value='inc' {$vat_inc}>\n\t\t\t\t\tNo <input type='radio' size='7' name='chrgvat' value='exc' {$vat_exc}>\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>VAT Code</td>\n\t\t\t\t<td>{$Vatcodes}</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Account Paid to <input align='right' type='button' onClick=\"window.open('../core/acc-new2.php?update_parent=yes','accounts','width=700, height=400');\" value='New Account'></td>\n\t\t\t\t<td>{$accnts}</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td><br></td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td valign='center' align='right' colspan='2'><input type='submit' value='Confirm &raquo'></td>\n\t\t\t</tr>\n\t\t</table>\n\t\t<p>\n\t\t<table " . TMPL_tblDflts . " width='15%'>\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='pettycashbook-view.php'>View Petty Cash Requisitions</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 $add;
}
function edit($_GET)
{
    # Get vars
    extract($_GET);
    # validate input
    require_lib("validate");
    $v = new validate();
    $v->isOk($ledgid, "num", 1, 20, "Invalid Input Ledger Number.");
    # display errors, if any
    if ($v->isError()) {
        $confirm = "";
        $errors = $v->getErrors();
        foreach ($errors as $e) {
            $confirm .= "<li class='err'>" . $e["msg"] . "</li>";
        }
        $confirm .= "<p><input type='button' onClick='JavaScript:history.back();' value='&laquo; Correct submission'>";
        return $confirm;
    }
    # Get ledger settings
    core_connect();
    $sql = "SELECT * FROM in_ledgers WHERE ledgid='{$ledgid}'  AND div = '" . USER_DIV . "'";
    $ledRslt = db_exec($sql);
    if (pg_numrows($ledRslt) < 1) {
        return "<li>Invalid Input Ledger Number.</li>";
    }
    $led = pg_fetch_array($ledRslt);
    # accounts drop downs
    core_connect();
    # keep the charge vat option stable
    if ($led['chrgvat'] == 'yes') {
        $chrgy = "checked=yes";
        $chrgn = "";
    } else {
        $chrgy = "";
        $chrgn = "checked=yes";
    }
    # keep the date option stable
    if ($led['dateopt'] == 'system') {
        $dates = "checked=yes";
        $dateu = "";
    } else {
        $dates = "";
        $dateu = "checked=yes";
    }
    # keep the description option stable
    $num = "";
    $emp = "";
    $once = "";
    $edit = "";
    ${$led}['desopt'] = "checked=yes";
    # keep the refnum option stable
    $numr = "";
    $empr = "";
    $oncer = "";
    $editr = "";
    $led['refopt'] .= "r";
    ${$led}['refopt'] = "checked=yes";
    /* End Toggle Options */
    // Options Layout
    $Opts = "\r\n\t\t<center>\r\n\t\t<h3> High Speed Input Ledger Edit </h3>\r\n\t\t<form action='" . SELF . "' method='POST' name='form'>\r\n\t\t\t<input type='hidden' name='key' value='details'>\r\n\t\t\t<input type='hidden' name='ledgid' value='{$ledgid}'>\r\n\t\t<table " . TMPL_tblDflts . " align='center'>\r\n\t\t\t<tr>\r\n\t\t\t\t<th colspan='3'>Details</th>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td>Ledger Name</td>\r\n\t\t\t\t<td><input type='text' size='30' name='lname' value='{$led['lname']}'></td>\r\n\t\t\t</tr>\r\n\t\t\t<tr>\r\n\t\t\t\t<th><h4>Debit</h4></th>\r\n\t\t\t\t<th><h4>Credit</h4></th>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td align='center'>" . mkAccSelect("dtaccid", $led['dtaccid']) . "</td>\r\n\t\t\t\t<td align='center'>" . mkAccSelect("ctaccid", $led['ctaccid']) . "</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr><td><br></td></tr>\r\n\t\t\t<tr>\r\n\t\t\t\t<th colspan='3'>Options</th>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td>Number of Entries</td>\r\n\t\t\t\t<td><input type='text' size='10' name='numtran' value='{$led['numtran']}'></td>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td>Date Entry</td>\r\n\t\t\t\t<td><input type='radio' name='dateopt' value='system' {$dates}>System &nbsp;&nbsp; <input type='radio' name='dateopt' value='user' {$dateu}>User Input</td>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td>Charge Vat </td>\r\n\t\t\t\t<td><input type='radio' name='chrgvat' value='yes' {$chrgy}>Yes &nbsp;&nbsp; <input type='radio' name='chrgvat' value='no' {$chrgn}>No</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr>\r\n\t\t\t\t<th colspan='3'>Description</th>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td>Description</td>\r\n\t\t\t\t<td><input type='text' size='30' name='descript' value='{$led['descript']}'></td>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td rowspan='3' valign='top'>Options</td>\r\n\t\t\t\t<td><input type='radio' name='desopt' value='emp' {$emp}> Empty Input Box</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td><input type='radio' name='desopt' value='once' {$once}> Once Only Setting</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td><input type='radio' name='desopt' value='edit' {$edit}> Default Editable</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr>\r\n\t\t\t\t<th colspan='3'>Reference Number</th>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td>Reference Number</td>\r\n\t\t\t\t<td><input type='text' size='10' name='refnum' value='{$led['refnum']}'></td>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td rowspan='4' valign='top'>Options</td>\r\n\t\t\t\t<td><input type='radio' name='refopt' value='num' {$numr}> Auto Number</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td><input type='radio' name='refopt' value='emp' {$empr}> Empty Input Box</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td><input type='radio' name='refopt' value='once' {$oncer}> Once Only Setting</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td><input type='radio' name='refopt' value='edit' {$editr}> Default Editable Input</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr><td><br></td></tr>\r\n\t\t\t<tr>\r\n\t\t\t\t<td align='right'><input type='button' value='&laquo Back' onClick='javascript:history.back()'></td>\r\n\t\t\t\t<td align='right'><input type='submit' value='Continue &raquo'></td>\r\n\t\t\t</tr>\r\n\t\t</table>\r\n\t\t</form>\r\n\t\t<p>\r\n\t\t<table border=0 cellpadding='2' cellspacing='1' width=15%>\r\n\t\t\t<tr>\r\n\t\t\t\t<th>Quick Links</th>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td align='center'><a href='ledger-view.php'>View High Speed Input Ledgers</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td align='center'><a href='../main.php'>Main Menu</td>\r\n\t\t\t</tr>\r\n\t\t</table>";
    return $Opts;
}
function details($_POST)
{
    # Get vars
    extract($_POST);
    if (!isset($numcont)) {
        $numcont = 1;
    }
    # validate input
    require_lib("validate");
    $v = new validate();
    $v->isOk($date_day, "num", 1, 2, "Invalid to Date day.");
    $v->isOk($date_month, "num", 1, 2, "Invalid to Date month.");
    $v->isOk($date_year, "num", 1, 4, "Invalid to Date Year.");
    $date = $date_day . "-" . $date_month . "-" . $date_year;
    if (!checkdate($date_month, $date_day, $date_year)) {
        $v->isOk($date, "num", 1, 1, "Invalid date.");
    }
    $v->isOk($accid, "num", 1, 50, "Invalid Account to be Debited.");
    $v->isOk($tran, "string", 1, 3, "Invalid type of transaction.");
    $v->isOk($numcont, "num", 1, 10, "Invalid number of contra accounts.");
    # display errors, if any
    if ($v->isError()) {
        $confirm = "";
        $errors = $v->getErrors();
        foreach ($errors as $e) {
            $confirm .= "<li class='err'>" . $e["msg"] . "</li>";
        }
        return $confirm . slctacc($_POST);
    }
    $blocked_date_from = getCSetting("BLOCKED_FROM");
    $blocked_date_to = getCSetting("BLOCKED_TO");
    if (strtotime($date) >= strtotime($blocked_date_from) and strtotime($date) <= strtotime($blocked_date_to) and !user_is_admin(USER_ID)) {
        return "<li class='err'>Period Range Is Blocked. Only an administrator can process entries within this period.</li>";
    }
    # get account
    $accRs = get("core", "*", "accounts", "accid", $accid);
    $macc = pg_fetch_array($accRs);
    $temprefnum = getrefnum();
    /*refnum*/
    $jump_bot = "";
    if (isset($another)) {
        $jump_bot = "\n\t\t\t<script>\n\t\t\t\twindow.location.hash='bottom';\n\t\t\t</script>";
        $numcont++;
    }
    // Deatils
    $details = "\n\t\t<p>\n\t\t<h3> Journal transactions details</h3>\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t<input type='hidden' name='key' value='confirm'>\n\t\t\t<input type='hidden' name='accid' value='{$accid}'>\n\t\t\t<input type='hidden' name='tran' value='{$tran}'>\n\t\t\t<input type='hidden' name='numcont' value='{$numcont}'>\n\t\t\t<input type='hidden' name='date_day' value='{$date_day}'>\n\t\t\t<input type='hidden' name='date_month' value='{$date_month}'>\n\t\t\t<input type='hidden' name='date_year' value='{$date_year}'>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t<tr>\n\t\t\t\t<th>Date</th>\n\t\t\t\t<th>Ref num</th>\n\t\t\t\t<th>Debit <input align='right' type='button' onClick=\"window.open('acc-new2.php?update_parent=yes&set_key=details','accounts','width=700, height=400');\" value='New Account'></th>\n\t\t\t\t<th>Credit <input align='right' type='button' onClick=\"window.open('acc-new2.php?update_parent=yes&set_key=details','accounts','width=700, height=400');\" value='New Account'></th>\n\t\t\t\t<th>Amount</th>\n\t\t\t\t<th>Description</th>\n\t\t\t</tr>";
    for ($i = 0; $i != $numcont; $i++) {
        if (isset($amount[$i])) {
            $ta = $amount[$i];
        } else {
            $ta = "";
        }
        if (isset($descript[$i])) {
            $da = $descript[$i];
        } else {
            $da = "";
        }
        if (!isset($caccid[$i])) {
            $tc = 0;
        } else {
            $tc = $caccid[$i];
        }
        if (!isset($each_day[$i])) {
            $each_day[$i] = $date_day;
            $each_month[$i] = $date_month;
            $each_year[$i] = $date_year;
        }
        if (!isset($refnum[$i])) {
            $refnum[$i] = $temprefnum;
        }
        # details
        $details .= "\n\t\t\t<tr bgcolor=" . bgcolorg() . ">\n\t\t\t\t<td>" . mkDateSelecta("each", $i, $each_year[$i], $each_month[$i], $each_day[$i]) . "</td>\n\t\t\t\t<td align='center'><input type='text' size='5' name='refnum[]' value='{$refnum[$i]}'></td>";
        core_connect();
        $sql = "SELECT * FROM accounts WHERE accid != '{$accid}' AND div = '" . USER_DIV . "' ORDER BY accname ASC";
        $accRslt = db_exec($sql);
        if (pg_numrows($accRslt) < 1) {
            return "<li>There are No accounts in Cubit.</li>";
        }
        $accs = mkAccSelect("caccid[]", $tc);
        // 		$accs = "<select name='caccid[]'>";
        // 		while($acc = pg_fetch_array($accRslt)){
        // 			# Check Disable
        // 			if(isDisabled($acc['accid']))
        // 				continue;
        // 			if($tc == $acc['accid']) {
        // 				$sel = "selected";
        // 			} else {
        // 				$sel = "";
        // 			}
        // 			$accs .= "<option value='$acc[accid]' $sel>$acc[topacc]/$acc[accnum] - $acc[accname]</option>";
        // 		}
        // 		$accs .= "</select>";
        if ($tran == 'dt') {
            $accts = "<td>{$macc['topacc']}/{$macc['accnum']} - {$macc['accname']}</td><td>{$accs}</td>";
        } else {
            $accts = "<td>{$accs}</td><td>{$macc['topacc']}/{$macc['accnum']} - {$macc['accname']}</td>";
        }
        $details .= "\n\t\t\t\t{$accts}\n\t\t\t\t<td><input type='text' size='7' name='amount[]' value='{$ta}'></td>\n\t\t\t\t<td><input type='text' size='20' name='descript[]' value='{$da}'></td>\n\t\t\t</tr>";
    }
    $details .= "\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td colspan='4' align='right'><b>Total:</b></td>\n\t\t\t<td>" . CUR . " " . sprint(array_sum($amount)) . "</td>\n\t\t\t<td></td>\n\t\t</tr>";
    $details .= "\n\t\t\t<tr>\n\t\t\t\t<td><input type='submit' name='back' value='&laquo; Correction'></td>\n\t\t\t\t<td><input type='submit' name='another' value='Add Another'></td>\n\t\t\t\t<td valign='center' colspan='2' align='right'><input type='submit' value='Confirm &raquo;'></td>\n\t\t\t</tr>\n\t\t</form>\n\t\t</table>\n\t\t<a name='bottom'>\n\t\t{$jump_bot}\n\t\t<table border='0' cellpadding='2' cellspacing='1' width='15%'>\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 align='center'><a href='../reporting/index-reports.php'>Financials</a></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td align='center'><a href='trans-new.php'>Journal Transactions</td>\n\t\t\t</tr>\n\t\t\t<script>document.write(getQuicklinkSpecial());</script>\n\t\t</table>";
    return $details;
}
function confirmDeduct($_POST)
{
    # get vars
    extract($_POST);
    # validate input
    require_lib("validate");
    $v = new validate();
    $v->isOk($deduction, "string", 1, 100, "Invalid deduction name.");
    $v->isOk($creditor, "string", 1, 100, "Invalid creditor name.");
    $v->isOk($refno, "string", 1, 20, "Invalid reference number.");
    $v->isOk($catid, "string", 1, 20, "Invalid Category number.");
    $v->isOk($details, "string", 0, 100, "Invalid creditor details.");
    $v->isOk($taxable, "string", 1, 3, "Invalid taxablility option.");
    $v->isOk($type, "string", 1, 15, "Invalid type.");
    # display errors, if any
    if ($v->isError()) {
        $confirmCust = "";
        $errors = $v->getErrors();
        foreach ($errors as $e) {
            $confirmCust .= "<li class='err'>" . $e["msg"] . "</li>";
        }
        $confirmCust .= "<p><input type='button' onClick='JavaScript:history.back();' value='&laquo; Correct submission'>";
        return $confirmCust;
    }
    # connect to db
    core_connect();
    // 	$dedacc= "<select name='accid' style='width: 230'>";
    // 		$sql = "SELECT * FROM accounts WHERE catid = '$catid' AND div = '".USER_DIV."'";
    // 		$accRslt = db_exec($sql);
    // 		$numrows = pg_numrows($accRslt);
    // 		if(empty($numrows)){
    // 			$paid = "There are no Balance accounts yet in Cubit.";
    // 		}else{
    // 			$prevtop = "";
    // 			while($acc = pg_fetch_array($accRslt)){
    // 				if(isb($acc['accid'])) {
    // 					continue;
    // 				}
    // 				if ( $acc["topacc"] == $prevtop && $acc["accnum"] != "000" ) {
    // 					$x = "&nbsp;&nbsp;-&nbsp;&nbsp;$acc[topacc]/$acc[accnum]";
    // 				} else {
    // 					$x = "$acc[topacc]/$acc[accnum]";
    // 					$prevtop = $acc["topacc"];
    // 				}
    // 				if (isset($accid) AND $accid == $acc['accid']){
    // 					$dedacc .= "<option value='$acc[accid]' selected>$x $acc[accname]</option>";
    // 				}else {
    // 					$dedacc .= "<option value='$acc[accid]'>$x $acc[accname]</option>";
    // 				}
    // 			}
    // 		}
    // 	$dedacc .= "</select>";
    // Expense account
    // 	$expacc = "<select name='expaccid' style='width: 230'>";
    // 	$sql = "SELECT * FROM accounts WHERE (catid='E10' OR catid='I10')AND div='".USER_DIV."'";
    // 	$expRslt = db_exec($sql);
    // 	$prevtop = "";
    // 	while($acc = pg_fetch_array($expRslt)) {
    // 		if(isb($acc['accid'])) {
    // 			continue;
    // 		}
    // 		if ( $acc["topacc"] == $prevtop && $acc["accnum"] != "000" ) {
    // 			$x = "&nbsp;&nbsp;-&nbsp;&nbsp;$acc[topacc]/$acc[accnum]";
    // 		} else {
    // 			$x = "$acc[topacc]/$acc[accnum]";
    // 			$prevtop = $acc["topacc"];
    // 		}
    // 		if (isset ($expaccid) AND $expaccid == $acc['accid']){
    // 			$expacc .= "<option value='$acc[accid]' selected>$x $acc[accname]</option>";
    // 		}else {
    // 			$expacc .= "<option value='$acc[accid]'>$x $acc[accname]</option>";
    // 		}
    // 	}
    if (isset($type) and $type == "Percentage") {
        # get current scales added
        foreach ($scale_from as $each => $own) {
            $own += 0;
            $scale_to[$each] += 0;
            $scale_amount[$each] += 0;
            # check for zero values
            if ($scale_to[$each] == "0" or $scale_amount[$each] == "0") {
                continue;
            }
            # first value can be zero, but cant then be greater than the to value
            if ($own >= $scale_to[$each]) {
                continue;
            }
            if (isset($remove_scale) and is_array($remove_scale)) {
                $rem = array_keys($remove_scale);
                if ($each == $rem[0]) {
                    continue;
                }
            }
            $scales_hidden .= "\n\t\t\t\t<input type='hidden' name='scale_from[]' value='{$own}'>\n\t\t\t\t<input type='hidden' name='scale_to[]' value='{$scale_to[$each]}'>\n\t\t\t\t<input type='hidden' name='scale_amount[]' value='{$scale_amount[$each]}'>";
            $scales_list .= "\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>{$own}</td>\n\t\t\t\t\t<td>{$scale_to[$each]}</td>\n\t\t\t\t\t<td>{$scale_amount[$each]} <input type='submit' name='remove_scale[{$each}]' value='Remove'></td>\n\t\t\t\t</tr>";
        }
        # check for cross linked pairs
        if (!isset($new_scale_from) or !isset($new_scale_to) or !isset($new_scale_amount) or empty($new_scale_from) or empty($new_scale_to) or empty($new_scale_amount) or search_scale_array($scale_from, $scale_to, $new_scale_from) or search_scale_array($scale_from, $scale_to, $new_scale_to)) {
            $scale_error = "<tr><td colspan='3'><li class='err'>Duplicate Or Overlapping Scale Exists</li></td></tr>";
        } else {
            $scale_error = "";
            $scales_hidden .= "\n\t\t\t\t<input type='hidden' name='scale_from[]' value='{$new_scale_from}'>\n\t\t\t\t<input type='hidden' name='scale_to[]' value='{$new_scale_to}'>\n\t\t\t\t<input type='hidden' name='scale_amount[]' value='{$new_scale_amount}'>";
            $scales_list .= "\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>{$new_scale_from}</td>\n\t\t\t\t\t<td>{$new_scale_to}</td>\n\t\t\t\t\t<td>{$new_scale_amount} <input type='submit' name='remove_scale[" . ($each + 1) . "]' value='Remove'></td>\n\t\t\t\t</tr>";
        }
        $scales_display = "\n\t\t\t{$scales_hidden}\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<th colspan='3'>Percentage Deduction Scales</th>\n\t\t\t</tr>\n\t\t\t{$scale_error}\n\t\t\t<tr>\n\t\t\t\t<th>From Amount</th>\n\t\t\t\t<th>To Amount</th>\n\t\t\t\t<th>Percentage</th>\n\t\t\t</tr>\n\t\t\t{$scales_list}\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td><input type='text' size='5' name='new_scale_from'></td>\n\t\t\t\t<td><input type='text' size='5' name='new_scale_to'></td>\n\t\t\t\t<td>\n\t\t\t\t\t<input type='text' size='5' name='new_scale_amount'>\n\t\t\t\t\t<input type='submit' name='submit_scale' value='Add'>\n\t\t\t\t</td>\n\t\t\t</tr>";
    } else {
        $scales_display = "";
    }
    $confirmDeduct = "\n\t\t<h3>Confirm new Salary Deduction</h3>\n\t\t<form action='" . SELF . "' method='POST'>\n\t\t\t<input type='hidden' name='key' value='write'>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t<input type='hidden' name='deduction' value='{$deduction}'>\n\t\t\t<input type='hidden' name='creditor' value='{$creditor}'>\n\t\t\t<input type='hidden' name='refno' value='{$refno}'>\n\t\t\t<input type='hidden' name='details' value='{$details}'>\n\t\t\t<input type='hidden' name='taxable' value='{$taxable}'>\n\t\t\t<input type='hidden' name='type' value='{$type}'>\n\t\t\t<input type='hidden' name='catid' value='{$catid}'>\n\t\t\t<tr>\n\t\t\t\t<th>Field</th>\n\t\t\t\t<th>Value</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Name of deduction</td>\n\t\t\t\t<td align='center'>{$deduction}</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Creditor name</td>\n\t\t\t\t<td align='center'>{$creditor}</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Reference no.</td>\n\t\t\t\t<td align='center'>{$refno}</td>\n\t\t\t</tr>";
    if ($creditor == "In House") {
        $confirmDeduct .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Expense Account</td>\n\t\t\t\t<td align='center'>" . mkAccSelect("expaccid", $expaccid, ACCTYPE_IE) . "</td>\n\t\t\t</tr>\n\t\t\t<input type='hidden' name='accid' value='0'>";
    } else {
        $confirmDeduct .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Creditor Account</td>\n\t\t\t\t<td align='center'>" . mkAccSelect("accid", $accid, ACCTYPE_B) . "</td>\n\t\t\t</tr>\n\t\t\t<input type='hidden' name='expaccid' value='0'>";
    }
    $confirmDeduct .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Creditor details</td>\n\t\t\t\t<td align='center'>{$details}</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Deduct Before PAYE</td>\n\t\t\t\t<td align='center'>{$taxable}</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Deduction Type</td>\n\t\t\t\t<td align='center'>{$type}</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td colspan='2' align='right'><input type='submit' name='submit_ded' value='Write &raquo;'></td>\n\t\t\t</tr>\n\t\t</table>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t{$scales_display}\n\t\t</table>\n\t\t</form>" . mkQuickLinks(ql("../admin-employee-add.php", "Add Employee"), ql("../admin-employee-view.php", "View Employees"));
    return $confirmDeduct;
}
function enterDeduct($refno)
{
    # validate input
    require_lib("validate");
    $v = new validate();
    $v->isOk($refno, "string", 1, 20, "Invalid reference number.");
    # display errors, if any
    if ($v->isError()) {
        $confirmCust = "";
        $errors = $v->getErrors();
        foreach ($errors as $e) {
            $confirmCust .= "<li class='err'>" . $e["msg"] . "</li>";
        }
        $confirmCust .= "<p><input type='button' onClick='JavaScript:history.back();' value='&laquo; Correct submission'>";
        return $confirmCust;
    }
    # get deduction info
    db_connect();
    $sql = "SELECT * FROM salded WHERE refno='{$refno}' AND div = '" . USER_DIV . "'";
    $salRslt = db_exec($sql) or errDie("Unable to select salary deduction info from database.");
    if (pg_numrows($salRslt) < 1) {
        return "Invalid reference number.";
    }
    $mySal = pg_fetch_array($salRslt);
    core_connect();
    // 	$dedacc = "<select name='accid' style='width: 230'>";
    // 	$sql = "SELECT * FROM accounts WHERE (catid='E10' OR catid='I10') AND div = '".USER_DIV."'";
    // 	$accRslt = db_exec($sql);
    // 	$numrows = pg_numrows($accRslt);
    // 	if(empty($numrows)){
    // 		$paid = "There are no Balance accounts yet in Cubit.";
    // 	}else{
    // 		while($acc = pg_fetch_array($accRslt)){
    // 			if ( $acc["accid"] == $mySal["accid"] ) {
    // 				$sel = "selected";
    // 			} else {
    // 				$sel = "";
    // 			}
    // 			$dedacc .= "<option $sel value='$acc[accid]'>$acc[accname]</option>";
    // 		}
    // 	}
    // 	$dedacc .= "</select>";
    $arrtype = array("Amount" => "Amount", "Percentage" => "Percentage");
    $seltype = extlib_cpsel("type", $arrtype, $mySal["type"]);
    $check1 = "";
    $check2 = "";
    if (isset($mySal["type"]) and $mySal["type"] == "Percentage") {
        $check2 = "checked='yes'";
    } else {
        $check1 = "checked='yes'";
    }
    if ($mySal['creditor'] == "In House") {
        $accountsdrop = mkAccSelect("accid", $accid, ACCTYPE_IE);
    } else {
        $accountsdrop = mkAccSelect("accid", $accid, ACCTYPE_B);
    }
    $enterDeduct = "\n\t\t<script>\n\t\t\tfunction inHouse() {\n\t\t\t\tfrm = getObjectById('dedfrm');\n\t\t\t\tfrm.creditor.value='In House';\n\t\t\t\tfrm.details.value='In House';\n\t\t\t}\n\t\t</script>\n\t\t<h3>Edit salary deduction</h3>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t<form id='dedfrm' action='" . SELF . "' method='POST'>\n\t\t\t<input type='hidden' name='key' value='confirm'>\n\t\t\t<input type='hidden' name='refno' value='{$refno}'>\n\t\t\t<tr>\n\t\t\t\t<th>Field</th>\n\t\t\t\t<th>Value</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Name of deduction</td>\n\t\t\t\t<td align='center'><input type='text' size='20' name='deduction' value='{$mySal['deduction']}'></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Creditor name</td>\n\t\t\t\t<td align='center'><input type='hidden' name='creditor' value='{$mySal['creditor']}'>{$mySal['creditor']}</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Reference no.</td>\n\t\t\t\t<td align='center'>{$mySal['refno']}</td>\n\t\t\t</tr>";
    if ($mySal['creditor'] == "In House") {
        $enterDeduct .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Expense Account</td>\n\t\t\t\t<td align='center'>" . mkAccSelect("expaccid", $expaccid, ACCTYPE_IE) . "</td>\n\t\t\t</tr>\n\t\t\t<input type='hidden' name='accid' value='0'>";
    } else {
        $enterDeduct .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Creditor Account</td>\n\t\t\t\t<td align='center'>" . mkAccSelect("accid", $accid, ACCTYPE_B) . "</td>\n\t\t\t</tr>\n\t\t\t<input type='hidden' name='expaccid' value='0'>";
    }
    $enterDeduct .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Creditor details</td>\n\t\t\t\t<td align='center'><input type='text' size='20' name='details' value='{$mySal['details']}'></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Deduction Type</td>\n\t\t\t\t<td>\n\t\t\t\t\t<input type='radio' name='type' value='Amount' {$check1}> Amount\n\t\t\t\t\t<input type='radio' name='type' value='Percentage' {$check2}> Percent\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td colspan='2' align='right'><input type='submit' value='Confirm &raquo;'></td>\n\t\t\t</tr>\n\t\t</form>\n\t\t</table>" . mkQuickLinks(ql("../admin-employee-add.php", "Add Employee"), ql("../admin-employee-view.php", "View Employees"));
    return $enterDeduct;
}
function add($_POST, $err = "")
{
    # Get vars
    extract($_POST);
    if (!isset($rnum)) {
        $rnum = 1;
    }
    if ($rnum < 1) {
        return "<li class='err'> - Invalid number of requisitions</li>";
    }
    core_connect();
    # Check available funds
    $cashacc = gethook("accnum", "bankacc", "name", "Petty Cash");
    $sql = "SELECT (debit - credit) as bal FROM trial_bal WHERE accid = '{$cashacc}' AND month='" . (int) date("m") . "' AND div = '" . USER_DIV . "'";
    $accbRslt = db_exec($sql);
    if (pg_numrows($accbRslt) < 1) {
        return "<li class='err'> Petty Cash Account not found.</li>";
    }
    $accb = pg_fetch_array($accbRslt);
    $accb['bal'] = sprint($accb['bal']);
    # mourn if the is no money
    if ($accb['bal'] < 1) {
        return "<li> There are no Petty Cash funds available.</li>";
    }
    $jump_bot = "";
    if (isset($another)) {
        $jump_bot = "\n\t\t\t<script>\n\t\t\t\twindow.location.hash='bottom';\n\t\t\t</script>";
        $rnum++;
    }
    $reqs = "";
    for ($i = 0; $i < $rnum; $i++) {
        core_connect();
        $check1 = "";
        $check2 = "";
        $check3 = "";
        if (isset($chrgvat[$i]) and $chrgvat[$i] == "nov") {
            $check3 = "checked='yes'";
        } elseif (isset($chrgvat[$i]) and $chrgvat[$i] == "exc") {
            $check2 = "checked='yes'";
        } else {
            $check1 = "checked='yes'";
        }
        if (!isset($o_day[$i])) {
            $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);
                $o_year[$i] = $date_arr[0];
                $o_month[$i] = $date_arr[1];
                $o_day[$i] = $date_arr[2];
            } else {
                $o_year[$i] = date("Y");
                $o_month[$i] = date("m");
                $o_day[$i] = date("d");
            }
        }
        $reqs .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td nowrap>" . mkDateSelectA("o", $i, $o_year[$i], $o_month[$i], $o_day[$i]) . "</td>\n\t\t\t\t<td><input type='text' size='20' name='name[]' value='{$name[$i]}'></td>\n\t\t\t\t<td nowrap valign='center'>" . CUR . " <input type='text' size='6' name='amount[]' value='{$amount[$i]}'></td>\n\t\t\t\t<td><input type='text' size='26' name='details[]' value='{$details[$i]}'></td>\n\t\t\t\t<td valign='center'>\n\t\t\t\t\t<input type='radio' size='7' name='chrgvat[{$i}]' value='inc' {$check1}> Yes<br>\n\t\t\t\t\t<input type='radio' size='7' name='chrgvat[{$i}]' value='exc' {$check2}> No<br>\n\t\t\t\t\t<input type='radio' size='7' name='chrgvat[{$i}]' value='nov' {$check3}> No VAT\n\t\t\t\t</td>\n\t\t\t\t<td>" . mkAccSelect("accid[{$i}]", $accid[$i]) . "</td>\n\t\t\t</tr>";
    }
    $reqs .= "\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td colspan='2' align='right'><b>Total:</b></td>\n\t\t\t<td>" . CUR . " " . sprint(array_sum($amount)) . "</td>\n\t\t\t<td colspan='3'></td>\n\t\t</tr>";
    // Layout
    $add = "\n\t\t<h3>Add Petty Cash Requisistions</h3>\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t<table " . TMPL_tblDflts . " width='300'>\n\t\t\t<input type='hidden' name='key' value='confirm'>\n\t\t\t<input type='hidden' size='3' name='rnum' value='{$rnum}'>\n\t\t\t<tr>\n\t\t\t\t<td colspan='2'>{$err}</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<th>Field</th>\n\t\t\t\t<th>Value</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Available Funds</td>\n\t\t\t\t<td><input type='hidden' name='bal' value='{$accb['bal']}'>" . CUR . " {$accb['bal']}</td>\n\t\t\t</tr>\n\t\t</table>\n\t\t<p>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t<tr>\n\t\t\t\t<th>Date</th>\n\t\t\t\t<th>Paid to</th>\n\t\t\t\t<th>Amount</th>\n\t\t\t\t<th>Details</th>\n\t\t\t\t<th>VAT Inclusive</th>\n\t\t\t\t<th>Account Paid to <input align='right' type='button' onClick=\"window.open('../core/acc-new2.php?update_parent=yes','accounts','width=700, height=400');\" value='New Account'></th>\n\t\t\t</tr>\n\t\t\t{$reqs}\n\t\t\t<tr><td><br></td></tr>\n\t\t\t<tr>\n\t\t\t\t<td><input type='submit' name='another' value='Add Another'></td>\n\t\t\t\t<td valign='center'><input type='submit' value='Confirm >'></td>\n\t\t\t</tr>\n\t\t</table>\n\t\t<a name='bottom'>\n\t\t{$jump_bot}\n\t\t<p>\n\t\t<table " . TMPL_tblDflts . " width='15%'>\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='pettycashbook-view.php'>View Petty Cash Requisitions</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 $add;
}
function enter($_POST)
{
    $shownewaccount = "";
    extract($_POST);
    if (isset($ledger) && $ledger != "sel") {
        $ledgers = $ledger . "<input type='hidden' name='ledger' value='{$ledger}'>";
        if ($ledger == "Customer Ledger") {
            db_conn('cubit');
            $Sl = "SELECT cusnum,accno,surname FROM customers WHERE location='loc' ORDER BY surname";
            $Ri = db_exec($Sl) or errDie("Unable to select customer");
            $accounts = "\n\t\t\t\t<select name='account' onchange='if (this.value==\"multi\") document.form.submit();'>\n\t\t\t\t\t<option value='sel'>Select Customer</option>\n\t\t\t\t\t<option value='multi'>Multiple Customers/One Receipt</option>";
            while ($data = pg_fetch_array($Ri)) {
                if (isset($account) && $account == $data['cusnum']) {
                    $sel = "selected";
                } else {
                    $sel = "";
                }
                $accounts .= "<option value='{$data['cusnum']}' {$sel}>{$data['surname']}</option>";
            }
            $accounts .= "</select>";
        } elseif ($ledger == "Employee Ledger") {
            db_conn('cubit');
            $Sl = "SELECT empnum,sname,fnames FROM employees ORDER BY sname,fnames";
            $Ri = db_exec($Sl) or errDie("Unable to get employee data.");
            $accounts = "\n\t\t\t\t<select name='account'>\n\t\t\t\t\t<option value='sel'>Select Employee</option>";
            while ($data = pg_fetch_array($Ri)) {
                if (isset($account) && $account == $data['empnum']) {
                    $sel = "selected";
                } else {
                    $sel = "";
                }
                $accounts .= "<option value='{$data['empnum']}' {$sel}>{$data['sname']}, {$data['fnames']}</option>";
            }
            $accounts .= "</select>";
        } elseif ($ledger == "General Ledger") {
            $shownewaccount = "<input align='right' type='button' onClick=\"window.open('../core/acc-new2.php?update_parent=yes','accounts','width=700, height=400');\" value='New Account'>";
            db_conn('core');
            $Sl = "SELECT accid,accname,topacc,accnum FROM trial_bal WHERE period='" . PRD_DB . "' ORDER BY topacc,accnum";
            $Ri = db_exec($Sl) or errDie("Unable to get accounts.");
            $accounts = mkAccSelect("account", $account);
            // 			$accounts = "
            // 				<select name='account'>
            // 					<option value='sel'>Select Account</option>";
            // 			while($data = pg_fetch_array($Ri)) {
            // 				if(isb($data['accid'])) {
            // 					continue;
            // 				}
            // 				if(isset($account) && $account == $data['accid']) {
            // 					$sel = "selected";
            // 				} else {
            // 					$sel = "";
            // 				}
            // 				$accounts .= "<option value='$data[accid]' $sel>$data[topacc]/$data[accnum] $data[accname]</option>";
            // 			}
            // 			$accounts .= "</select>";
        } elseif ($ledger == "Inventory Ledger") {
            db_conn('cubit');
            $Sl = "SELECT stkid,stkcod FROM stock  ORDER BY stkcod";
            $Ri = db_exec($Sl) or errDie("unable to get stock.");
            $accounts = "\n\t\t\t\t<select name='account'>\n\t\t\t\t\t<option value='sel'>Select Stock</option>";
            while ($data = pg_fetch_array($Ri)) {
                if (isset($account) && $account == $data['stkid']) {
                    $sel = "selected";
                } else {
                    $sel = "";
                }
                $accounts .= "<option value='{$data['stkid']}' {$sel}>{$data['stkcod']}</option>";
            }
            $accounts .= "</select>";
        } elseif ($ledger == "Supplier Ledger") {
            db_conn('cubit');
            $Sl = "SELECT supid,supname FROM suppliers  WHERE location='loc' ORDER BY supname";
            $Ri = db_exec($Sl) or errDie("unable to get suppliers.");
            $accounts = "\n\t\t\t\t<select name='account'>\n\t\t\t\t\t<option value='sel'>Select Supplier</option>";
            while ($data = pg_fetch_array($Ri)) {
                if (isset($account) && $account == $data['supid']) {
                    $sel = "selected";
                } else {
                    $sel = "";
                }
                $accounts .= "<option value='{$data['supid']}' {$sel}>{$data['supname']}</option>";
            }
            $accounts .= "</select>";
        }
        if ($ledger == "Employee Ledger") {
            $types = "\n\t\t\t\t<select name='type' onChange='javascript:document.form.submit();'>\n\t\t\t\t\t<option value='sel'>Select Type</option>\n\t\t\t\t\t<option value='payment'>Payment</option>\n\t\t\t\t</select>";
        } else {
            $types = "\n\t\t\t\t<select name='type' onChange='javascript:document.form.submit();'>\n\t\t\t\t\t<option value='sel'>Select Type</option>\n\t\t\t\t\t<option value='payment'>Payment</option>\n\t\t\t\t\t<option value='receipt'>Receipt</option>\n\t\t\t\t</select>";
        }
    } else {
        $ledgers = "\n\t\t\t<select name='ledger' onChange='javascript:document.form.submit();'>\n\t\t\t\t<option value='sel'>Select Ledger</option>\n\t\t\t\t<option value='Customer Ledger'>Customer Ledger</option>\n\t\t\t\t<option value='Employee Ledger'>Employee Ledger</option>\n\t\t\t\t<option value='General Ledger'>General Ledger</option>\n\t\t\t\t<option value='Inventory Ledger'>Inventory Ledger</option>\n\t\t\t\t<option value='Supplier Ledger'>Supplier Ledger</option>\n\t\t\t</select>";
        $accounts = "";
        $types = "";
    }
    if (isset($ledger) && $ledger == "Customer Ledger" && isset($account) && $account == "multi") {
        header("Location: bank-recpt-multi-debtor.php");
        exit;
    } else {
        if (isset($ledger) && $ledger != "sel" && isset($account) && $account != "sel" && isset($type) && $type != "sel") {
            if ($ledger == "Customer Ledger") {
                if ($type == "payment") {
                    header("Location: bank-pay-cus.php?cusnum={$account}");
                    exit;
                } elseif ($type == "receipt") {
                    header("Location: bank-recpt-inv.php?cusnum={$account}&e=yes");
                    exit;
                }
            } elseif ($ledger == "Employee Ledger") {
                if ($type == "payment") {
                    header("Location: ../salwages/employee-pay.php?id={$account}&bankpay=t");
                    exit;
                }
            } elseif ($ledger == "General Ledger") {
                if ($type == "payment") {
                    header("Location: bank-pay-add.php?account={$account}");
                    exit;
                } elseif ($type == "receipt") {
                    header("Location: bank-recpt-add.php?account={$account}");
                    exit;
                }
            } elseif ($ledger == "Supplier Ledger") {
                if ($type == "payment") {
                    header("Location: bank-pay-supp.php?supid={$account}&e=yes");
                    exit;
                } elseif ($type == "receipt") {
                    header("Location: bank-recpt-supp.php?account={$account}&e=yes");
                    exit;
                }
            } elseif ($ledger == "Inventory Ledger") {
                if ($type == "payment") {
                    header("Location: stock-tran.php?account={$account}&type=payment&e=yes");
                    exit;
                } elseif ($type == "receipt") {
                    header("Location: stock-tran.php?account={$account}&type=receipt&e=yes");
                    exit;
                }
            }
        }
    }
    $out = "\n\t\t<h3>Cashbook Entry</h3>\n\t\t<table border='0' cellpadding='1' cellspacing='1'>\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t<tr>\n\t\t\t\t<th>Select Ledger</th>\n\t\t\t\t<th>Select Account {$shownewaccount}</th>\n\t\t\t\t<th>Type</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>{$ledgers}</td>\n\t\t\t\t<td>{$accounts}</td>\n\t\t\t\t<td>{$types}</td>\n\t\t\t</tr>\n\t\t</form>\n\t\t</table>";
    return $out;
}
function add($_POST)
{
    extract($_POST);
    if (!isset($name)) {
        $bankid = 0;
        $laccid = 0;
        $day = date("d");
        $mon = date("m");
        $year = date("Y");
        $name = "Petty Cash";
        $descript = "";
        $cheqnum = "";
        $amount = "";
        $frm = "";
    }
    if (!isset($laccid)) {
        $laccid = 0;
    }
    if (!isset($bankid)) {
        $bankid = 0;
    }
    core_connect();
    # Get Petty cash account
    $cashacc = gethook("accnum", "bankacc", "name", "Petty Cash");
    # Get account name for thy lame User's Sake
    $accRslt = get("core", "*", "accounts", "accid", $cashacc);
    if (pg_numrows($accRslt) < 1) {
        return "<li class='err'> Petty Cash Account not found.</li>";
    }
    $acc = pg_fetch_array($accRslt);
    # Accounts Drop down selections
    core_connect();
    $sql = "SELECT * FROM accounts WHERE div = '" . USER_DIV . "' ORDER BY topacc,accnum ASC";
    $laccRslt = db_exec($sql);
    if (pg_numrows($laccRslt) < 1) {
        return "<li class='err'> There are no accounts yet in Cubit.</li>";
    }
    $glacc = mkAccSelect("laccid", $laccid);
    // 	$glacc = "<select name='laccid'>";
    // 	while($lacc = pg_fetch_array($laccRslt)){
    // 		# Check Disable
    // 		if(isDisabled($lacc['accid']))
    // 			continue;
    // 		if($laccid == $lacc['accid']) {
    // 			$sel = "selected";
    // 		} else {
    // 			$sel = "";
    // 		}
    // 		$glacc .= "<option value='$lacc[accid]' $sel>$lacc[topacc]/$lacc[accnum] - $lacc[accname]</option>";
    // 	}
    // 	$glacc .= "</select>";
    db_connect();
    $sql = "SELECT * FROM bankacct WHERE btype != 'int' AND div = '" . USER_DIV . "' ORDER BY bankname,branchname";
    $banks = db_exec($sql);
    if (pg_numrows($banks) < 1) {
        return "\n\t\t\t<li class='err'> There are no bank accounts yet on the Database.</li>\n\t\t\t<p><input type='button' onClick='JavaScript:history.back();' value='&laquo; Correct Selection'>";
    }
    $banksel = "<select name='bankid'>";
    while ($bacc = pg_fetch_array($banks)) {
        if ($bacc['bankid'] == $bankid) {
            $sel = "selected";
        } else {
            $sel = "";
        }
        $banksel .= "<option value='{$bacc['bankid']}' {$sel}>{$bacc['accname']} - {$bacc['bankname']} ({$bacc['acctype']})</option>";
    }
    $banksel .= "</select>";
    if ($frm == "gl") {
        $c1 = "";
        $c2 = "checked=yes";
    } else {
        $c1 = "checked=yes";
        $c2 = "";
    }
    if (!isset($date_day)) {
        $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);
            $date_year = $date_arr[0];
            $date_month = $date_arr[1];
            $date_day = $date_arr[2];
        } else {
            $date_year = date("Y");
            $date_month = date("m");
            $date_day = date("d");
        }
    }
    // Layout
    $add = "\n\t\t<h3>Funds transfer to Petty cash</h3>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t<form action='" . SELF . "' method='POST' name='form'>\n\t\t\t<input type='hidden' name='key' value='confirm'>\n\t\t\t<tr>\n\t\t\t\t<th width='40%'>Field</th>\n\t\t\t\t<th>Value</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td><input type='radio' name='frm' value='bnk' {$c1}>From Bank Account</td>\n\t\t\t\t<td>{$banksel}</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td><input type='radio' name='frm' value='gl' {$c2}>From Account <input align='right' type='button' onClick=\"window.open('../core/acc-new2.php?update_parent=yes','accounts','width=700, height=400');\" value='New Account'></td>\n\t\t\t\t<td>{$glacc}</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Date</td>\n\t\t\t\t<td>" . mkDateSelect("date", $date_year, $date_month, $date_day) . "</td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Paid to</td>\n\t\t\t\t<td valign='center'><input size='20' name='name' value='{$name}'></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Description</td>\n\t\t\t\t<td valign='center'><textarea cols='18' rows='2' name='descript'>{$descript}</textarea></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Cheque Number</td>\n\t\t\t\t<td valign='center'><input size='10' name='cheqnum' value='{$cheqnum}'></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Amount</td>\n\t\t\t\t<td valign='center'>" . CUR . " <input type='text' size='10' name='amount' value='{$amount}'></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Petty Cash Account</td>\n\t\t\t\t<td><input type='hidden' name='accinv' value='{$acc['accid']}'>{$acc['topacc']}/{$acc['accnum']} - {$acc['accname']}</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></td>\n\t\t\t\t<td valign='center' align='right'><input type='submit' value='Confirm &raquo;'></td>\n\t\t\t</tr>\n\t\t</table>";
    # main table (layout with menu)
    $OUTPUT = "\n\t\t<center>\n\t\t<table width='100%'>\n\t\t\t<tr>\n\t\t\t\t<td width='65%' align='left'>{$add}</td>\n\t\t\t\t<td valign='top' align='center'>\n\t\t\t\t\t<table " . TMPL_tblDflts . " width='65%'>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th>Quick Links</th>\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</tr>\n\t\t</table>";
    return $OUTPUT;
}