function AssetLedg()
{
    # Set up table to display in
    $Assets = "\r\n\t<h3>Asset Ledger</h3>\r\n\t<table border=0 cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "'>\r\n\t<tr><th>Group</th><th>Serial</th><th>Location</th><th>Description</th><th>Date Bought</th><th>Date Added</th><th>Cost Amount</th><th>Net Value</th></tr>";
    db_connect();
    $i = 0;
    $tot = 0;
    $totnet = 0;
    $Sl = "SELECT * FROM assets WHERE div = '" . USER_DIV . "' ORDER BY serial";
    $Rs = db_exec($Sl) or errDie("Unable to retrieve Asset Ledger from database.");
    if (pg_numrows($Rs) < 1) {
        return "<li>There are no Assets recorded on Cubit.";
    }
    while ($Led = pg_fetch_array($Rs)) {
        $netval = sprint($Led['amount'] - $Led['accdep']);
        $Led['amount'] = sprint($Led['amount']);
        # Get group
        db_connect();
        $sql = "SELECT * FROM assetgrp WHERE grpid = '{$Led['grpid']}' AND div = '" . USER_DIV . "'";
        $grpRslt = db_exec($sql);
        $grp = pg_fetch_array($grpRslt);
        $tot = $tot + $Led['amount'];
        $totnet = $totnet + $netval;
        $Assets .= "<tr><td>{$grp['grpname']}</td><td>{$Led['serial']}</td><td>{$Led['locat']}</td><td>{$Led['des']}</td><td>{$Led['bdate']}</td><td>{$Led['date']}</td><td align=right>" . CUR . " {$Led['amount']}</td><td align=right>" . CUR . " {$netval}</td></tr>";
        $i++;
    }
    $tot = sprint($tot);
    $totnet = sprint($totnet);
    $Assets .= "<tr><td colspan=6>Total Assets: {$i} </td><td align=right>" . CUR . " {$tot}</td><td align=right>" . CUR . " {$totnet}</td></tr>";
    $Assets .= "</table>";
    include "temp.xls.php";
    Stream("Assets", $Assets);
    return $Assets;
}
function display()
{
    extract($_REQUEST);
    $fields = array();
    $fields["search"] = "";
    extract($fields, EXTR_SKIP);
    $sql = "SELECT supno, supname, suppliers.balance AS sup_balance,\n\t\t\t\trecon_creditor_balances.balance AS recon_balance,\n\t\t\t\t(SELECT sum(amount) FROM cubit.recon_balance_ct \n\t\t\t\tWHERE supid=suppliers.supid) AS reason_total\n\t\t\tFROM cubit.suppliers\n\t\t\t\tLEFT JOIN cubit.recon_creditor_balances\n\t\t\t\t\tON suppliers.supid=recon_creditor_balances.supid\n\t\t\tWHERE supno ILIKE '{$search}%' OR supname ILIKE '{$search}%'\n\t\t\tORDER BY supno ASC";
    $ct_rslt = db_exec($sql) or errDie("Unable to retrieve suppliers.");
    $ct_out = "";
    while ($ct_data = pg_fetch_array($ct_rslt)) {
        if ($ct_data["recon_balance"] > $ct_data["reason_total"]) {
            $variance = $ct_data["reason_total"] - $ct_data["recon_balance"];
        } else {
            $variance = $ct_data["recon_balance"] - $ct_data["reason_total"];
        }
        if ($variance == 0) {
            continue;
        }
        $ct_out .= "\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td>{$ct_data['supno']}</td>\n\t\t\t<td>{$ct_data['supname']}</td>\n\t\t\t<td>{$ct_data['reason_total']}</td>\n\t\t\t<td>{$ct_data['recon_balance']}</td>\n\t\t\t<td>" . sprint($variance) . "</td>\n\t\t</tr>";
    }
    if (empty($ct_out)) {
        $ct_out = "\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td colspan='6'><li>No results found</li></td>\n\t\t</tr>";
    }
    $OUTPUT = "\n\t<h3>Creditor Reason Recon Variance Report</h3>\n\t<form method='post' action='" . SELF . "'>\n\t<table " . TMPL_tblDflts . ">\n\t\t<tr>\n\t\t\t<th colspan='2'>Search</th>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td><input type='text' name='search' value='{$search}' /></td>\n\t\t\t<td><input type='submit' value='Search' /></td>\n\t\t</tr>\n\t</table>\n\t</form>\n\t<table " . TMPL_tblDflts . ">\n\t\t<tr>\n\t\t\t<th>Supplier No.</th>\n\t\t\t<th>Supplier Name</th>\n\t\t\t<th>Reason Total</th>\n\t\t\t<th>Balance According to Creditor</th>\n\t\t\t<th>Variance</th>\n\t\t</tr>\n\t\t{$ct_out}\n\t</table>";
    return $OUTPUT;
}
function display()
{
    extract($_REQUEST);
    $fields = array();
    $fields["search"] = "";
    extract($fields, EXTR_SKIP);
    if (is_numeric($search)) {
        $invnum_w = "OR invnum='{$search}'";
    } else {
        $invnum_w = "";
    }
    $sql = "SELECT invid, invnum, cusname, total, hire_invid, accepted, hire_invnum\r\n\t\t\tFROM cubit.nons_invoices\r\n\t\t\tWHERE done='y' AND hire_invid>0 AND cusname ILIKE '%{$search}%' {$invnum_w}";
    $inv_rslt = db_exec($sql) or errDie("Unable to retrieve hire invoices.");
    $inv_out = "";
    while ($inv_data = pg_fetch_array($inv_rslt)) {
        if ($inv_data["accepted"] != "note") {
            $cnote = "\r\n\t\t\t<td>\r\n\t\t\t\t<a href='hire-invoice-note.php?invid={$inv_data['invid']}'>\r\n\t\t\t\t\tCredit Note\r\n\t\t\t\t</a>\r\n\t\t\t</td>";
        } else {
            $cnote = "<td>&nbsp;</td>";
        }
        $inv_out .= "<tr class='" . bg_class() . "'>\r\n\t\t\t<td>\r\n\t\t\t\t<a href='javascript:printer(\"hire/hire_note_reprint.php?invid={$inv_data['hire_invid']}\")'>\r\n\t\t\t\t\tH{$inv_data['hire_invnum']}\r\n\t\t\t\t</a>\r\n\t\t\t</td>\r\n\t\t\t<td>{$inv_data['invnum']}</td>\r\n\t\t\t<td>{$inv_data['cusname']}</td>\r\n\t\t\t<td>" . CUR . sprint($inv_data["total"]) . "</td>\r\n\t\t\t<td><a href='javascript:popupOpen(\"nons-invoice-reprint.php?invid={$inv_data['invid']}\")'>Reprint</a></td>\r\n\t\t\t{$cnote}\r\n\t\t</tr>";
    }
    if (empty($inv_out)) {
        $inv_out = "<tr class='" . bg_class() . "'>\r\n\t\t\t<td colspan='5'><li>Please enter customer name or hire no.</li></td>\r\n\t\t</tr>";
    }
    $OUTPUT = "<h3>View Hire Invoices</h3>\r\n\t<form method='post' action='" . SELF . "'>\r\n\t<table " . TMPL_tblDflts . ">\r\n\t\t<tr>\r\n\t\t\t<th colspan='2'>Enter Hire No or Customer Name</th>\r\n\t\t</tr>\r\n\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t<td><input type='text' name='search' value='{$search}' /></td>\r\n\t\t\t<td><input type='submit' value='Search' style='width: 100%' /></td>\r\n\t\t</tr>\r\n\t</table>\r\n\t</form>\r\n\t<p></p>\r\n\t<table " . TMPL_tblDflts . ">\r\n\t\t<tr>\r\n\t\t\t<th>Hire No</th>\r\n\t\t\t<th>Invoice No</th>\r\n\t\t\t<th>Customer</th>\r\n\t\t\t<th>Total</th>\r\n\t\t\t<th colspan='2'>Options</th>\r\n\t\t</tr>\r\n\t\t{$inv_out}\r\n\t</table>";
    return $OUTPUT;
}
function confirm()
{
    extract($_REQUEST);
    $sql = "DROP TABLE cubit.import_assets";
    db_exec($sql);
    $sql = "CREATE TABLE cubit.import_assets (\r\n\t\t\t\tid serial,\r\n\t\t\t\tserial varchar,\r\n\t\t\t\tlocat varchar,\r\n\t\t\t\tdes varchar,\r\n\t\t\t\tdate date,\r\n\t\t\t\tbdate date,\r\n\t\t\t\tamount numeric default 0,\r\n\t\t\t\tdiv numeric default 2,\r\n\t\t\t\tgrpid numeric default 0,\r\n\t\t\t\taccdep numeric default 0,\r\n\t\t\t\tdep_perc numeric default 0,\r\n\t\t\t\tdep_month varchar,\r\n\t\t\t\tserial2 varchar,\r\n\t\t\t\tteam_id numeric default 0,\r\n\t\t\t\tpuramt numeric default 0,\r\n\t\t\t\tconacc numeric default 0,\r\n\t\t\t\tsaledate date,\r\n\t\t\t\tsaleamt numeric default 0,\r\n\t\t\t\tinvid numeric default 0,\r\n\t\t\t\tautodepr_date date,\r\n\t\t\t\tsdate date,\r\n\t\t\t\ttemp_asset varchar default 'n',\r\n\t\t\t\tnonserial varchar,\r\n\t\t\t\ttype_id numeric default 0,\r\n\t\t\t\tsplit_from numeric default 1,\r\n\t\t\t\tdays numeric default 0,\r\n\t\t\t\ton_hand numeric default 0,\r\n\t\t\t\tsvdate date,\r\n\t\t\t\tprice numeric(16,2) default 0,\r\n\t\t\t\tper_day numeric(16,2) default 0,\r\n\t\t\t\tper_hour numeric(16,2) default 0,\r\n\t\t\t\tper_week numeric(16,2) default 0\r\n\t\t\t)";
    @db_exec($sql);
    $sql = "DELETE FROM import_assets";
    db_exec($sql) or errDie("Unable to clear import table.");
    $lines = file($_FILES["filename"]["tmp_name"]);
    $counter = 0;
    $items_out = "";
    foreach ($lines as $line) {
        $line_arr = explode("|", trim($line));
        $sql = "\r\n\t\t\tINSERT INTO import_assets (\r\n\t\t\t\tserial, locat, des, date, bdate, \r\n\t\t\t\tamount, div, grpid, accdep, dep_perc, dep_month, \r\n\t\t\t\tserial2, team_id, puramt, conacc, saledate, saleamt, \r\n\t\t\t\tinvid, autodepr_date, sdate, temp_asset, nonserial, type_id, \r\n\t\t\t\tsplit_from, days, on_hand, svdate, price, per_day, \r\n\t\t\t\tper_hour, per_week\r\n\t\t\t) VALUES (\r\n\t\t\t\t'{$line_arr['1']}', '', '{$line_arr['2']}', '{$line_arr['38']}', '{$line_arr['32']}', \r\n\t\t\t\t'{$line_arr['30']}', '2', '4', '0', '{$line_arr['41']}', 'no', \r\n\t\t\t\t'{$line_arr['36']}', '0', '{$line_arr['30']}', '0', 'now', '0.00', \r\n\t\t\t\t'0', 'now', 'now', 'n', '0', '0', \r\n\t\t\t\t'1', '0', '0', 'now', '{$line_arr['9']}', '{$line_arr['9']}', \r\n\t\t\t\t'{$line_arr['13']}', '{$line_arr['11']}'\r\n\t\t\t)";
        db_exec($sql) or errDie("Unable to add asset {$line_arr['1']} {$line_arr['2']}.");
        $line_id = pglib_lastid("cubit.import_assets", "id");
        // Convert the date from YYYYMMDD to YYYY-MM-DD
        if (strlen($line_arr[32]) == 8 && !preg_match("/\\-/", $line_arr["32"])) {
            $line_arr[32] = substr($line_arr['32'], 0, 4) . "-" . substr($line_arr['32'], 4, 2) . "-" . substr($line_arr['32'], 6, 2);
        }
        if (strlen($line_arr[38]) == 8 && !preg_match("/\\-/", $line_arr["32"])) {
            $line_arr[38] = substr($line_arr['38'], 0, 4) . "-" . substr($line_arr['38'], 4, 2) . "-" . substr($line_arr['38'], 6, 2);
        }
        if (empty($line_arr[1])) {
            $line_arr[36] = $line_arr[6];
        }
        $items_out .= "\r\n\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td><input type='hidden' name='serial[]' value='{$line_arr['1']}' />{$line_arr['1']}</td>\r\n\t\t\t\t<td><input type='hidden' name='locat[]' value='' /></td>\r\n\t\t\t\t<td><input type='hidden' name='des' value='{$line_arr['2']}' />{$line_arr['2']}</td>\r\n\t\t\t\t<td><input type='hidden' name='date' value='{$line_arr['38']}' />{$line_arr['38']}</td>\r\n\t\t\t\t<td><input type='hidden' name='bdate' value='{$line_arr['32']}' />{$line_arr['32']}</td>\r\n\t\t\t\t<td align='right'><input type='hidden' name='puramt' value='{$line_arr['30']}' />" . sprint($line_arr[30]) . "</td>\r\n\t\t\t\t<td align='right'><input type='text' name='per_hour[{$line_id}]' value='" . sprint($line_arr[13]) . "' size='5' /></td>\r\n\t\t\t\t<td align='right'><input type='text' name='per_day[{$line_id}]' value='" . sprint($line_arr[9]) . "' size='5' /></td>\r\n\t\t\t\t<td align='right'><input type='text' name='per_week[{$line_id}]' value='" . sprint($line_arr[11]) . "' size='5' /></td>\r\n\t\t\t</tr>";
    }
    $OUTPUT = "\r\n\t\t<center>\r\n\t\t<h3>Import Assets</h3>\r\n\t\t<form method='POST' action='" . SELF . "'>\r\n\t\t\t<input type='hidden' name='key' value='write' />\r\n\t\t<table " . TMPL_tblDflts . ">\r\n\t\t\t<tr>\r\n\t\t\t\t<th>Serial</th>\r\n\t\t\t\t<th>Location</th>\r\n\t\t\t\t<th>Description</th>\r\n\t\t\t\t<th>Date Received/Purchased</th>\r\n\t\t\t\t<th>Date Added</th>\r\n\t\t\t\t<th>Cost Amount</th>\r\n\t\t\t\t<th>Per Hour</th>\r\n\t\t\t\t<th>Per Day</th>\r\n\t\t\t\t<th>Per Week</th>\r\n\t\t\t</tr>\r\n\t\t\t{$items_out}\r\n\t\t</table>\r\n\t\t\t<input type='submit' value='Write &raquo' />\r\n\t\t</form>\r\n\t\t</center>";
    return $OUTPUT;
}
function display($msg = "")
{
    extract($_REQUEST);
    $fields = array();
    $fields["search"] = "";
    extract($fields, EXTR_SKIP);
    $sql = "SELECT assets.id, des, locat, per_day, per_hour, per_week, serial\r\n\t\t\t\tFROM cubit.assets\r\n\t\t\t\t\tLEFT JOIN hire.basis_prices\r\n\t\t\t\t\t\tON assets.id = basis_prices.assetid\r\n\t\t\t\tWHERE remaction IS NULL AND (assets.id ILIKE '{$search}%' OR\r\n\t\t\t\t\tdes ILIKE '{$search}%' OR locat ILIKE '{$search}%' OR\r\n\t\t\t\t\tper_day ILIKE '%{$search}%' OR per_hour ILIKE '%{$search}%' OR\r\n\t\t\t\t\tper_week ILIKE '%{$search}%' OR serial ILIKE '{$search}%')\r\n\t\t\t\tORDER BY des ASC";
    $asset_rslt = db_exec($sql);
    $basis_out = "";
    while ($asset_data = pg_fetch_array($asset_rslt)) {
        if (empty($asset_data["per_hour"])) {
            $asset_data["per_hour"] = "0.00";
        }
        if (empty($asset_data["per_day"])) {
            $asset_data["per_day"] = "0.00";
        }
        if (empty($asset_data["per_week"])) {
            $asset_data["per_week"] = "0.00";
        }
        $basis_out .= "\r\n\t\t<input type='hidden' name='asset[]' value='{$asset_data['id']}' />\r\n\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t<td>{$asset_data['des']}</td>\r\n\t\t\t<td>{$asset_data['serial']}</td>\r\n\t\t\t<td>{$asset_data['locat']}</td>\r\n\t\t\t<td>\r\n\t\t\t\t" . CUR . "\r\n\t\t\t\t<input type='text' name='hour[{$asset_data['id']}]'\r\n\t\t\t\tvalue='" . sprint($asset_data["per_hour"]) . "' size='5'\r\n\t\t\t\tstyle='text-align: right' />\r\n\t\t\t</td>\r\n\t\t\t<td>\r\n\t\t\t\t" . CUR . "\r\n\t\t\t\t<input type='text' name='day[{$asset_data['id']}]'\r\n\t\t\t\tvalue='" . sprint($asset_data["per_day"]) . "' size='5'\r\n\t\t\t\tstyle='text-align: right' />\r\n\t\t\t</td>\r\n\t\t\t<td>\r\n\t\t\t\t" . CUR . "\r\n\t\t\t\t<input type='text' name='week[{$asset_data['id']}]'\r\n\t\t\t\tvalue='" . sprint($asset_data["per_week"]) . "' size='5'\r\n\t\t\t\tstyle='text-align: right' />\r\n\t\t\t</td>\r\n\t\t</tr>";
    }
    if (empty($basis_out)) {
        $basis_out = "\r\n\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t<td colspan='6'><li>No results found.</li></td>\r\n\t\t</tr>";
    }
    $OUTPUT = "<center>\r\n\t<h3>Default Basis Prices</h3>\r\n\t<form method='post' action='" . SELF . "'>\r\n\t<table " . TMPL_tblDflts . ">\r\n\t\t<tr>\r\n\t\t\t<th colspan='2'>Search</th>\r\n\t\t</tr>\r\n\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t<td><input type='text' name='search' value='{$search}' /></td>\r\n\t\t\t<td><input type='submit' value='Search' /></td>\r\n\t\t</tr>\r\n\t</table>\r\n\t</form>\r\n\t<form method='post' action='" . SELF . "'>\r\n\t<input type='hidden' name='key' value='save' />\r\n\t<table " . TMPL_tblDflts . ">\r\n\t\t{$msg}\r\n\t\t<tr>\r\n\t\t\t<th>Plant</th>\r\n\t\t\t<th>Serial</th>\r\n\t\t\t<th>Location</th>\r\n\t\t\t<th>Hour</th>\r\n\t\t\t<th>Day</th>\r\n\t\t\t<th>Week</th>\r\n\t\t</tr>\r\n\t\t{$basis_out}\r\n\t\t<tr>\r\n\t\t\t<td colspan='6' align='center'>\r\n\t\t\t\t<input type='submit' value='Set Basis &raquo'\r\n\t\t\t\tstyle='font-weight: bold' />\r\n\t\t\t</td>\r\n\t\t</tr>\r\n\t</table>\r\n\t</form>";
    return $OUTPUT;
}
function adjust_display()
{
    extract($_REQUEST);
    $fields = array();
    $fields["page"] = 1;
    extract($fields, EXTR_SKIP);
    $sql = "SELECT stock.stkid, bar, stkcod, stkdes, catname, csprice,\n\t\t\t\t(qty-units) AS adjust_qty\n\t\t\tFROM cubit.stock_take\n\t\t\t\tLEFT JOIN cubit.stock ON stock.stkid=stock_take.stkid\n\t\t\tWHERE adjusted='0' AND page='{$page}'\n\t\t\tORDER BY stkcod ASC";
    $adjust_rslt = db_exec($sql) or errDie("Unable to retrieve adjustments.");
    $adjust_out = "";
    while ($adjust_data = pg_fetch_array($adjust_rslt)) {
        if ($adjust_data["adjust_qty"] == 0) {
            continue;
        }
        $value = $adjust_data["csprice"] * $adjust_data["adjust_qty"];
        $adjust_out .= "\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td>{$adjust_data['bar']}</td>\n\t\t\t<td>{$adjust_data['catname']}</td>\n\t\t\t<td>{$adjust_data['stkcod']}</td>\n\t\t\t<td>{$adjust_data['stkdes']}</td>\n\t\t\t<td align='center'>" . sprint3($adjust_data['adjust_qty']) . "</td>\n\t\t\t<td align='right'>" . sprint($value) . "</th>\n\t\t\t<td>\n\t\t\t\t<input type='hidden' name='adjust_qty[{$adjust_data['stkid']}]'\n\t\t\t\tvalue='{$adjust_data['adjust_qty']}' />\n\t\t\t\t<input type='submit' name='update[{$adjust_data['stkid']}]'\n\t\t\t\tvalue='Adjust' />\n\t\t\t</td>\n\t\t</tr>";
    }
    if (empty($adjust_out)) {
        $adjust_out = "\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td colspan='7'>\n\t\t\t\t<li>No results found for this page.</li>\n\t\t\t</td>\n\t\t</tr>";
    }
    $sql = "SELECT max(page) FROM cubit.stock_take";
    $mp_rslt = db_exec($sql) or errDie("Unable to retrieve total pages.");
    $max_page = pg_fetch_result($mp_rslt, 0);
    if ($page < $max_page) {
        $adjust_btn = "\n\t\t\t<a href='" . SELF . "?key=adjust_display&page=" . ($page + 1) . "'>\n\t\t\t\tNext &raquo\n\t\t\t</a>";
    } else {
        $adjust_btn = "";
    }
    $OUTPUT = "\n\t<center>\n\t<h3>Stock Take - Adjustments</h3>\n\t<form method='post' action='" . SELF . "'>\n\t<table " . TMPL_tblDflts . ">\n\t\t<tr>\n\t\t\t<th colspan='2'>Page</th>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td>\n\t\t\t\t<input type='text' name='page' value='{$page}' size='3'\n\t\t\t\tstyle='font-weight: bold; text-align: center' />\n\t\t\t</td>\n\t\t\t<td><input type='submit' value='OK' /></td>\n\t\t</tr>\n\t</table>\n\t</form>\n\t<form method='post' action='" . SELF . "'>\n\t<input type='hidden' name='key' value='adjust_update' />\n\t<input type='hidden' name='page' value='{$page}' />\n\t<table " . TMPL_tblDflts . ">\n\t\t<tr>\n\t\t\t<th>Barcode</th>\n\t\t\t<th>Category</th>\n\t\t\t<th>Stock Code</th>\n\t\t\t<th>Stock Description</th>\n\t\t\t<th>Adjustment</th>\n\t\t\t<th>Value</th>\n\t\t\t<th>&nbsp;</th>\n\t\t</tr>\n\t\t{$adjust_out}\n\t</table>\n\t<input type='submit' name='button[page_complete]' value='Adjust Page' />\n\t<br />\n\t{$adjust_btn}\n\t</center>";
    return $OUTPUT;
}
function display()
{
    extract($_REQUEST);
    $fields = array();
    $fields["from_year"] = date("Y");
    $fields["from_month"] = date("m");
    $fields["from_day"] = date("d");
    $fields["to_year"] = date("Y");
    $fields["to_month"] = date("m");
    $fields["to_day"] = date("d");
    extract($fields, EXTR_SKIP);
    $from_date = "{$from_year}-{$from_month}-{$from_day}";
    $to_date = "{$to_year}-{$to_month}-{$to_day}";
    $sql = "\n\tSELECT invnum, cash, cheque, credit, sdate, cusname\n\tFROM cubit.nons_invoices\n\tWHERE sdate BETWEEN '{$from_date}' AND '{$to_date}' AND hire_invnum!='0'";
    $inv_rslt = db_exec($sql) or errDie("Unable to retrieve invoices.");
    $total_cash = 0;
    $total_cheque = 0;
    $total_credit = 0;
    $inv_out = "";
    while ($inv_data = pg_fetch_array($inv_rslt)) {
        $inv_out .= "\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td>{$inv_data['sdate']}</td>\n\t\t\t<td align='center'>{$inv_data['invnum']}</td>\n\t\t\t<td>{$inv_data['cusname']}</td>\n\t\t\t<td align='right'>" . sprint($inv_data["cash"]) . "</td>\n\t\t\t<td align='right'>" . sprint($inv_data["cheque"]) . "</td>\n\t\t\t<td align='right'>" . sprint($inv_data["credit"]) . "</td>\n\t\t</tr>";
        $total_cash += $inv_data["cash"];
        $total_cheque += $inv_data["cheque"];
        $total_credit += $inv_data["credit"];
    }
    if (empty($inv_out)) {
        $inv_out = "\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td colspan='6'><li>No results found.</li></td>\n\t\t</tr>";
    }
    $OUTPUT = "\n\t<center>\n\t<h3>Daily Hire Cashup Report</h3>\n\t<form method='post' action='" . SELF . "'>\n\t<table " . TMPL_tblDflts . ">\n\t\t<tr>\n\t\t\t<th colspan='4'>Date Range</th>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td>" . mkDateSelect("from", $from_year, $from_month, $from_day) . "</td>\n\t\t\t<td>&nbsp; <b>To</b> &nbsp;</td>\n\t\t\t<td>" . mkDateSelect("to", $to_year, $to_month, $to_day) . "</td>\n\t\t\t<td><input type='submit' value='Select' /></td>\n\t\t</tr>\n\t</table>\n\t</form>\n\t<table " . TMPL_tblDflts . ">\n\t\t<tr>\n\t\t\t<th>Date</th>\n\t\t\t<th>Invoice No</th>\n\t\t\t<th>Customer</th>\n\t\t\t<th>Cash</th>\n\t\t\t<th>Cheque</th>\n\t\t\t<th>Credit Card</th>\n\t\t</tr>\n\t\t{$inv_out}\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td colspan='3'><b>Total</b></td>\n\t\t\t<td align='right'><b>" . sprint($total_cash) . "</b></td>\n\t\t\t<td align='right'><b>" . sprint($total_cheque) . "</b></td>\n\t\t\t<td align='right'><b>" . sprint($total_credit) . "</b></td>\n\t</table>\n\t</center>";
    return $OUTPUT;
}
function display()
{
    extract($_REQUEST);
    $fields = array();
    $fields["from_year"] = date("Y");
    $fields["from_month"] = date("m");
    $fields["from_day"] = "01";
    $fields["to_year"] = date("Y");
    $fields["to_month"] = date("m");
    $fields["to_day"] = date("d");
    extract($fields, EXTR_SKIP);
    $from_date = "{$from_year}-{$from_month}-{$from_day}";
    $to_date = "{$to_year}-{$to_month}-{$to_day}";
    $sql = "\n\tSELECT id, stock.stkcod, stock.stkdes, qty, cost_per_unit, (qty*cost_per_unit) AS total,\n\t\textract('epoch' FROM timestamp) AS e_time\n\tFROM cubit.manu_hist_main\n\t\tLEFT JOIN cubit.stock ON manu_hist_main.stkid=stock.stkid\n\tWHERE timestamp BETWEEN '{$from_date} 0:00:00' AND '{$to_date} 23:59:59'\n\tORDER BY timestamp DESC";
    $main_rslt = db_exec($sql) or errDie("Unable to retrieve main items.");
    $hist_out = "";
    while ($main_data = pg_fetch_array($main_rslt)) {
        $hist_out .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td><b>" . date("d-m-Y", $main_data["e_time"]) . "</b></td>\n\t\t\t\t<td><b>({$main_data['stkcod']}) {$main_data['stkdes']}</b></td>\n\t\t\t\t<td align='center'><b>{$main_data['qty']}</b></td>\n\t\t\t\t<td align='right'><b>" . sprint($main_data["cost_per_unit"]) . "</b></td>\n\t\t\t\t<td align='right'><b>" . sprint($main_data["total"]) . "</b></td>\n\t\t\t</tr>";
        $sql = "\n\t\tSELECT stkcod, stkdes, qty, cost_per_unit, (qty*cost_per_unit) AS total\n\t\tFROM cubit.manu_hist_sub\n\t\t\tLEFT JOIN cubit.stock ON manu_hist_sub.stkid=stock.stkid\n\t\tWHERE main_id='{$main_data['id']}'\n\t\tORDER BY timestamp ASC";
        $sub_rslt = db_exec($sql) or errDie("Unable to retrieve sub items.");
        while ($sub_data = pg_fetch_array($sub_rslt)) {
            $hist_out .= "\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>&nbsp;</td>\n\t\t\t\t\t<td>({$sub_data['stkcod']}) {$sub_data['stkdes']}</td>\n\t\t\t\t\t<td align='center'>{$sub_data['qty']}</td>\n\t\t\t\t\t<td align='right'>" . sprint($sub_data["cost_per_unit"]) . "</td>\n\t\t\t\t\t<td align='right'>" . sprint($sub_data["total"]) . "</td>\n\t\t\t\t</tr>";
        }
    }
    if (empty($hist_out)) {
        $hist_out = "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td colspan='5'><li>No results found.</li></td>\n\t\t\t</tr>";
    }
    $OUTPUT = "\n\t\t<center>\n\t\t<h3>Manufacturing Cost Report</h3>\n\t\t<form method='post' action='" . SELF . "'>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t<tr>\n\t\t\t\t<th colspan='4'>Date Range</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>" . mkDateSelect("from", $from_year, $from_month, $from_day) . "</td>\n\t\t\t\t<td>&nbsp; <b>To</b> &nbsp;</td>\n\t\t\t\t<td>" . mkDateSelect("to", $to_year, $to_month, $to_day) . "</td>\n\t\t\t\t<td><input type='submit' value='Select' style='font-weight:bold' /></td>\n\t\t\t</tr>\n\t\t</table>\n\t\t</form>\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>Stock</th>\n\t\t\t\t<th>Qty</th>\n\t\t\t\t<th>Cost per Unit</th>\n\t\t\t\t<th>Total</th>\n\t\t\t</tr>\n\t\t\t{$hist_out}\n\t\t</table>\n\t\t</center>";
    return $OUTPUT;
}
function view($frm)
{
    extract($_REQUEST);
    if ($msg = cForm::validateValue($supid, "num", 1, 10)) {
        return "<li class='err'>The supplier ID is invalid. {$msg}</li>\n\t\t\t<input type='button' onclick='window.history.back();' value='&laquo; Correction' />";
    }
    /* @var frm cForm */
    $frm->settitle("Supplier Pricelist");
    $frm->setkey("import");
    $frm->add_heading("Import New Pricelist");
    $frm->add_message("\n\t\t\t<li class='err'>Pricelists has to be in CSV format and to import them\n\t\t\t\tyou have to specify the order and format of the fields<br />\n\t\t\t\tby selecting what each of them are in the same order as they appear\n\t\t\t\tin the file. Only the stock code<br />\n\t\t\t\tand the price is needed, so for the other fields you simply\n\t\t\t\tselect the '-' options.\n\t\t\t</li>", "inst");
    $frm->add_message("\n\t\t\t<li class='err'>Note that the stock codes of the supplier should be added\n\t\t\t\tby editing the stock item and selecting the<br />\n\t\t\t\t'Add/Edit/Remove' button below the stock code input field.\n\t\t\t</li>", "suppstkcod");
    $frm->add_hidden("supid", $supid, "num");
    $frm->add_file("Pricelist", "supplist");
    $frm->add_checkbox("VAT Inclusive", "vatinc", true, true);
    $frm->add_heading("Comma Seperated Volume (CSV) Fields");
    $frm->add_layout("\n\t<tr %bgc>\n\t\t<td colspan='2' nowrap='t'>\n\t\t\t<strong>\n\t\t\t\t%fldonly ,\n\t\t\t\t%fldonly ,\n\t\t\t\t%fldonly ,\n\t\t\t\t%fldonly ,\n\t\t\t\t%fldonly ,\n\t\t\t\t%fldonly\n\t\t\t</strong>\n\t\t</td>\n\t</tr>");
    // field types
    $ft = array("ignore" => "-", "stkcod" => "Stock Code", "price" => "Price");
    $frm->add_select("", "fld[0]", "stkcod", $ft, "string", "5:6");
    $frm->add_select("", "fld[1]", "price", $ft, "string", "5:6");
    $frm->add_select("", "fld[2]", "ignore", $ft, "string", "5:6");
    $frm->add_select("", "fld[3]", "ignore", $ft, "string", "5:6");
    $frm->add_select("", "fld[4]", "ignore", $ft, "string", "5:6");
    $frm->add_select("", "fld[5]", "ignore", $ft, "string", "5:6");
    $frm->add_ctrlbtn("Import", "submit", "btn_import");
    $OUT = $frm->getfrm_input();
    /* supplier info */
    $suppinfo = qrySupplier($supid);
    $supcur = qryCurrency($suppinfo["fcid"]);
    $supcur = $supcur["symbol"];
    /* list current pricelist */
    $OUT .= "\n\t<table " . TMPL_tblDflts . ">\n\t<tr>\n\t\t<th>Stock Code</td>\n\t\t<th>Supplier Stock Code</th>\n\t\t<th>Current Supplier Price</th>\n\t\t<th>Current Selling Price</th>\n\t</tr>";
    $sql = "SELECT pli.*\n\t\t\tFROM exten.spricelist pl INNER JOIN exten.splist_prices pli\n\t\t\t\tON pl.listid=pli.listid\n\t\t\tWHERE pl.suppid='{$supid}'";
    $qry = new dbSql($sql);
    $qry->run();
    if ($qry->num_rows() <= 0) {
        $OUT .= "\n\t\t<tr bgcolor='" . bgcolorc(0) . "'>\n\t\t\t<td colspan='4'>No pricelist.</td>\n\t\t</tr>";
    }
    $i = 0;
    while ($row = $qry->fetch_array()) {
        if (empty($row["supstkcod"])) {
            $our_stkcod = "No supplier stock code";
            $our_price = "";
        } else {
            if (($stkid = suppStkid($supid, $row["supstkcod"])) === false) {
                $our_stkcod = "<li class='err'>No such stock item.\n\t\t\t\t<a href='stock-add.php?stkcod={$row['supstkcod']}&supid={$supid}&supstkcod={$row['supstkcod']}'>Add Stock</a> /\n\t\t\t\t<a href='stock-view.php'>Edit Stock</li>";
                $our_price = "";
            } else {
                $stkrow = qryStock($stkid, "stkcod, selamt");
                $our_stkcod = "<strong>{$stkrow['stkcod']}</strong>";
                $our_price = CUR . " " . sprint($stkrow["selamt"]);
            }
        }
        $OUT .= "\n\t\t<tr bgcolor='" . bgcolor($i) . "'>\n\t\t\t<td>{$our_stkcod}</td>\n\t\t\t<td>{$row['supstkcod']}</td>\n\t\t\t<td align='right'>{$supcur} " . sprint($row["price"]) . "</td>\n\t\t\t<td align='right'>{$our_price}</td>\n\t\t</tr>";
    }
    $OUT .= "\n\t</table>";
    return $OUT;
}
Exemplo n.º 10
0
 /**
  * Set a required item.
  *
  * @param  string  $key
  * @param  mixed   $value
  * @return Factory
  */
 public function set($key, $value)
 {
     if (!in_array($key, $this->_requires)) {
         throw new Exception(sprint("Can not set key that is not required: '%s'", $key));
     }
     $this->_items[$key] = $value;
     return $this;
 }
