Exemple #1
0
function TampilkanDataBIPOT($gels, $gel, $pmb)
{
    HapusBIPOTScript();
    $s = "select bm.*, s.Nama as _saat,\r\n    format(bm.Jumlah, 0) as JML,\r\n    format(bm.TrxID*bm.Besar, 0) as BSR,\r\n    format(bm.Dibayar, 0) as BYR\r\n    from bipotmhsw bm\r\n      left outer join bipot2 b2 on bm.BIPOT2ID = b2.BIPOT2ID\r\n      left outer join saat s on b2.SaatID = s.SaatID\r\n    where bm.PMBMhswID = 0\r\n      and bm.KodeID = '" . KodeID . "'\r\n      and bm.PMBID = '{$pmb['PMBID']}'\r\n    order by b2.Prioritas, bm.TrxID, bm.BIPOTMhswID";
    $r = _query($s);
    $n = 0;
    echo "<table class=box cellspacing=1 align=center width=800>";
    echo "<tr>\r\n    <th class=ttl colspan=10>Daftar Biaya & Potongan (BIPOT)</th>\r\n    </tr>";
    echo "<tr>\r\n    <th class=ttl colspan=2>#</th>\r\n    <th class=ttl>Keterangan</th>\r\n    <th class=ttl>Jumlah &times;<br />Besar</th>\r\n    <th class=ttl>Total</th>\r\n    <th class=ttl>Dibayar</th>\r\n    <th class=ttl>Catatan</th>\r\n    <th class=ttl>&times;</th>\r\n    </tr>";
    while ($w = _fetch_array($r)) {
        $n++;
        $sub = $w['Jumlah'] * $w['Besar'] * $w['TrxID'];
        $_sub = number_format($sub);
        $ttl += $sub;
        $byr += $w['Dibayar'];
        if ($_SESSION['_LevelID'] == 1) {
            //if($w['Dibayar']>0){
            $del = $w['Dibayar'] > 0 ? '&nbsp;' : "<a href='#' onClick=\"BIPOTDELCONF({$w['BIPOTMhswID']}, '{$pmb['PMBID']}')\"><img src='img/del.gif' /></a>";
        }
        $TambahanNama = empty($w['TambahanNama']) ? "" : "({$w['TambahanNama']})";
        echo "<tr>\r\n      <td class=inp width=15>{$n}</td>\r\n      <td class=ul width=10>\r\n        <a href='#' onClick=\"javascript:BIPOTEdit('{$pmb['PMBID']}', 0, {$w['BIPOTMhswID']})\"><img src='img/edit.png' /></a>\r\n        </td>\r\n      <td class=ul>\r\n        {$w['Nama']} {$TambahanNama}<br />\r\n        <div align=right><sub>{$w['_saat']}</sub></div>\r\n        </td>\r\n      <td class=ul norwap>\r\n        <sup>{$w['JML']} &times;</sup><br />\r\n        <div align=right>{$w['BSR']}</div>\r\n        </td>\r\n      <td class=ul align=right nowrap>{$_sub}</td>\r\n      <td class=ul align=right nowrap>\r\n        {$w['BYR']} <!--\r\n        <a href='#' onClick=\"javascript:ByrEdit('{$pmb['PMBID']}', 1, 0, {$w['PMBMhswID']})\"><img src='img/edit.png' /></a>\r\n        -->\r\n        </td>\r\n      <td class=ul1>{$w['Catatan']}&nbsp;</td>\r\n      <td class=ul1 align=center width=10>\r\n        {$del}\r\n        </td>\r\n      </tr>";
    }
    $TTL = number_format($ttl);
    $BYR = number_format($byr);
    $SS = number_format($ttl - $byr);
    echo "<tr><td bgcolor=silver colspan=10 height=1></td></tr>";
    echo "<tr>\r\n    <td class=ul1 colspan=4 align=right><b>Total:</td>\r\n    <td class=ul1 align=right><b>{$TTL}</b></td>\r\n    <td class=ul1 align=right><b>{$BYR}</b></td>\r\n    <td class=ul1 colspan=2>Sisa: <font size=+1>{$SS}</font></td>\r\n    </tr>";
    echo "</table>";
}
Exemple #2
0
function TampilkanDataBIPOT($gels, $gel, $pmb)
{
    HapusBIPOTScript();
    $s = "select bm.*, s.Nama as _saat,\r\n    format(bm.Jumlah, 0) as JML,\r\n    format(bm.TrxID*bm.Besar, 0) as BSR,\r\n    format(bm.Dibayar, 0) as BYR\r\n    from bipotmhsw bm\r\n      left outer join bipot2 b2 on bm.BIPOT2ID = b2.BIPOT2ID\r\n      left outer join saat s on b2.SaatID = s.SaatID\r\n    where bm.PMBMhswID = 0\r\n      and bm.KodeID = '" . KodeID . "'\r\n      and bm.PMBID = '{$pmb['PMBID']}'\r\n    order by bm.TagihanID, b2.Prioritas, bm.TrxID DESC, bm.BIPOTMhswID ";
    //order by b2.Prioritas, bm.TrxID DESC, bm.BIPOTMhswID
    $r = _query($s);
    $n = 0;
    echo "<table class=box cellspacing=1 align=center width=900>";
    echo "<tr>\r\n    <th class=ttl colspan=10>Daftar Biaya & Potongan (BIPOT)</th>\r\n    </tr>";
    echo "<tr>\r\n    <th class=ttl colspan=2>#</th>\r\n    <th class=ttl>Keterangan</th>\r\n    <th class=ttl>Jumlah &times;<br />Besar</th>\r\n    <th class=ttl>Total</th>\r\n    <th class=ttl>Dibayar</th>\r\n    <th class=ttl>Catatan</th>\r\n    <th class=ttl colspan=2>&times;</th>    \r\n    </tr>";
    while ($w = _fetch_array($r)) {
        $n++;
        $sub = $w['Jumlah'] * $w['Besar'] * $w['TrxID'];
        $_sub = number_format($sub);
        $ttl += $sub;
        $byr += $w['Dibayar'];
        if ($_SESSION['_LevelID'] == 1 || $_SESSION['_LevelID'] == 70) {
            // hanya superuser atau ka. keu
            if ($pmb['PrintTagihan'] >= 1) {
                $edit = "";
                //($w[BYR] == 0 || $w[TrxID] == -1)? "<a href='#' onClick=\"javascript:BIPOTEdit('$mhsw[MhswID]', '$khs[TahunID]', 0, $w[BIPOTMhswID])\"><img src='img/edit.png' /> </a>" : "";
                $del = "";
                //($w[BYR] == 0 || $w[TrxID] == -1)? "<a href='#' onClick=\"BIPOTDELCONF($w[BIPOTMhswID], '$mhsw[MhswID]', '$khs[TahunID]')\"><img src='img/del.gif' /></a>" : "";
            } else {
                $byrm2 = GetFields('bayarmhsw2', "BIPOTMhswID='{$w['BIPOTMhswID']}' and NA", 'N', 'BayarMhswID, Jumlah');
                $byrm_jml = GetaField('bayarmhsw', "BayarMhswID='{$byrm2['BayarMhswID']}' and NA", 'N', 'Jumlah') + 0;
                $edit = "<a href='#' onClick=\"javascript:BIPOTEdit('{$pmb['PMBID']}', 0, {$w['BIPOTMhswID']})\"><img src='img/edit.png' title='Untuk Mengedit Biaya/Potongan' /></a>";
                //$del = ($w['Dibayar']>0)? '&nbsp;':"<a href='#' onClick=\"BIPOTDELCONF($w[BIPOTMhswID], '$pmb[PMBID]')\"><img src='img/del.gif' /></a>";
                $del = "<a href='#' onClick=\"BIPOTDELCONF({$w['BIPOTMhswID']}, '{$pmb['PMBID']}')\"><img src='img/del.gif' /></a>";
            }
        } else {
            $edit = "";
            //($w[BYR] == 0 || $w[TrxID] == -1)? "<a href='#' onClick=\"javascript:BIPOTEdit('$mhsw[MhswID]', '$khs[TahunID]', 0, $w[BIPOTMhswID])\"><img src='img/edit.png' /> </a>" : "";
            $del = "";
            //($w[BYR] == 0 || $w[TrxID] == -1)? "<a href='#' onClick=\"BIPOTDELCONF($w[BIPOTMhswID], '$mhsw[MhswID]', '$khs[TahunID]')\"><img src='img/del.gif' /></a>" : "";
        }
        $TambahanNama = empty($w['TambahanNama']) ? "" : "({$w['TambahanNama']})";
        $TombolTambahBipot2 = "";
        if ($w['TrxID'] == 1) {
            $TombolTambahBipot2 = "<a href='#' onClick=\"javascript:BIPOTEdit2('{$pmb['PMBID']}', 1, 0 , {$w['TagihanID']})\"><img src='img/N.gif' title='Untuk Menginputkan Potongan' /></a>";
        }
        echo "<tr>\r\n      <td class=inp width=15>{$n}</td>\r\n      <td class=ul width=10>{$TombolTambahBipot2}</td>\r\n      <td class=ul>{$w['Nama']} {$TambahanNama}<br /><div align=right><sub>{$w['_saat']}</sub></div></td>\r\n      <td class=ul norwap><sup>{$w['JML']} &times;</sup><br /><div align=right>{$w['BSR']}</div></td>\r\n      <td class=ul align=right nowrap>{$_sub}</td>\r\n      <td class=ul align=right nowrap>{$w['BYR']}</td>\r\n      <td class=ul >&nbsp;{$w['Catatan']}&nbsp;</td>\r\n      <td class=ul1 align=center width=15>{$edit}</td>\r\n      <td class=ul1 align=center width=15>{$del}</td>\r\n    </tr>";
    }
    $TTL = number_format($ttl);
    $BYR = number_format($byr);
    $SS = number_format($ttl - $byr);
    echo "<tr><td bgcolor=silver colspan=10 height=1></td></tr>";
    echo "<tr>\r\n    <td class=ul1 colspan=4 align=right><b>Total:</td>\r\n    <td class=ul1 align=right><b>{$TTL}</b></td>\r\n    <td class=ul1 align=right><b>{$BYR}</b></td>\r\n    <td class=ul1 colspan=2>Sisa: <font size=+1>{$SS}</font></td>\r\n    </tr>";
    echo "</table>";
}