function display()
{
    extract($_REQUEST);
    $fields = array();
    $fields["from_year"] = date("Y");
    $fields["from_month"] = date("m");
    $fields["from_day"] = date("d");
    $fields["to_year"] = date("Y");
    $fields["to_month"] = date("m");
    $fields["to_day"] = date("d");
    $fields["group_id"] = 0;
    $fields["type_id"] = 0;
    extract($fields, EXTR_SKIP);
    $sql = "SELECT grpid, grpname FROM cubit.assetgrp ORDER BY grpname ASC";
    $group_rslt = db_exec($sql) or errDie("Unable to retrieve groups.");
    $group_sel = "\n\t<select name='group_id' style='width: 100%'>\n\t\t<option value='0'>[All]</option>";
    while ($group_data = pg_fetch_array($group_rslt)) {
        $sel = $group_id == $group_data["grpid"] ? "selected='t'" : "";
        $group_sel .= "\n\t\t<option value='{$group_data['grpid']}'>\n\t\t\t{$group_data['grpname']}\n\t\t</option>";
    }
    $group_sel .= "</select>";
    $sql = "SELECT id, name FROM cubit.asset_types ORDER BY name ASC";
    $type_rslt = db_exec($sql) or errDie("Unable to retrieve asset types.");
    $type_sel = "\n\t<select name='type_id' style='width: 100%'>\n\t\t<option value='0'>[All]</option>";
    while ($type_data = pg_fetch_array($type_rslt)) {
        $sel = $type_id == $type_data["id"] ? "selected='t'" : "";
        $type_sel .= "\n\t\t<option value='{$type_data['id']}'>\n\t\t\t{$type_data['name']}\n\t\t</option>";
    }
    $type_sel .= "</select>";
    $OUTPUT = "\n\t<center>\n\t<h3>Asset Sale Report</h3>\n\t<form method='post' action='" . SELF . "'>\n\t<table " . TMPL_tblDflts . ">\n\t\t<tr>\n\t\t\t<th colspan='4'>Date Range</th>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td><b>From</b> &nbsp;</td>\n\t\t\t<td>" . mkDateSelect("from", $from_year, $from_month, $from_day) . "</td>\n\t\t\t<td>&nbsp; <b>To</b> &nbsp;</td>\n\t\t\t<td>" . mkDateSelect("to", $to_year, $to_month, $to_day) . "</td>\n\t\t</tr>\n\t\t<tr>\n\t\t\t<th colspan='2'>Group</th>\n\t\t\t<th colspan='2'>Type</th>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td colspan='2'>{$group_sel}</td>\n\t\t\t<td colspan='2'>{$type_sel}</td>\n\t\t</tr>\n\t\t<tr>\n\t\t\t<td colspan='4' align='center'>\n\t\t\t\t<input type='submit' value='Select' style='font-weight: bold' />\n\t\t\t</td>\n\t\t</tr>\n\t</table>\n\t</form>";
    $where_ar = array();
    if ($group_id > 0) {
        $where_ar[] = "grpid='{$group_id}'";
    }
    if ($type_id > 0) {
        $where_ar[] = "type_id='{$type_id}'";
    }
    $where_sql = implode(" AND ", $where_ar);
    if (!empty($where_sql)) {
        $where_sql .= " AND ";
    }
    $sql = "\n\tSELECT id, des, serial, serial2, nonserial, saledate, saleamt\n\tFROM cubit.assets_prev\n\tWHERE {$where_sql} div='" . USER_DIV . "' AND remaction='Sale'";
    $sale_rslt = db_exec($sql) or errDie("Unable to retrieve sales.");
    $sale_out = "";
    while ($sale_data = pg_fetch_array($sale_rslt)) {
        if ($sale_data["nonserial"]) {
            $qty_sold = $sale_data["serial2"];
        } else {
            $qty_sold = 1;
        }
        $sale_out .= "\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td>{$sale_data['des']}</td>\n\t\t\t<td>{$sale_data['serial']}</td>\n\t\t\t<td align='center'>{$qty_sold}</td>\n\t\t\t<td align='center'>{$sale_data['saledate']}</td>\n\t\t\t<td align='right'>" . sprint($sale_data["saleamt"]) . "</td>\n\t\t\t<td align='right'>{$sale_data['accdep']}</td>\n\t\t</tr>";
    }
    if (empty($sale_out)) {
        $sale_out .= "\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td colspan='5'>\n\t\t\t\t<li>No results found from your current selection</li>\n\t\t\t</td>\n\t\t</tr>";
    }
    $OUTPUT .= "\n\t<table " . TMPL_tblDflts . ">\n\t\t<tr>\n\t\t\t<th>Asset</th>\n\t\t\t<th>Serial</th>\n\t\t\t<th>Qty Sold</th>\n\t\t\t<th>Sale Date</th>\n\t\t\t<th>Amount</th>\n\t\t\t<th>Accumulated Depreciation</th>\n\t\t\t<th>Profit / Loss</th>\n\t\t</tr>\n\t\t{$sale_out}\n\t</table>\n\t</center>";
    return $OUTPUT;
}
function details($_GET)
{
    # get vars
    extract($_GET);
    # validate input
    require_lib("validate");
    $v = new validate();
    $v->isOk($purid, "num", 1, 20, "Invalid Order number.");
    # display errors, if any
    if ($v->isError()) {
        $err = "";
        $errors = $v->getErrors();
        foreach ($errors as $e) {
            $err .= "<li class='err'>" . $e["msg"] . "</li>";
        }
        $confirm .= "<p><input type='button' onClick='JavaScript:history.back();' value='&laquo; Correct submission'>";
        return $confirm;
    }
    # Get Order info
    db_connect();
    $sql = "SELECT * FROM nons_purchases WHERE purid = '{$purid}' AND div = '" . USER_DIV . "'";
    $purRslt = db_exec($sql) or errDie("Unable to get Order information");
    if (pg_numrows($purRslt) < 1) {
        return "<i class='err'>Not Found</i>";
    }
    $pur = pg_fetch_array($purRslt);
    /* --- Start Products Display --- */
    # Products layout
    $products = "\n\t\t\t\t\t<table " . TMPL_tblDflts . " width='100%'>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th>ITEM NUMBER</th>\n\t\t\t\t\t\t\t<th>DESCRIPTION</th>\n\t\t\t\t\t\t\t<th>QTY OUTSTANDING</th>\n\t\t\t\t\t\t\t<th>UNIT PRICE</th>\n\t\t\t\t\t\t\t<th>DELIVERY DATE</th>\n\t\t\t\t\t\t\t<th>AMOUNT</th>\n\t\t\t\t\t\t<tr>";
    # get selected stock in this Order
    db_connect();
    $sql = "SELECT * FROM nons_pur_items  WHERE purid = '{$purid}' AND div = '" . USER_DIV . "'";
    $stkdRslt = db_exec($sql);
    while ($stkd = pg_fetch_array($stkdRslt)) {
        # format date
        list($dyear, $dmon, $dday) = explode("-", $stkd['ddate']);
        # put in product
        $products .= "\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td>{$stkd['cod']}</td>\n\t\t\t\t\t\t\t\t<td>{$stkd['des']}</td>\n\t\t\t\t\t\t\t\t<td>{$stkd['qty']}</td>\n\t\t\t\t\t\t\t\t<td nowrap>" . CUR . " {$stkd['unitcost']}</td>\n\t\t\t\t\t\t\t\t<td>{$dday}-{$dmon}-{$dyear}</td>\n\t\t\t\t\t\t\t\t<td nowrap>" . CUR . " {$stkd['amt']}</td>\n\t\t\t\t\t\t\t</tr>";
    }
    $products .= "</table>";
    /* --- Start Some calculations --- */
    # Get subtotal
    $SUBTOT = sprint($pur['subtot']);
    # Get Total
    $TOTAL = sprint($pur['total']);
    # Get vat
    $VAT = sprint($pur['vat']);
    /* --- End Some calculations --- */
    # format date
    list($pyear, $pmon, $pday) = explode("-", $pur['pdate']);
    // format the vat inclusive variable for nicer display
    if ($pur['vatinc'] == "novat") {
        $pur['vatinc'] = "No Vat";
    }
    /* -- Final Layout -- */
    $details = "\n\t\t\t\t\t<center>\n\t\t\t\t\t<h3>Non-Stock Order Details</h3>\n\t\t\t\t\t<table " . TMPL_tblDflts . " width='95%'>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<td valign='top'>\n\t\t\t\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t\t\t<th colspan='2'> Supplier Details </th>\n\t\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t\t<td>Supplier</td>\n\t\t\t\t\t\t\t\t\t\t<td valign='center'>{$pur['supplier']}</td>\n\t\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t\t<td>Account number</td>\n\t\t\t\t\t\t\t\t\t\t<td valign='center'><pre>{$pur['supaddr']}</pre></td>\n\t\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t</table>\n\t\t\t\t\t\t\t</td>\n\t\t\t\t\t\t\t<td valign='top' align='right'>\n\t\t\t\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t\t\t<th colspan='2'> Non-Stock Order Details </th>\n\t\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t\t<td>Non-Stock Order No.</td>\n\t\t\t\t\t\t\t\t\t\t<td valign='center'>{$pur['purnum']}</td>\n\t\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t\t<td>Order No.</td>\n\t\t\t\t\t\t\t\t\t\t<td valign='center'>{$pur['ordernum']}</td>\n\t\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t\t<td>Supplier Invoice No</td>\n\t\t\t\t\t\t\t\t\t\t<td valign='center'>{$pur['supinv']}</td>\n\t\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t\t<td>Delivery Ref No.</td>\n\t\t\t\t\t\t\t\t\t\t<td valign='center'>{$pur['refno']}</td>\n\t\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t\t<td>Terms</td>\n\t\t\t\t\t\t\t\t\t\t<td valign='center'>{$pur['terms']} Days</td>\n\t\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t\t<td>Date</td>\n\t\t\t\t\t\t\t\t\t\t<td valign='center'>{$pday}-{$pmon}-{$pyear}</td>\n\t\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t\t<td>VAT Inclusive</td>\n\t\t\t\t\t\t\t\t\t\t<td valign='center'>{$pur['vatinc']}</td>\n\t\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t\t<td>Delivery Charges</td>\n\t\t\t\t\t\t\t\t\t\t<td valign='center'>" . CUR . " {$pur['shipchrg']}</td>\n\t\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t</table>\n\t\t\t\t\t\t\t</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr><td><br></td></tr>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<td colspan='2'>{$products}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<td>\n\t\t\t\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t\t\t<th width='40%'>Quick Links</th>\n\t\t\t\t\t\t\t\t\t\t<th width='45%'>Remarks</th>\n\t\t\t\t\t\t\t\t\t\t<td rowspan='5' valign='top' width='15%'><br></td>\n\t\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t\t\t<td class='" . bg_class() . "'><a href='nons-purchase-new.php'>New Non-Stock Order</a></td>\n\t\t\t\t\t\t\t\t\t\t<td class='" . bg_class() . "' rowspan='4' align='center' valign='top'>" . nl2br($pur['remarks']) . "</td>\n\t\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t\t<td><a href='nons-purchase-view.php'>View Non-Stock Orders</a></td>\n\t\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t\t<script>document.write(getQuicklinkSpecial());</script>\n\t\t\t\t\t\t\t\t</table>\n\t\t\t\t\t\t\t</td>\n\t\t\t\t\t\t\t<td align='right'>\n\t\t\t\t\t\t\t\t<table " . TMPL_tblDflts . " width='80%'>\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t\t<td>SUBTOTAL</td>\n\t\t\t\t\t\t\t\t\t\t<td align='right'>" . CUR . " {$pur['subtot']}</td>\n\t\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t\t<td>Delivery Charges</td>\n\t\t\t\t\t\t\t\t\t\t<td align='right'>" . CUR . " {$pur['shipping']}</td>\n\t\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t\t<td>VAT @ " . TAX_VAT . " %</td>\n\t\t\t\t\t\t\t\t\t\t<td align='right'>" . CUR . " {$pur['vat']}</td>\n\t\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t\t\t<th>GRAND TOTAL</th>\n\t\t\t\t\t\t\t\t\t\t<td align='right'>" . CUR . " {$pur['total']}</td>\n\t\t\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t\t</table>\n\t\t\t\t\t\t\t</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t</table>\n\t\t\t\t\t</form>\n\t\t\t\t\t</center>";
    return $details;
}
function show_listing()
{
    db_connect();
    #######################[ LOANS APPLICATIONS ]##########################
    $get_loans = "SELECT * FROM loan_requests ORDER BY loanamt";
    $run_loans = db_exec($get_loans) or errDie("Unable to get loan applications.");
    if (pg_numrows($run_loans) < 1) {
        $listing = "<tr class='" . bg_class() . "'><td colspan='8'>No Loan Applications Found.</td></tr>";
    } else {
        $listing = "";
        while ($larr = pg_fetch_array($run_loans)) {
            $get_emp = "SELECT fnames,sname FROM employees WHERE empnum = '{$larr['empnum']}' LIMIT 1";
            $run_emp = db_exec($get_emp) or errDie("Unable to get employee information.");
            if (pg_numrows($run_emp) < 1) {
                $showemp = "<li class='err'>Invalid Employee For Loan Selected</li>";
            } else {
                $earr = pg_fetch_array($run_emp);
                $showemp = "{$earr['fnames']} {$earr['sname']}";
            }
            $get_type = "SELECT * FROM loan_types WHERE id = '{$larr['loan_type']}' LIMIT 1";
            $run_type = db_exec($get_type) or errDie("Unable to get loan type information.");
            if (pg_numrows($run_type) < 1) {
                $showloantype = "Invalid Loan Type Selected";
            } else {
                $tarr = pg_fetch_array($run_type);
                $showloantype = $tarr['loan_type'];
            }
            $listing .= "\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>{$showemp}</td>\n\t\t\t\t\t\t<td>{$larr['loanamt']}</td>\n\t\t\t\t\t\t<td>{$larr['loaninstall']}</td>\n\t\t\t\t\t\t<td>{$larr['loanint']}</td>\n\t\t\t\t\t\t<td>{$larr['loanperiod']}</td>\n\t\t\t\t\t\t<td>{$larr['loandate']}</td>\n\t\t\t\t\t\t<td>{$showloantype}</td>\n\t\t\t\t\t\t<td><a href='loan_apply_approve.php?id={$larr['id']}&deny=t'>Deny</a></td>\n\t\t\t\t\t\t<td><a href='loan_apply_approve.php?id={$larr['id']}'>Approve</a></td>\n\t\t\t\t\t</tr>\n\t\t\t\t";
        }
    }
    ########################################################################
    #####################[ CURRENT LOANS ]##################################
    $employees = "";
    $i = 0;
    db_connect();
    $sql = "SELECT * FROM employees WHERE gotloan='t'::bool AND div = '" . USER_DIV . "' ORDER BY sname";
    $empRslt = db_exec($sql) or errDie("Unable to select employees with loans from database.");
    if (pg_numrows($empRslt) < 1) {
        $employees .= "\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td colspan='7'>No Employees With Loans Found.</td>\n\t\t\t\t\t</tr>";
        // 		return "No employee-loans found in database.<p>"
        // 		.mkQuickLinks(
        // 			ql("loan_apply.php", "Apply For New Loan"),
        // 			ql("../admin-employee-add.php", "Add Employee"),
        // 			ql("../admin-employee-view.php", "View Employees")
        // 		);
    } else {
        while ($myEmp = pg_fetch_array($empRslt)) {
            $totloan = sprint($myEmp['loaninstall'] * $myEmp['loanperiod']);
            $totout = sprint($myEmp['loanamt']);
            $employees .= "\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>{$myEmp['sname']}, {$myEmp['fnames']} ({$myEmp['enum']})</td>\n\t\t\t\t\t\t\t<td align='right'>" . CUR . " {$totloan}</td>\n\t\t\t\t\t\t\t<td align='right'>" . CUR . " {$totout}</td>\n\t\t\t\t\t\t\t<td align='right'>" . CUR . " {$myEmp['loaninstall']}</td>\n\t\t\t\t\t\t\t<td align='right'>{$myEmp['loanint']} %</td>\n\t\t\t\t\t\t\t<td align='right'>{$myEmp['loanperiod']} months</td>\n\t\t\t\t\t\t\t<td><a href='loan-edit.php?empnum={$myEmp['empnum']}'>Edit</a></td>\n\t\t\t\t\t\t</tr>\n";
            $i++;
        }
    }
    ########################################################################
    $display = "\n\t\t\t<h2>Summary Of Present Loans</h2>\n\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t<input type='hidden' name='key' value='input'>\n\t\t\t\t<tr>\n\t\t\t\t\t<th>Employee</th>\n\t\t\t\t\t<th>Loan amount(incl interest)</th>\n\t\t\t\t\t<th>Amount outstanding</th>\n\t\t\t\t\t<th>Monthly installment</th>\n\t\t\t\t\t<th>Loan interest</th>\n\t\t\t\t\t<th>Payback period</th>\n\t\t\t\t\t<th colspan='2'>Options</th>\n\t\t\t\t</tr>\n\t\t\t\t{$employees}\n\t\t\t</table>\n\t\t\t<br><br>\n\t\t\t<h2>Current Loan Applications</h2>\n\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t<tr>\n\t\t\t\t\t<th>Employee</th>\n\t\t\t\t\t<th>Loan Amount</th>\n\t\t\t\t\t<th>Installments</th>\n\t\t\t\t\t<th>Loan Interest Rate</th>\n\t\t\t\t\t<th>Loan Period</th>\n\t\t\t\t\t<th>Loan Date</th>\n\t\t\t\t\t<th>Loan Type</th>\n\t\t\t\t\t<th colspan='2'>Options</th>\n\t\t\t\t</tr>\n\t\t\t\t{$listing}\n\t\t\t</table><br>" . mkQuickLinks(ql("loan_apply.php", "New Loan Application"));
    return $display;
}
Exemplo n.º 14
0
function add()
{
    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);
    # Check available funds
    $cashacc = gethook("accnum", "bankacc", "name", "Petty Cash");
    core_connect();
    $sql = "SELECT (debit - credit) as bal FROM trial_bal WHERE month='" . PRD_DB . "' AND accid = '{$cashacc}' 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>";
    }
    // Layout
    $add = "\n\t\t<h3>Funds transfer to Bank</h3>\n\t\t<table " . TMPL_tblDflts . " width='300'>\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'>\n\t\t\t\t\t<select name='bankid'>";
    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'>";
    }
    while ($bacc = pg_fetch_array($banks)) {
        $add .= "<option value='{$bacc['bankid']}'>({$bacc['acctype']}) {$bacc['accname']} - {$bacc['bankname']}</option>";
    }
    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");
        }
    }
    $add .= "\n\t\t\t\t\t</select>\n\t\t\t\t</td>\n\t\t\t</tr>\n\t        <tr class='" . bg_class() . "'>\n\t        \t<td>Date</td>\n\t        \t<td>" . mkDateSelect("date", $date_year, $date_month, $date_day) . "</td>\n\t        </tr>\n\t        <tr class='" . bg_class() . "'>\n\t        \t<td>Received from</td>\n\t        \t<td valign='center'><input size='20' name='name' value='Petty Cash'></td>\n\t        </tr>\n\t        <tr class='" . bg_class() . "'>\n\t        \t<td>Description</td>\n\t        \t<td valign='center'><textarea cols='18' rows='2' name='descript'></textarea></td>\n\t        </tr>\n\t        <tr class='" . bg_class() . "'>\n\t        \t<td>Cheque Number</td>\n\t        \t<td valign='center'><input size='10' name='cheqnum'></td>\n\t        </tr>\n\t        <tr class='" . bg_class() . "'>\n\t        \t<td>Amount</td>\n\t        \t<td valign='center'>" . CUR . " <input type='text' size='10' name='amount'>&nbsp;&nbsp;Max : " . CUR . " {$accb['bal']}<input type='hidden' name='max' value='{$accb['bal']}'></td>\n\t        </tr>\n\t        <tr class='" . bg_class() . "'>\n\t        \t<td>Petty Cash Account</td>\n\t        \t<td><input type='hidden' name='accinv' value='{$acc['accid']}'>{$acc['topacc']}/{$acc['accnum']} - {$acc['accname']}</td>\n\t        </tr>\n\t\t\t<tr><td><br></td></tr>\n\t\t\t<tr>\n\t\t\t\t<td><input type='button' value='< Cancel' onClick='javascript:history.back();'></td>\n\t\t\t\t<td valign='center'><input type='submit' value='Confirm >'></td>\n\t\t\t</tr>\n\t\t</table>";
    # main table (layout with menu)
    $OUTPUT = "\n\t\t\t<center>\n\t        <table width='100%'>\n\t\t\t\t<tr>\n\t\t\t\t\t<td width='65%' align='left'>{$add}</td>\n\t\t\t\t\t<td valign='top' align='center'>\n\t\t\t\t\t\t<table " . TMPL_tblDflts . " width='65%'>\n\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t<th>Quick Links</th>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<script>document.write(getQuicklinkSpecial());</script>\n\t\t\t\t\t\t</table>\n\t\t\t\t\t</td>\n\t\t\t\t</tr>\n\t        </table>";
    return $OUTPUT;
}
function confirm($_POST, $_FILES)
{
    extract($_POST);
    $importfile = tempnam("/tmp", "cubitimport_");
    $file = fopen($_FILES["compfile"]["tmp_name"], "r");
    if ($file == false) {
        return "<li class='err'>Cannot read file.</li>" . select_file();
    }
    db_conn('cubit');
    $Sl = "\n\t\tCREATE TABLE import_data (\n\t\t\tdes1 varchar, des2 varchar,\n\t\t\tdes3 varchar, des4 varchar,\n\t\t\tdes5 varchar, des6 varchar,\n\t\t\tdes7 varchar, des8 varchar,\n\t\t\tdes9 varchar, des10 varchar,\n\t\t\tdes11 varchar, des12 varchar,\n\t\t\tdes13 varchar, des14 varchar,\n\t\t\tdes15 varchar, des16 varchar\n\t\t)";
    $Ri = @db_exec($Sl);
    $Sl = "DELETE FROM import_data";
    $Ri = db_exec($Sl) or errDie("Unable to clear import table");
    while (!feof($file)) {
        $data = safe(fgets($file, 4096));
        $datas = explode(",", $data);
        if (!isset($datas[2])) {
            continue;
        }
        $code = safe($datas[0]);
        $description = safe($datas[1]);
        $amount = sprint($datas[3]);
        $camount = sprint($datas[2]);
        $balance = sprint($datas[5]);
        $units = safe($datas[4]);
        $Sl = "\n\t\t\tINSERT INTO import_data (\n\t\t\t\tdes1, des2, des3, des4, des5, des6\n\t\t\t) VALUES (\n\t\t\t\t'{$code}', '{$description}', '{$amount}', '{$balance}', '{$units}', '{$camount}'\n\t\t\t)";
        $Rl = db_exec($Sl) or errDie("Unable to insert data.");
    }
    fclose($file);
    #get stores
    db_conn('exten');
    $get_stores = "SELECT * FROM warehouses WHERE div = '" . USER_DIV . "' ORDER BY whname";
    $run_stores = db_exec($get_stores) or errDie("Unable to get stores information.");
    if (pg_numrows($run_stores) < 1) {
        return "Unable to get stores information.";
    } else {
        $storedrop = "<select name='store'>";
        while ($sarr = pg_fetch_array($run_stores)) {
            $storedrop .= "<option value='{$sarr['whid']}'>{$sarr['whname']}</option>";
        }
        $storedrop .= "</select>";
    }
    $out = "\n\t\t<h3>Stock Import</h3>\n\t\t<form action='" . SELF . "' method='POST'>\n\t\t\t<input type='hidden' name='key' value='write'>\n\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t<tr>\n\t\t\t\t\t<th colspan='3'>Select Store</th>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td colspan='3'>{$storedrop}</td>\n\t\t\t\t</tr>\n\t\t\t\t" . TBL_BR . "\n\t\t\t\t<tr>\n\t\t\t\t\t<th>Stock Code</th>\n\t\t\t\t\t<th>Description</th>\n\t\t\t\t\t<th>Cost Price</th>\n\t\t\t\t\t<th>Selling Price</th>\n\t\t\t\t</tr>";
    db_conn('cubit');
    $Sl = "SELECT * FROM import_data";
    $Ri = db_exec($Sl);
    $i = 0;
    while ($fd = pg_fetch_array($Ri)) {
        $out .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>{$fd['des1']}</td>\n\t\t\t\t<td>{$fd['des2']}</td>\n\t\t\t\t<td>{$fd['des6']}</td>\n\t\t\t\t<td>{$fd['des3']}</td>\n\t\t\t</tr>";
        $i++;
    }
    $out .= "\n\t\t\t<tr>\n\t\t\t\t<td colspan='3' align='right'><input type='submit' value='Write &raquo;'></td>\n\t\t\t</tr>\n\t\t</form>\n\t\t</table>";
    return $out;
}
function customer_age($cusnum, $days, $fcid, $loc)
{
    $ldays = $days;
    if ($days == 149) {
        $ldays = 365 * 10;
    }
    $sql = "\n\tSELECT sum(amount) FROM cubit.stmnt\n\tWHERE cusnum='{$cusnum}' AND\n\t\tdate BETWEEN '" . extlib_ago($ldays) . "' AND '" . extlib_ago($days - 29) . "'";
    $amount_rslt = db_exec($sql) or errDie("Unable to retrieve aging.");
    $amount = pg_fetch_result($amount_rslt, 0);
    return sprint($amount);
}
Exemplo n.º 17
0
 /**
  * @param StoreEntity $store
  * @param $orderId
  * @return ErpOrderEntity
  * @throws ErpOrderNotFound
  */
 public function getOrder(StoreEntity $store, $orderId)
 {
     $request = $this->client->createRequest('GET', sprintf('%s/orders/%s', $store->getErpUrl(), $orderId), ['auth' => [$store->getErpUsername(), $store->getErpPassword()]]);
     try {
         $response = $this->sendRequest($request)->xml();
         $order = ErpOrderEntity::createFromOrderXMLObject($response, $orderId);
     } catch (\Exception $e) {
         throw new ErpOrderNotFound(sprint('Order Id %s is not yet ready'));
     }
     return $order;
 }
function recon($id)
{
    # validate input
    require_lib("validate");
    $v = new validate();
    $v->isOk($id, "num", 1, 20, "Invalid Bank Recon number.");
    # display errors, if any
    if ($v->isError()) {
        $theseErrors = "";
        $errors = $v->getErrors();
        foreach ($errors as $e) {
            $theseErrors .= "<li class=err>" . $e["msg"];
        }
        $theseErrors .= "<p><input type=button onClick='JavaScript:history.back();' value='&laquo; Correct submission'>";
        return $theseErrors;
    }
    # connect to core DB
    core_connect();
    # get the Bank Recon
    $sql = "SELECT * FROM save_bank_recon WHERE id = '{$id}'";
    $recRslt = db_exec($sql) or errDie("Unable to retrieve Bank Recon from the Database", SELF);
    if (pg_numrows($recRslt) < 1) {
        return "<center><li> Invalid Bank Recon Number.";
    }
    $rec = pg_fetch_array($recRslt);
    $recon = base64_decode($rec['recon']);
    db_conn('cubit');
    $payments = "<p>\r\n\t<h3>Reconciled Payments</h3>\r\n\t<table border=0 cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' width='80%'>\r\n\t<tr><td><b>Date</b></td><td><b>To</b></td><td><b>Description</b></td><td><b>Cheque</b></td><td><b>Amount</b></td></tr>";
    $Sl = "SELECT * FROM cashbook WHERE rid='{$id}' AND trantype='withdrawal'";
    $Ri = db_exec($Sl) or errDie("Unable to get data,");
    if (pg_num_rows($Ri) > 0) {
        while ($data = pg_fetch_array($Ri)) {
            $payments .= "<tr><td>{$data['date']}</td><td>{$data['name']}</td><td>{$data['descript']}</td><td>{$data['cheqnum']}</td><td align=right>" . CUR . " " . sprint($data['amount']) . "</td></tr>";
        }
        $payments .= "</table>";
    } else {
        $payments = "<p>There were no reconciled payments.";
    }
    $depos = "<p>\r\n\t<h3>Reconciled Deposits</h3>\r\n\t<table border=0 cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' width='80%'>\r\n\t<tr><td><b>Date</b></td><td><b>From</b></td><td><b>Description</b></td><td><b>Cheque</b></td><td><b>Amount</b></td></tr>";
    $Sl = "SELECT * FROM cashbook WHERE rid='{$id}' AND trantype='deposit'";
    $Ri = db_exec($Sl) or errDie("Unable to get data,");
    if (pg_num_rows($Ri) > 0) {
        while ($data = pg_fetch_array($Ri)) {
            $depos .= "<tr><td>{$data['date']}</td><td>{$data['name']}</td><td>{$data['descript']}</td><td>{$data['cheqnum']}</td><td align=right>" . CUR . " " . sprint($data['amount']) . "</td></tr>";
        }
        $depos .= "</table>";
    } else {
        $depos = "<p>There were no reconciled deposits.";
    }
    $OUTPUT = $recon . "</table>" . $payments . $depos;
    require "../tmpl-print.php";
}
Exemplo n.º 19
0
function display()
{
    extract($_REQUEST);
    $reports = array("acid_test", "customers_turnover", "daily_sales_in_receivables", "inventory_turnover", "days_cost_of_sales_in_inventory", "accounts_receivable_turnover", "accounts_payable_turnover", "days_cost_of_sales_in_accounts_payable", "assets_turnover", "debt_ratio", "depreciation_expense_gross_depreciable_property", "current_ratio", "working_captial", "accounts_receivable_working_capital", "inventory_working_capital", "long_term_liabilities_working_capital", "sales_working_capital", "gross_profit_turnover", "net_profit_turnover", "return_on_assets", "return_on_investment", "repairs_and_maintenance_gross_depreciation_of_property", "owners_equity", "debt_equity", "financial_leverage", "interest_net_income_excluding_interest", "operating_cycle_days");
    $not_percentage = array("daily_sales_in_receivables", "days_cost_of_sales_in_inventory", "days_cost_of_sales_in_accounts_payable", "working_capital", "operating_cycle_days");
    $i = 1;
    $reports_out = "";
    foreach ($reports as $name) {
        if ($i == 1) {
            $reports_out .= "<tr><td width='20%' valign='top'>";
        } else {
            $reports_out .= "<td width='20%' valign='top'>";
        }
        if (function_exists($name)) {
            list($description, $calculation) = call_user_func($name);
        } else {
            $description = "Not implemented.";
        }
        $calculation = sprint($calculation);
        if (!in_array($name, $not_percentage)) {
            $calculation .= "%";
        }
        $reports_out .= "\n\t\t<table " . TMPL_tblDflts . " width='100%' style='border: 1px solid #fff'>\n\t\t\t<tr><th>" . nice_name($name) . "</th></tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>\n\t\t\t\t\t<span style='font-size: 0.9em; letter-spacing: -0.065em'>\n\t\t\t\t\t\t{$description}\n\t\t\t\t\t</span>\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr bgcolor='#ffffff'>\n\t\t\t\t<td align='center'>\n\t\t\t\t\t<span style='font-size: 1.2em; color: #f00; font-weight:bold'>\n\t\t\t\t\t\t{$calculation}\n\t\t\t\t\t</span>\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t</table>";
        if ($i == 5) {
            $reports_out .= "</td></tr>";
            $i = 0;
        } else {
            $reports_out .= "</td>";
        }
        $i++;
    }
    if (!isset($heart)) {
        $sql = "SELECT value FROM cubit.settings WHERE constant='HEART'";
        $heart_rslt = db_exec($sql) or errDie("Unable to retrieve heart display value.");
        $heart = pg_fetch_result($heart_rslt, 0);
    } else {
        $sql = "UPDATE cubit.settings SET value='{$heart}' WHERE constant='HEART'";
        db_exec($sql) or errDie("Unable to update heart status");
    }
    if ($heart) {
        $heart_yes = "checked";
        $heart_no = "";
    } else {
        $heart_yes = "";
        $heart_no = "checked";
    }
    $bgcolor = bgcolorg();
    $ql = mkQuickLinks(ql("ratio_settings.php", "Link Accounts to Ratios"));
    $OUTPUT = "\n\t<table cellpadding='5' cellspacing='2'>{$reports_out}</table>\n\t<center>\n\t<form method='post' action='" . SELF . "' name='form'>\n\t<table " . TMPL_tblDflts . ">\n\t\t<tr><th colspan='2'>Display Heart on Main Menu</th></tr>\n\t\t<tr>\n\t\t\t<td class='" . bg_class() . "' align='center'>\n\t\t\t\tYes <input type='radio' name='heart' value='1'\n\t\t\t\tonchange='javascript:document.form.submit()' {$heart_yes} />\n\t\t\t</td>\n\t\t\t<td class='" . bg_class() . "' align='center'>\n\t\t\t\tNo <input type='radio' name='heart' value='0'\n\t\t\t\tonchange='javascript:document.form.submit()' {$heart_no} />\n\t\t\t</td>\n\t\t</tr>\n\t\t<tr><td colspan='2' align='center'>{$ql}</td></tr>\n\t</table>\n\t</form>\n\t</center>";
    return $OUTPUT;
}
Exemplo n.º 20
0
 function login($params)
 {
     $response = false;
     $username = strip_tags($params['username']);
     $password = strip_tags($params['password']);
     $qry = sprint("SELECT * FROM members WHERE username='******' AND password='******'", $username, $password);
     $dbres = $this->dbconnect();
     $qres = mysql_num_rows(mysql_query($qry, $dbres)) or die(mysql_error());
     if ($qres > 0) {
         $response = true;
     } else {
         $response = false;
     }
 }
function display($msg = "")
{
    extract($_REQUEST);
    $fields = array();
    $fields["search"] = "[_BLANK_]";
    extract($fields, EXTR_SKIP);
    $sql = "SELECT assets.id, des, locat, per_day, per_hour, per_week,\n\t\t\t\tper_month, serial, default_basis\n\t\t\t\tFROM cubit.assets\n\t\t\t\t\tLEFT JOIN hire.basis_prices\n\t\t\t\t\t\tON assets.id = basis_prices.assetid\n\t\t\t\tWHERE remaction IS NULL AND (\n\t\t\t\t\tdes ILIKE '{$search}%' OR serial ILIKE '%{$search}%')\n\t\t\t\tORDER BY des ASC";
    $asset_rslt = db_exec($sql);
    if ($search == "[_BLANK_]") {
        $n_msg = "Please type first few letters of the asset's name or serial";
        $search = "";
    } else {
        $n_msg = "No results found";
    }
    $basis_types = array("per_hour" => "Hourly", "per_day" => "Daily", "per_week" => "Weekly", "per_month" => "Monthly");
    $basis_out = "";
    while ($asset_data = pg_fetch_array($asset_rslt)) {
        if (empty($asset_data["per_hour"])) {
            $asset_data["per_hour"] = "0.00";
        }
        if (empty($asset_data["per_day"])) {
            $asset_data["per_day"] = "0.00";
        }
        if (empty($asset_data["per_week"])) {
            $asset_data["per_week"] = "0.00";
        }
        if (empty($asset_data["per_month"])) {
            $asset_data["per_month"] = "0.00";
        }
        if (empty($asset_data["default_basis"])) {
            $asset_data["default_basis"] = "per_day";
        }
        $types_sel = "<select name='default_basis[{$asset_data['id']}]'>";
        foreach ($basis_types as $key => $value) {
            if ($key == $asset_data["default_basis"]) {
                $sel = "selected='t'";
            } else {
                $sel = "";
            }
            $types_sel .= "<option value='{$key}' {$sel}>{$value}</option>";
        }
        $types_sel .= "</select>";
        $basis_out .= "\n\t\t<input type='hidden' name='asset[]' value='{$asset_data['id']}' />\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td>{$types_sel}</td>\n\t\t\t<td>{$asset_data['des']}</td>\n\t\t\t<td>{$asset_data['serial']}</td>\n\t\t\t<td>{$asset_data['locat']}</td>\n\t\t\t<td>\n\t\t\t\t" . CUR . "\n\t\t\t\t<input type='text' name='hour[{$asset_data['id']}]'\n\t\t\t\tvalue='" . sprint($asset_data["per_hour"]) . "' size='5'\n\t\t\t\tstyle='text-align: right' />\n\t\t\t</td>\n\t\t\t<td>\n\t\t\t\t" . CUR . "\n\t\t\t\t<input type='text' name='day[{$asset_data['id']}]'\n\t\t\t\tvalue='" . sprint($asset_data["per_day"]) . "' size='5'\n\t\t\t\tstyle='text-align: right' />\n\t\t\t</td>\n\t\t\t<td>\n\t\t\t\t" . CUR . "\n\t\t\t\t<input type='text' name='week[{$asset_data['id']}]'\n\t\t\t\tvalue='" . sprint($asset_data["per_week"]) . "' size='5'\n\t\t\t\tstyle='text-align: right' />\n\t\t\t</td>\n\t\t\t<td>\n\t\t\t\t" . CUR . "\n\t\t\t\t<input type='text' name='month[{$asset_data['id']}]'\n\t\t\t\tvalue='" . sprint($asset_data["per_month"]) . "' size='5'\n\t\t\t\tstyle='text-align: right' />\n\t\t\t</td>\n\t\t</tr>";
    }
    if (empty($basis_out)) {
        $basis_out = "\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td colspan='8'><li>{$n_msg}</li></td>\n\t\t</tr>";
    }
    $OUTPUT = "<center>\n\t<h3>Default Basis Prices</h3>\n\t<form method='post' action='" . SELF . "'>\n\t<table " . TMPL_tblDflts . ">\n\t\t<tr>\n\t\t\t<th colspan='2'>Search</th>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td><input type='text' name='search' value='{$search}' /></td>\n\t\t\t<td><input type='submit' value='Search' /></td>\n\t\t</tr>\n\t</table>\n\t</form>\n\t<form method='post' action='" . SELF . "'>\n\t<input type='hidden' name='key' value='save' />\n\t<table " . TMPL_tblDflts . ">\n\t\t{$msg}\n\t\t<tr>\n\t\t\t<th>Default Basis</th>\n\t\t\t<th>Plant</th>\n\t\t\t<th>Serial</th>\n\t\t\t<th>Location</th>\n\t\t\t<th>Hour</th>\n\t\t\t<th>Day</th>\n\t\t\t<th>Week</th>\n\t\t\t<th>Month</th>\n\t\t</tr>\n\t\t{$basis_out}\n\t\t<tr>\n\t\t\t<td colspan='8' align='center'>\n\t\t\t\t<input type='submit' value='Set Basis &raquo'\n\t\t\t\tstyle='font-weight: bold' />\n\t\t\t</td>\n\t\t</tr>\n\t</table>\n\t</form>";
    return $OUTPUT;
}
function hireNotes($errors = "")
{
    extract($_REQUEST);
    $fields = array();
    $fields["date_year"] = date("Y");
    $fields["date_month"] = date("m");
    $fields["date_day"] = date("d");
    extract($fields, EXTR_SKIP);
    // Retrieve monthly hire notes for this customer
    $sql = "SELECT * FROM hire.monthly_invoices WHERE invnum>0 AND invoiced='0'\r\n\t\t\tORDER BY invnum DESC";
    $mi_rslt = db_exec($sql) or errDie("Unable to retrieve monthly hire notes.");
    $mi_out = "";
    while ($mi_data = pg_fetch_array($mi_rslt)) {
        $sql = "SELECT *,\r\n\t\t\t\t\t(SELECT serial FROM cubit.assets WHERE id=asset_id) AS serial,\r\n\t\t\t\t\t(SELECT des FROM cubit.assets WHERE id=asset_id) as des\r\n\t\t\t\tFROM hire.monthly_invitems\r\n\t\t\t\tWHERE invid='{$mi_data['hire_invid']}'";
        $mii_rslt = db_exec($sql) or errDie("Unable to retrieve items.");
        if (!pg_num_rows($mii_rslt)) {
            $sql = "DELETE FROM hire.monthly_invoices WHERE invid='{$mi_data['invid']}'";
            db_exec($sql) or errDie("Unable to remove monthly invoice.");
            continue;
        }
        $mi_out .= "<tr>\r\n\t\t\t<th colspan='5'>Monthly Hire No: {$mi_data['invnum']}</th>\r\n\t\t\t<th align='right'>\r\n\t\t\t\t<input type='submit' name='invoice[{$mi_data['invid']}]'\r\n\t\t\t\tvalue='Invoice' />\r\n\t\t\t</th>\r\n\t\t</tr>";
        $sql = "SELECT surname, cusname FROM cubit.customers\r\n\t\t\t\t\tWHERE cusnum='{$mi_data['cusnum']}'";
        $cust_rslt = db_exec($sql) or errDie("Unable to retrieve customers.");
        $cust_data = pg_fetch_array($cust_rslt);
        while ($mii_data = pg_fetch_array($mii_rslt)) {
            if (!isset($mii_data["invoiced_month"])) {
                $mii_data["invoiced_month"] = 0;
            }
            if ($mii_data["invoiced_month"] == date("m")) {
                continue;
            }
            if (empty($mii_data["e_invoiced"])) {
                $invoiced = "Never";
            } else {
                $invoiced = date("d-m-Y", $mii_data["e_invoiced"]);
            }
            $basis = ucwords(implode(" ", explode("_", $mii_data["basis"])));
            $mi_out .= "<tr class='" . bg_class() . "'>\r\n\t\t\t\t<td>{$cust_data['surname']} {$cust_data['cusname']}</td>\r\n\t\t\t\t<td>{$basis}</td>\r\n\t\t\t\t<td>" . getSerial($mii_data["asset_id"], true) . " {$mii_data['des']}</td>\r\n\t\t\t\t<td>{$mii_data['qty']}</td>\r\n\t\t\t\t<td>" . sprint($mii_data["amt"]) . "</td>\r\n\t\t\t\t<td>&nbsp;</td>\r\n\t\t\t</tr>";
        }
    }
    if (empty($mi_out)) {
        $mi_out = "<tr class='" . bg_class() . "'>\r\n\t\t\t<td colspan='6'>No invoices found.</td>\r\n\t\t</tr>";
    }
    if (!isset($cust_id)) {
        $cust_id = 0;
    }
    $OUTPUT = "<center>\r\n\t<h3>Monthly Processing</h3>\r\n\t<form method='post' action='" . SELF . "'>\r\n\t<table " . TMPL_tblDflts . ">\r\n\t\t<tr><td colspan='2'>{$errors}</td></tr>\r\n\t\t<tr><th colspan='2'>Processing Date</th></tr>\r\n\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t<td align='center'>" . mkDateSelect("date", $date_year, $date_month, $date_day) . "</td>\r\n\t\t</tr>\r\n\t</table>\r\n\t<input type='hidden' name='cust_id' value='{$cust_id}' />\r\n\t<input type='hidden' name='key' value='invoice' />\r\n\t<table " . TMPL_tblDflts . ">\r\n\t\t<tr>\r\n\t\t\t<th>Customer</th>\r\n\t\t\t<th>Basis</th>\r\n\t\t\t<th>Item</th>\r\n\t\t\t<th>Qty</th>\r\n\t\t\t<th>Amount</th>\r\n\t\t\t<th>&nbsp;</th>\r\n\t\t</tr>\r\n\t\t{$mi_out}\r\n\t\t</form>\r\n\t\t<form method='post' action='" . SELF . "'>\r\n\t\t<input type='hidden' name='cust_id' value='{$cust_id}' />\r\n\t\t<input type='hidden' name='key' value='reset' />\r\n\t\t<tr>\r\n\t\t\t<td colspan='6' align='center'>\r\n\t\t\t\t<input type='submit' value='Reset' />\r\n\t\t\t</td>\r\n\t\t</tr>\r\n\t</table>";
    return $OUTPUT;
}
function printCenter($_GET)
{
    # Get vars
    extract($_GET);
    # Query server
    db_connect();
    $sql = "SELECT * FROM costcenters WHERE ccid = '{$ccid}'";
    $ccRslt = db_exec($sql) or errDie("Unable to retrieve Cost centers from database.");
    if (pg_numrows($ccRslt) < 1) {
        return "<li class='err'> - Invalid Cost Center.";
    }
    $cc = pg_fetch_array($ccRslt);
    $sp4 = "&nbsp;&nbsp;&nbsp;&nbsp;";
    # get income
    $income = "";
    db_conn($prd);
    $sql = "SELECT * FROM cctran WHERE ccid = '{$cc['ccid']}' AND trantype = 'dt'";
    $recRslt = db_exec($sql) or errDie("Unable to retrieve Cost Centers from database.");
    if (pg_numrows($recRslt) > 0) {
        $income = "\r\n\t\t\t\t<tr>\r\n\t\t\t\t\t<td colspan='4'><h3>Income</h3></td>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<tr>\r\n\t\t\t\t\t<th>Type</th>\r\n\t\t\t\t\t<th>Date</th>\r\n\t\t\t\t\t<th>Description</th>\r\n\t\t\t\t\t<th>Amount</th>\r\n\t\t\t\t\t<th>Posted By</th>\r\n\t\t\t\t</tr>";
        $totinc = 0;
        for ($i = 0; $rec = pg_fetch_array($recRslt); $i++) {
            $totinc += $rec['amount'];
            $rec['edate'] = ext_rdate($rec['edate']);
            $income .= "\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td>{$rec['typename']}</td>\r\n\t\t\t\t\t\t<td>{$sp4} {$rec['edate']} {$sp4}</td>\r\n\t\t\t\t\t\t<td>{$rec['description']}</td>\r\n\t\t\t\t\t\t<td align='right'>{$sp4}" . CUR . " {$rec['amount']}</td>\r\n\t\t\t\t\t\t<td>{$rec['username']}</td>\r\n\t\t\t\t\t</tr>";
        }
        $totinc = sprint($totinc);
        $income .= "\r\n\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t<td colspan='3' align='right'><b>Total</b></td>\r\n\t\t\t\t\t<td align='right'><b>" . CUR . " {$totinc}</b></td>\r\n\t\t\t\t\t<td><br></td>\r\n\t\t\t\t</tr>";
    }
    #get expenses
    $expense = "";
    db_conn($prd);
    $sql = "SELECT * FROM cctran WHERE ccid = '{$cc['ccid']}' AND trantype = 'ct'";
    $recRslt = db_exec($sql) or errDie("Unable to retrieve Cost Centers from database.");
    if (pg_numrows($recRslt) > 0) {
        $expense = "\r\n\t\t\t\t<tr><td><br></td></tr>\r\n\t\t\t\t<tr>\r\n\t\t\t\t\t<td colspan='4'><h3>Expenses</h3></td>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<tr>\r\n\t\t\t\t\t<th>Type</th>\r\n\t\t\t\t\t<th>Date</th>\r\n\t\t\t\t\t<th>Description</th>\r\n\t\t\t\t\t<th>Amount</th>\r\n\t\t\t\t\t<th>Posted By</th>\r\n\t\t\t\t</tr>";
        $totexp = 0;
        for ($i = 0; $rec = pg_fetch_array($recRslt); $i++) {
            $totexp += $rec['amount'];
            $rec['edate'] = ext_rdate($rec['edate']);
            $expense .= "\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td>{$rec['typename']}</td>\r\n\t\t\t\t\t\t<td>{$sp4} {$rec['edate']} {$sp4}</td>\r\n\t\t\t\t\t\t<td>{$rec['description']}</td>\r\n\t\t\t\t\t\t<td align='right'>{$sp4}" . CUR . " {$rec['amount']}</td>\r\n\t\t\t\t\t\t<td>{$rec['username']}</td>\r\n\t\t\t\t\t</tr>";
        }
        $totexp = sprint($totexp);
        $expense .= "\r\n\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t<td colspan='3' align='right'><b>Total</b></td>\r\n\t\t\t\t\t<td align='right'><b>" . CUR . " {$totexp}</b></td>\r\n\t\t\t\t</tr>";
    }
    $printCenter = "\r\n\t\t\t\t<center>\r\n\t\t\t\t<h3>Cost Centers Detailed Report</h3>\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>Cost Center</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>{$sp4} {$cc['centername']} ({$cc['centercode']}) {$sp4}</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 . ">\r\n\t\t\t\t\t{$income}\r\n\t\t\t\t\t{$expense}\r\n\t\t\t\t</table>\r\n\t\t\t\t<p>\r\n\t\t\t\t<form action='" . SELF . "' method='POST'>\r\n\t\t\t\t\t<input type='hidden' name='key' value='export'>\r\n\t\t\t\t\t<input type='hidden' name='ccid' value='{$ccid}'>\r\n\t\t\t\t\t<input type='hidden' name='prd' value='{$prd}'>\r\n\t\t\t\t\t<input type='submit' value='Export To Spreadsheet'>\r\n\t\t\t\t</form>\r\n\t\t\t\t<p>\r\n\t\t\t\t<p>\r\n\t\t\t\t<input type='button' value='[X] Close' onClick='javascript:window.close();'>";
    return $printCenter;
}
function edit($listid)
{
    # validate input
    require_lib("validate");
    $v = new validate();
    $v->isOk($listid, "num", 1, 50, "Invalid Price List id.");
    # display errors, if any
    if ($v->isError()) {
        $confirm = "";
        $errors = $v->getErrors();
        foreach ($errors as $e) {
            $confirm .= "<li class='err'>-" . $e["msg"] . "</li>";
        }
        return $confirm;
    }
    # Select Stock
    db_conn("exten");
    $sql = "SELECT * FROM pricelist WHERE listid = '{$listid}' AND div = '" . USER_DIV . "'";
    $listRslt = db_exec($sql) or errDie("Unable to access databse.", SELF);
    if (pg_numrows($listRslt) < 1) {
        return "<li> Invalid Price List ID.";
    } else {
        $list = pg_fetch_array($listRslt);
    }
    $vattype = getSetting("SELAMT_VAT") == 'inc' ? "Including Vat" : "Excluding Vat";
    $enter = "\r\n\t\t<h3>Price List</h3>\r\n\t\t<table " . TMPL_tblDflts . ">\r\n\t\t\t<tr>\r\n\t\t\t\t<th>Field</th>\r\n\t\t\t\t<th>Value</th>\r\n\t\t\t</tr>\r\n\t\t\t<tr>\r\n\t\t\t\t<td>Price list</td>\r\n\t\t\t\t<td align='center'>{$list['listname']}</td>\r\n\t\t\t</tr>\r\n\t\t\t<tr><td><br></td></tr>\r\n\t\t\t<tr>\r\n\t\t\t\t<td colspan='2'><h3>Prices</h3><td>\r\n\t\t\t<tr>\r\n\t\t\t<tr>\r\n\t\t\t\t<th>Item</th>\r\n\t\t\t\t<th>Price Amount</th>\r\n\t\t\t</tr>";
    # Query server
    $i = 0;
    db_conn('exten');
    $sql = "SELECT * FROM plist_prices WHERE listid = '{$listid}' AND div = '" . USER_DIV . "' AND show='Yes' ORDER BY stkid ASC";
    $stkpRslt = db_exec($sql) or errDie("Unable to retrieve stock items from database.");
    if (pg_numrows($stkpRslt) < 1) {
        return "<li class='err'> There are no stock item on the selected pricelist.</li>";
    }
    while ($stkp = pg_fetch_array($stkpRslt)) {
        db_connect();
        # get stock details
        $sql = "SELECT stkid, stkcod, stkdes FROM stock WHERE stkid = '{$stkp['stkid']}' AND div = '" . USER_DIV . "'";
        $stkRslt = db_exec($sql) or errDie("Unable to retrieve stocks from database.");
        $stk = pg_fetch_array($stkRslt);
        $enter .= "\r\n\t\t\t\t<tr>\r\n\t\t\t\t\t<td>{$stk['stkcod']} - " . extlib_rstr($stk['stkdes'], 30) . "</td>\r\n\t\t\t\t\t<td align='right'>" . CUR . " " . sprint($stkp['price']) . " {$vattype}</td>\r\n\t\t\t\t</tr>";
    }
    $enter .= "\r\n\t\t\t</table>";
    $OUTPUT = $enter;
    require "temp.xls.php";
    Stream("Pricelist", $OUTPUT);
    return $OUTPUT;
}
Exemplo n.º 25
0
function view_data($_GET)
{
    foreach ($_GET as $key => $value) {
        ${$key} = $value;
    }
    # validate input
    require_lib("validate");
    $v = new validate();
    $v->isOk($id, "num", 1, 100, "Invalid num.");
    # 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;
    }
    db_conn('cubit');
    $user = USER_NAME;
    $Sql = "SELECT * FROM assets WHERE (id = '{$id}' AND div = '" . USER_DIV . "')";
    $Rslt = db_exec($Sql) or errDie("Unable to access database.");
    if (pg_numrows($Rslt) < 1) {
        return "Asset not Found";
    }
    $set = pg_fetch_array($Rslt);
    # Get group
    db_connect();
    $sql = "SELECT * FROM assetgrp WHERE grpid = '{$set['grpid']}' AND div = '" . USER_DIV . "'";
    $grpRslt = db_exec($sql);
    $grp = pg_fetch_array($grpRslt);
    # Get Transactions
    db_connect();
    $sql = "SELECT * FROM assetledger WHERE assetid = '{$id}'";
    $tranRslt = db_exec($sql);
    $trans = "";
    while ($tran = pg_fetch_array($tranRslt)) {
        # Format date
        $tran['date'] = explode("-", $tran['date']);
        $tran['date'] = $tran['date'][2] . "-" . $tran['date'][1] . "-" . $tran['date'][0];
        $tran['depamt'] = sprint($tran['depamt']);
        $tran['netval'] = sprint($tran['netval']);
        $trans .= "\r\n\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t<td>{$tran['date']}</td>\r\n\t\t\t\t\t\t<td align='right'>" . CUR . " {$tran['depamt']}</td>\r\n\t\t\t\t\t\t<td align='right'>" . CUR . " {$tran['netval']}</td>\r\n\t\t\t\t\t</tr>";
    }
    $view_data = "\r\n\t\t\t\t<h3>Depreciation Report</h3>\r\n\t\t\t\t<table " . TMPL_tblDflts . ">\r\n\t\t\t\t\t<tr valign='top'>\r\n\t\t\t\t\t\t<td>\r\n\t\t\t\t\t\t\t<table " . TMPL_tblDflts . ">\r\n\t\t\t\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t\t\t\t<th colspan='2'>Asset Details</th>\r\n\t\t\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t\t\t<td>Group</td>\r\n\t\t\t\t\t\t\t\t\t<td>{$grp['grpname']}</td>\r\n\t\t\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t\t\t<td>Description</td>\r\n\t\t\t\t\t\t\t\t\t<td>{$set['des']}</td>\r\n\t\t\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t\t\t<td>Date Bought</td>\r\n\t\t\t\t\t\t\t\t\t<td>{$set['bdate']}</td>\r\n\t\t\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t\t\t<td>Cost Amount</td>\r\n\t\t\t\t\t\t\t\t\t<td>{$set['amount']}</td>\r\n\t\t\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t\t</table>\r\n\t\t\t\t\t\t</td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t</table>\r\n\t\t\t\t<br>\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>Date</th>\r\n\t\t\t\t\t\t<th>Accum Depreciation</th>\r\n\t\t\t\t\t\t<th>Net Value</th>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t{$trans}\r\n\t\t\t\t</table>\r\n\t\t\t\t<p>\r\n\t\t\t\t<table border=0 cellpadding='2' cellspacing='1'>\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='asset-view.php'>View Assets</a></td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<script>document.write(getQuicklinkSpecial());</script>\r\n\t\t\t\t</table>";
    return $view_data;
}
function show_receipt($_GET)
{
    extract($_GET);
    if (!isset($recid) or strlen($recid) < 1) {
        return "<li class='err'>Invalid use of module. Invalid Receipt ID.</li>";
    }
    db_connect();
    $get_rec = "SELECT * FROM cashbook WHERE cashid = '{$recid}' LIMIT 1";
    $run_rec = db_exec($get_rec) or errDie("Unable to get receipt information.");
    if (pg_numrows($run_rec) < 1) {
        return "<li class='err'>Receipt information not found.</li>";
    } else {
        $cash_arr = pg_fetch_array($run_rec);
        #get customer information
        $get_cust = "SELECT accno,surname,paddr1 FROM customers WHERE cusnum = '{$cash_arr['cusnum']}' LIMIT 1";
        $run_cust = db_exec($get_cust) or errDie("Unable to get customer information.");
        if (pg_numrows($run_cust) < 1) {
            $cus_addr = "";
            $cus_accno = "";
        } else {
            $cus_arr = pg_fetch_array($run_cust);
            $cus_addr = $cus_arr['paddr1'];
            $cus_accno = $cus_arr['accno'];
        }
        $inv_ids = explode("|", $cash_arr['rinvids']);
        $inv_amts = explode("|", $cash_arr['amounts']);
        $null1 = array_shift($inv_ids);
        $null2 = array_shift($inv_amts);
        $listing = "";
        $total = 0;
        foreach ($inv_ids as $key => $each) {
            $listing .= "\n\t\t\t\t<tr>\n\t\t\t\t\t<td>{$cash_arr['date']}</td>\n\t\t\t\t\t<td>{$cash_arr['reference']}</td>\n\t\t\t\t\t<td>" . CUR . " " . sprint($inv_amts[$key]) . "</td>\n\t\t\t\t</tr>";
            $total = $total + $inv_amts[$key];
        }
        $unalloc = $cash_arr['amount'] - $total;
        if ($unalloc > 0) {
            $listing .= "\n\t\t\t\t<tr>\n\t\t\t\t\t<td>{$cash_arr['date']}</td>\n\t\t\t\t\t<td>{$cash_arr['reference']} (Unallocated)</td>\n\t\t\t\t\t<td>" . CUR . " " . sprint($unalloc) . "</td>\n\t\t\t\t</tr>";
            $total += $unalloc;
        }
        $listing .= "\n\t\t\t<tr>\n\t\t\t\t<td colspan='2' align='right'><b>Total:</b></td>\n\t\t\t\t<td>" . CUR . " " . sprint($total) . "</td>\n\t\t\t</tr>";
        $receiptnumber = $cash_arr['cashid'];
    }
    $comments = getCSetting("DEFAULT_BANK_RECPT_COMMENTS");
    $rborder = "style='border-right: 2px solid #000'";
    $display = "\n\t\t<style>\n\t\t\ttable { border: 2px solid #000 }\n\t\t</style>\n\t\t<table border='0' cellpadding='2' cellspacing='2' width='80%' align='center'>\n\t\t\t<tr>\n\t\t\t\t<td width='30%'></td>\n\t\t\t\t<td align='center'><font size='5'><b>" . COMP_NAME . "</b></font></td>\n\t\t\t\t<td align='right'><font size='4'><b>Customer Receipt</b></font></td>\n\t\t\t</tr>\n\t\t</table>\n\t\t<p>\n\t\t<table cellpadding='1' cellspacing='0' width='80%' align='center'>\n\t\t\t<tr>\n\t\t\t\t<td {$rborder}>\n\t\t\t\t\t<b>" . COMP_NAME . "</b><br>\n\t\t\t\t\t" . COMP_ADDRESS . "<br>\n\t\t\t\t\t" . COMP_PADDR . "\n\t\t\t\t</td>\n\t\t\t\t<td>\n\t\t\t\t\t<b>Received From:</b><br>\n\t\t\t\t\t{$cash_arr['name']}<br>\n\t\t\t\t\t{$cus_addr}<br>\n\t\t\t\t\t<br>\n\t\t\t\t\t<b>Account Number:</b> {$cus_accno}<br>\n\t\t\t\t\t<b>Receipt Number:</b> {$receiptnumber}\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t</table>\n\t\t<p>\n\t\t<table " . TMPL_tblDflts . " width='80%' align='center'>\n\t\t\t<tr>\n\t\t\t\t<td><b>Date</b></td>\n\t\t\t\t<td><b>Ref Num</b></td>\n\t\t\t\t<td><b>Amount</b></td>\n\t\t\t</tr>\n\t\t\t{$listing}\n\t\t\t" . TBL_BR . "\n\t\t\t" . TBL_BR . "\n\t\t</table>\n\t\t<p>\n\t\t<table " . TMPL_tblDflts . " width='80%' align='center'>\n\t\t\t" . TBL_BR . "\n\t\t\t<tr>\n\t\t\t\t<td width='60%'>" . nl2br(base64_decode($comments)) . "</td>\n\t\t\t\t<td align='right'>_____________________________________</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td></td>\n\t\t\t\t<td align='center'>Signature</td>\n\t\t\t</tr>\n\t\t</table>\n\t\t<div style='position:absolute;left:11%'>\n\t\t<font size='1'>&#169 Cubit Accounting Software</font>\n\t\t</div>";
    return $display;
}
function get_report_parms($_POST, $err = "")
{
    extract($_POST);
    db_connect();
    $view_report = "";
    if (isset($search) and strlen($search) > 0) {
        if (!isset($medical_aid) or !is_array($medical_aid)) {
            unset($_POST["search"]);
            return get_report_parms($_POST, "<li class='err'>Please Select At Least One Medical Aid.</li>");
        }
        foreach ($medical_aid as $mid) {
            $med_total = 0;
            $get_med = "SELECT * FROM medical_aid WHERE id = '{$mid}' LIMIT 1";
            $run_med = db_exec($get_med) or errDie("Unable to get medical aid information.");
            $marr = pg_fetch_array($run_med);
            $view_report .= "\n\t\t\t\t<tr>\n\t\t\t\t\t<th colspan='3'>{$marr['medical_aid_name']}</th>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Contact</td>\n\t\t\t\t\t<td colspan='2'>{$marr['medical_aid_contact_number']}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Bank Name</td>\n\t\t\t\t\t<td colspan='2'>{$marr['medical_aid_bank_name']}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Bank Branch</td>\n\t\t\t\t\t<td colspan='2'>{$marr['medical_aid_bank_branch']}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>Bank Account</td>\n\t\t\t\t\t<td colspan='2'>{$marr['medical_aid_bank_account']}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<th>Employee Name</th>\n\t\t\t\t\t<th>Medical Aid Number</th>\n\t\t\t\t\t<th>Contribution Amount</th>\n\t\t\t\t</tr>";
            #get all emps using this medical aid
            $get_emps = "SELECT * FROM employees WHERE medical_aid = '{$mid}' ORDER BY sname, fnames";
            $run_emps = db_exec($get_emps) or errDie("Unable to get employee information.");
            if (pg_numrows($run_emps) > 0) {
                while ($earr = pg_fetch_array($run_emps)) {
                    $earr['comp_medical'] += 0;
                    $view_report .= "\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>{$earr['sname']}, {$earr['fnames']}</td>\n\t\t\t\t\t\t\t<td>{$earr['medical_aid_number']}</td>\n\t\t\t\t\t\t\t<td align='right'>" . CUR . " " . sprint($earr['comp_medical']) . "</td>\n\t\t\t\t\t\t</tr>";
                    $med_total += $earr['comp_medical'];
                }
                $view_report .= "\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<th colspan='2'>Total</th>\n\t\t\t\t\t\t<td align='right'>" . CUR . " " . sprint($med_total) . "</td>\n\t\t\t\t\t</tr>";
            } else {
                $view_report .= "\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td colspan='3'>No Employees Using This Medical Aid Option.</td>\n\t\t\t\t\t</tr>";
            }
            $view_report .= "<tr><td><br></td></tr>";
        }
    }
    $get_meds = "SELECT * FROM medical_aid ORDER BY medical_aid_name";
    $run_meds = db_exec($get_meds) or errDie("Unable to get medical aid information.");
    if (pg_numrows($run_meds) > 0) {
        $medical_aid_drop = "<select name='medical_aid[]' multiple size='5'>";
        while ($marr = pg_fetch_array($run_meds)) {
            $medical_aid_drop .= "<option value='{$marr['id']}'>{$marr['medical_aid_name']}</option>";
        }
        $medical_aid_drop .= "</select>";
    } else {
        $medical_aid_drop = "No Medical Aid Options Found.";
    }
    $display = "\n\t\t<h3>Medical Aid Report</h3>\n\t\t{$err}\n\t\t<form action='" . SELF . "' method='POST'>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t<tr>\n\t\t\t\t<th>Medical Aid Options</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>{$medical_aid_drop}</td>\n\t\t\t</tr>\n\t\t\t" . TBL_BR . "\n\t\t\t<tr>\n\t\t\t\t<td align='right'><input type='submit' name='search' value='Search'></td>\n\t\t\t</tr>\n\t\t\t" . TBL_BR . "\n\t\t\t{$view_report}\n\t\t</table>\n\t\t</form>";
    return $display;
}
Exemplo n.º 28
0
function win($_POST)
{
    # get vars
    foreach ($_POST as $key => $value) {
        ${$key} = $value;
    }
    /* --------------------------- bal ------------------------------*/
    $report = "";
    core_connect();
    $sql = "SELECT * FROM trialgrpaccids WHERE gkey = '{$gkey}'";
    $gaccRslt = db_exec($sql) or errDie("Unable to get group accounts information.");
    while ($gacc = pg_fetch_array($gaccRslt)) {
        $sql = "SELECT * FROM trial_bal WHERE accid = '{$gacc['accid']}' AND div = '" . USER_DIV . "'";
        $accRslt = db_exec($sql) or errDie("Unable to view account.");
        $acc = pg_fetch_array($accRslt);
        $report .= "<tr class='bg-even'><td>{$acc['topacc']}/{$acc['accnum']} - {$acc['accname']}</td>";
        if (true) {
            if ($acc['debit'] > $acc['credit']) {
                $acc['debit'] = sprint($acc['debit'] - $acc['credit']);
                $acc['credit'] = 0;
            }
            if ($acc['credit'] > $acc['debit']) {
                $acc['credit'] = sprint($acc['credit'] - $acc['debit']);
                $acc['debit'] = 0;
            }
            if ($acc['credit'] == $acc['debit']) {
                $acc['credit'] = 0;
                $acc['debit'] = 0;
            }
        }
        if (floatval($acc['debit']) == 0) {
            $report .= "<td align=right> - </td>";
        } else {
            $report .= "<td align=right>{$acc['debit']}</td>";
        }
        if (floatval($acc['credit']) == 0) {
            $report .= "<td align=right> - </td>";
        } else {
            $report .= "<td align=right>{$acc['credit']}</td>";
        }
        $report .= "</tr>";
    }
    /* -- Final Layout -- */
    $details = "<center><h3>Trial Balance Note 000/00{$gkey}</h3>\r\n\t<table cellpadding='" . TMPL_tblCellPadding . "' cellspacing='" . TMPL_tblCellSpacing . "' border=0 width=360>\r\n\t<tr><th>Accounts</th><th>Debit</th><th>Credit</th></tr>\r\n\t{$report}\r\n\t<tr><td><br></td></tr>\r\n\t<tr><td colspan=3 align=center><input type=button value='[X]Close' onClick='javascript:window.close();'></td></tr>\r\n\t</table>";
    return $details;
}
function details($_GET)
{
    # get vars
    extract($_GET);
    # validate input
    require_lib("validate");
    $v = new validate();
    $v->isOk($rpurid, "num", 1, 20, "Invalid purchase number.");
    $v->isOk($prd, "num", 1, 20, "Invalid period Database number.");
    # display errors, if any
    if ($v->isError()) {
        $err = "";
        $errors = $v->getErrors();
        foreach ($errors as $e) {
            $err .= "<li class='err'>" . $e["msg"] . "</li>";
        }
        return $confirm;
    }
    db_conn($prd);
    $sql = "SELECT * FROM rnons_purch_int WHERE purid='{$rpurid}'";
    $purRslt = db_exec($sql) or errDie("Unable to retrieve purchase information from Cubit.");
    $pur = pg_fetch_array($purRslt);
    /* --- Start Products Display --- */
    # Products layout
    $products = "\r\n\t<table " . TMPL_tblDflts . " width=100%>\r\n\t<tr>\r\n\t\t<th>ITEM NUMBER</th>\r\n\t\t<th>DESCRIPTION</th>\r\n\t\t<th>QTY</th>\r\n\t\t<th>UNIT PRICE</th>\r\n\t\t<th>AMOUNT</th>\r\n\t<tr>";
    # get selected stock in this purchase
    db_conn($prd);
    $sql = "SELECT * FROM rnons_purint_items  WHERE purid='{$rpurid}'";
    $stkdRslt = db_exec($sql);
    while ($stkd = pg_fetch_array($stkdRslt)) {
        $amt = sprint($stkd['unitcost'] * $stkd['qty']);
        # put in product
        $products .= "\r\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t<td>{$stkd['cod']}</td>\r\n\t\t\t\t\t\t\t<td>{$stkd['des']}</td>\r\n\t\t\t\t\t\t\t<td align='right'>{$stkd['qty']}</td>\r\n\t\t\t\t\t\t\t<td align='right' nowrap>" . CUR . " {$stkd['unitcost']}</td>\r\n\t\t\t\t\t\t\t<td align='right' nowrap>" . CUR . " {$amt}</td>\r\n\t\t\t\t\t\t</tr>";
    }
    $products .= "</table>";
    /* --- Start Some calculations --- */
    # Get subtotal
    $SUBTOT = sprint($pur['subtot']);
    /* --- End Some calculations --- */
    # format date
    list($ryear, $rmon, $rday) = explode("-", $pur['rdate']);
    /* -- Final Layout -- */
    $details = "\r\n\t\t\t\t\t<center>\r\n\t\t\t\t\t<h3>Returned International Non Stock Purchase Details</h3>\r\n\t\t\t\t\t<table " . TMPL_tblDflts . " width='95%'>\r\n\t\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t\t<td valign='top'>\r\n\t\t\t\t\t\t\t\t<table " . TMPL_tblDflts . ">\r\n\t\t\t\t\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t\t\t\t\t<th colspan='2'> Supplier Details </th>\r\n\t\t\t\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t\t\t\t<td>Supplier</td>\r\n\t\t\t\t\t\t\t\t\t\t<td valign='center'>{$pur['supplier']}</td>\r\n\t\t\t\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t\t\t\t<td valign='top'>Supplier Address</td>\r\n\t\t\t\t\t\t\t\t\t\t<td valign='center'>" . nl2br($pur['supaddr']) . "</td>\r\n\t\t\t\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t\t\t</table>\r\n\t\t\t\t\t\t\t</td>\r\n\t\t\t\t\t\t\t<td valign='top' align='right'>\r\n\t\t\t\t\t\t\t\t<table " . TMPL_tblDflts . ">\r\n\t\t\t\t\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t\t\t\t\t<th colspan='2'> Purchase Details </th>\r\n\t\t\t\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t\t\t\t<td>Purchase No.</td>\r\n\t\t\t\t\t\t\t\t\t\t<td valign='center'>{$pur['purnum']}</td>\r\n\t\t\t\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t\t\t\t<td>Delivery Ref No.</td>\r\n\t\t\t\t\t\t\t\t\t\t<td valign='center'>{$pur['refno']}</td>\r\n\t\t\t\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t\t\t\t<td>Terms</td>\r\n\t\t\t\t\t\t\t\t\t\t<td valign='center'>{$pur['terms']} Days</td>\r\n\t\t\t\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t\t\t\t<td>Date</td>\r\n\t\t\t\t\t\t\t\t\t\t<td valign='center'>{$rday}-{$rmon}-{$ryear}</td>\r\n\t\t\t\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t\t\t</table>\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><td>&nbsp</td></tr>\r\n\t\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t\t<td colspan='2'>{$products}</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>\r\n\t\t\t\t\t\t\t\t<table " . TMPL_tblDflts . ">\r\n\t\t\t\t\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t\t\t\t\t<th width='50%'>Quick Links</th>\r\n\t\t\t\t\t\t\t\t\t\t<th width='45%'>Remarks</th>\r\n\t\t\t\t\t\t\t\t\t\t<td rowspan='5' valign='top' width='15%'><br></td>\r\n\t\t\t\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t\t\t\t\t<td class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t\t\t\t\t<a href='purch-int-new.php'>New International Purchase</a>\r\n\t\t\t\t\t\t\t\t\t\t</td>\r\n\t\t\t\t\t\t\t\t\t\t<td class='" . bg_class() . "' rowspan='4' align='center' valign='top'>\r\n\t\t\t\t\t\t\t\t\t\t\t" . nl2br($pur['remarks']) . "\r\n\t\t\t\t\t\t\t\t\t\t</td>\r\n\t\t\t\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t\t\t\t<td><a href='purch-int-view-prd.php'>View Received International Purchases</a></td>\r\n\t\t\t\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t\t\t\t<script>document.write(getQuicklinkSpecial());</script>\r\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t\t\t\t<td><a href='main.php'>Main Menu</a></td>\r\n\t\t\t\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t\t\t</table>\r\n\t\t\t\t\t\t\t</td>\r\n\t\t\t\t\t\t\t<td align='right'>\r\n\t\t\t\t\t\t\t\t<table " . TMPL_tblDflts . " width='80%'>\r\n\t\t\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\r\n\t\t\t\t\t\t\t\t\t\t<th>Total Cost Returned</th>\r\n\t\t\t\t\t\t\t\t\t\t<td align='right' nowrap>{$pur['curr']} {$SUBTOT}</td>\r\n\t\t\t\t\t\t\t\t\t</tr>\r\n\t\t\t\t\t\t\t\t</table>\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</table>\r\n\t\t\t\t\t</form>\r\n\t\t\t\t\t</center>";
    return $details;
}
Exemplo n.º 30
0
 private static function output_file_content($filename, $disposition)
 {
     if ($filename instanceof \org\rhaco\io\File) {
         if (is_file($filename->fullname())) {
             $filename = $filename->fullname();
         } else {
             \org\rhaco\net\http\Header::send('Last-Modified', gmdate('D, d M Y H:i:s') . ' GMT');
             \org\rhaco\net\http\Header::send('Content-Type', $filename->mime() . '; name=' . $filename->name());
             \org\rhaco\net\http\Header::send('Content-Disposition', $disposition . '; filename=' . $filename->name());
             print $filename->value();
             exit;
         }
     }
     if (is_file($filename)) {
         $update = @filemtime($filename);
         if (isset($_SERVER['HTTP_IF_MODIFIED_SINCE']) && $update <= strtotime($_SERVER['HTTP_IF_MODIFIED_SINCE'])) {
             \org\rhaco\net\http\Header::send_status(304);
             exit;
         }
         \org\rhaco\net\http\Header::send('Last-Modified', gmdate('D, d M Y H:i:s', $update) . ' GMT');
         \org\rhaco\net\http\Header::send('Content-Type', self::mime($filename) . '; name=' . basename($filename));
         \org\rhaco\net\http\Header::send('Content-Disposition', $disposition . '; filename=' . basename($filename));
         if (isset($_SERVER['HTTP_RANGE']) && preg_match("/^bytes=(\\d+)\\-(\\d+)\$/", $_SERVER['HTTP_RANGE'], $range)) {
             list($null, $offset, $end) = $range;
             $length = $end - $offset + 1;
             \org\rhaco\net\http\Header::send_status(206);
             \org\rhaco\net\http\Header::send('Accept-Ranges', 'bytes');
             \org\rhaco\net\http\Header::send('Content-length', sprint('%u', $length));
             \org\rhaco\net\http\Header::send('Content-Range', sprintf('bytes %u-%u/%u', $offset, $end, filesize($filename)));
             print file_get_contents($filename, null, null, $offset, $length);
             exit;
         } else {
             \org\rhaco\net\http\Header::send('Content-length', sprintf('%u', filesize($filename)));
             $fp = fopen($filename, 'rb');
             while (!feof($fp)) {
                 echo fread($fp, 8192);
                 flush();
             }
             fclose($fp);
             exit;
         }
     }
     \org\rhaco\net\http\Header::send_status(404);
     exit;
 }