Exemplo n.º 1
0
function DftrBipotIsi1()
{
    global $mnux, $tok;
    $arrbenar = GetFields('beasiswa', 'BeasiswaID', $_SESSION['beasiswaid'], "ProgramID, ProdiID");
    if ($arrbenar['ProgramID'] == $_SESSION['prid'] and $arrbenar['ProdiID'] == $_SESSION['prodi']) {
        $s = "select b.*\r\n\t\t\tfrom beasiswa b\r\n\t\t\twhere BIPOTID = {$_SESSION['bipotid']} and KodeID='" . KodeID . "'\r\n\t\t\torder by b.IPKMin DESC, b.IPKMax DESC";
        $r = _query($s);
        $ftr = "</table></p>";
        $TrxID = -100;
        $cnt = 0;
        $a = BuatMenuBipotIsi();
        while ($w = _fetch_array($r)) {
            $a .= HdrBipotIsi('Beasiswa', $TrxID);
            // menggunakan script?
            // Tampilkan data
            $cnt++;
            $c = $w['NA'] == 'Y' ? 'class=nac' : 'class=ul';
            $a .= "<tr>\r\n      <td {$c} nowrap align=center>\r\n        <a href='?mnux={$mnux}&tok={$tok}&sub1=BIPOTIsiEdt&md=0'>\r\n        {$cnt}\r\n        <br />\r\n        <img src='img/edit.png'>\r\n        </a></td>\r\n      <td {$c}>{$w['Nama']}</td>\r\n      <td {$c} align=right>\r\n        {$w['Jumlah']} \r\n        <hr size=1 color=silver />\r\n        <div align=left></div>\r\n        </td>\r\n\t  <td {$c} align=right>\r\n        {$w['Persen']} \r\n        <hr size=1 color=silver />\r\n        <div align=left></div>\r\n        </td>\r\n      <td {$c}>{$w['StatusAwalID']}\r\n        <hr size=1 color=silver />\r\n        {$w['StatusMhswID']}</td>\r\n      <td {$c} align=center>\r\n        {$w['IPKMin']}&nbsp;</td>\r\n\t  <td {$c} align=center>\r\n        {$w['IPKMax']}&nbsp;</td>\r\n      <td {$c} align=center><img src='img/book{$w['NA']}.gif'></td>\r\n      </tr>";
            $a .= "<tr><td bgcolor=silver colspan=10 height=1></td></tr>";
        }
        $a .= "</table></p>";
    } else {
        $a = '';
    }
    return $a;
}
Exemplo n.º 2
0
function DftrBipotIsi1()
{
    global $mnux, $tok;
    $arrbenar = GetFields('bipot', 'BIPOTID', $_SESSION['bipotid'], "ProgramID, ProdiID");
    if ($arrbenar['ProgramID'] == $_SESSION['prid'] and $arrbenar['ProdiID'] == $_SESSION['prodi']) {
        $s = "select b2.*, bn.Nama, format(b2.Jumlah, 0) as JML,\r\n      t.Nama as NMTRX, s.Nama as SAAT\r\n      from bipot2 b2\r\n      left outer join bipotnama bn on b2.BIPOTNamaID=bn.BIPOTNamaID\r\n      left outer join saat s on b2.SaatID=s.SaatID\r\n      left outer join trx t on b2.TrxID=t.TrxID\r\n      where b2.BIPOTID='{$_SESSION['bipotid']}' and KodeID='{$_SESSION['KodeID']}'\r\n      order by b2.TrxID, b2.Prioritas, b2.GradeNilai";
        $r = _query($s);
        $ftr = "</table></p>";
        $TrxID = -100;
        $cnt = 0;
        $a = BuatMenuBipotIsi();
        while ($w = _fetch_array($r)) {
            // Buat header & footer
            if ($TrxID != $w['TrxID']) {
                $TrxID = $w['TrxID'];
                if ($cnt > 0) {
                    $a .= $ftr;
                }
                $a .= HdrBipotIsi($w['NMTRX'], $TrxID);
            }
            // menggunakan script?
            $scr = $w['GunakanScript'] == 'Y' ? "<img src='img/gear.gif' width=20 title='{$w['NamaScript']}'>" : "&nbsp;";
            // Tampilkan data
            $cnt++;
            $c = $w['NA'] == 'Y' ? 'class=nac' : 'class=ul';
            $a .= "<tr>\r\n      <td {$c} nowrap><a href='?mnux={$mnux}&tok={$tok}&sub1=BipotIsiEdt&md=0&bipot2={$w['BIPOT2ID']}&trxid={$w['TrxID']}&trxnama={$w['NMTRX']}'><img src='img/edit.png'>\r\n      {$w['Prioritas']} </a></td>\r\n      <td {$c}>{$w['Nama']}</td>\r\n      <td {$c} align=right>{$w['JML']}</td>\r\n      <td {$c}>{$w['SAAT']}</td>\r\n      <td {$c} align=center><img src='img/{$w['Otomatis']}.gif'></td>\r\n      <td {$c} align=center>{$scr}</td>\r\n      <td {$c} align=right>{$w['KaliSesi']}</td>\r\n      <td {$c}>{$w['StatusAwalID']}</td>\r\n      <td {$c}>{$w['StatusMhswID']}</td>\r\n      <td {$c}><img src='img/{$w['GunakanGradeNilai']}.gif'> {$w['GradeNilai']}</td>\r\n      <td {$c} align=center><img src='img/book{$w['NA']}.gif'></td>\r\n      </tr>";
        }
        $a .= "</table></p>";
    } else {
        $a = '';
    }
    return $a;
}
Exemplo n.º 3
0
function DftrBipotIsi1()
{
    global $mnux, $tok;
    $arrbenar = GetFields('bipot', 'BIPOTID', $_SESSION['bipotid'], "ProgramID, ProdiID");
    if ($arrbenar['ProgramID'] == $_SESSION['prid'] and $arrbenar['ProdiID'] == $_SESSION['prodi']) {
        $s = "select b2.*, bn.Nama, format(b2.Jumlah, 0) as JML,\r\n      t.Nama as NMTRX, s.Nama as SAAT\r\n      from bipot2 b2\r\n        left outer join bipotnama bn on b2.BIPOTNamaID=bn.BIPOTNamaID\r\n        left outer join saat s on b2.SaatID=s.SaatID\r\n        left outer join trx t on b2.TrxID=t.TrxID\r\n      where b2.BIPOTID='{$_SESSION['bipotid']}' and KodeID='{$_SESSION['KodeID']}'\r\n      order by b2.TrxID, b2.Prioritas, b2.GradeNilai, b2.GradeIPK";
        $r = _query($s);
        $ftr = "</table></p>";
        $TrxID = -100;
        $cnt = 0;
        $a = BuatMenuBipotIsi();
        while ($w = _fetch_array($r)) {
            // Buat header & footer
            if ($TrxID != $w['TrxID']) {
                $TrxID = $w['TrxID'];
                if ($cnt > 0) {
                    $a .= $ftr;
                }
                $a .= HdrBipotIsi($w['NMTRX'], $TrxID);
            }
            // menggunakan script?
            $scr = $w['GunakanScript'] == 'Y' ? "<img src='img/gear.gif' width=20 title='{$w['NamaScript']}'>" : "&nbsp;";
            // Tampilkan data
            $cnt++;
            $c = $w['NA'] == 'Y' ? 'class=nac' : 'class=ul';
            $KaliSesi = (empty($w['KaliSesi']) or $w['KaliSesi'] == 0) ? '&#8734;' : $w['KaliSesi'];
            $TambahanNama = empty($w['TambahanNama']) ? '' : "({$w['TambahanNama']})";
            $PerMataKuliah = $w['PerMataKuliah'] == 'Y' ? "<img src='img/permatakuliah.bmp'" : '';
            $PerSKS = $w['PerSKS'] == 'Y' ? "<img src='img/persks.bmp'" : '';
            $PerLab = $w['PerLab'] == 'Y' ? "<img src='img/perlab.bmp'" : '';
            $Remedial = $w['Remedial'] == 'Y' ? "<sup>REMEDIAL</sup>" : '';
            $PraktekKerja = $w['PraktekKerja'] == 'Y' ? "<sup>PRAKTEK KERJA</sup>" : '';
            $a .= "<tr>\r\n      <td {$c} nowrap align=center>\r\n        <a href='?mnux={$mnux}&tok={$tok}&sub1=BipotIsiEdt&md=0&bipot2={$w['BIPOT2ID']}&trxid={$w['TrxID']}&trxnama={$w['NMTRX']}'>\r\n        {$w['Prioritas']}\r\n        <br />\r\n        <img src='img/edit.png'>\r\n        </a></td>\r\n      <td {$c}>{$w['Nama']} {$TambahanNama} {$PerMataKuliah}{$PerLab}{$Remedial}{$PraktekKerja}{$PerSKS}</td>\r\n      <td {$c} align=right>\r\n        {$w['JML']}\r\n        <hr size=1 color=silver />\r\n        <div align=left>{$w['SAAT']}</div>\r\n        </td>\r\n      <td {$c} align=center><img src='img/{$w['Otomatis']}.gif'>\r\n        <hr size=1 color=silver />\r\n        {$scr}</td>\r\n      <td {$c} align=right> {$w['MulaiSesi']} / {$KaliSesi}&times</td>\r\n      <td {$c}>{$w['StatusAwalID']}\r\n        <hr size=1 color=silver />\r\n        {$w['StatusMhswID']}</td>\r\n      <td {$c} align=center>\r\n        <img src='img/{$w['GunakanGradeNilai']}.gif'>\r\n        <hr size=1 color=silver />\r\n        {$w['GradeNilai']}&nbsp;</td>\r\n\t  <td {$c} align=center>\r\n        <img src='img/{$w['GunakanGradeIPK']}.gif'>\r\n        <hr size=1 color=silver />\r\n        {$w['GradeIPK']}&nbsp;</td>\r\n      <td {$c} align=center><img src='img/book{$w['NA']}.gif'></td>\r\n      </tr>";
            $a .= "<tr><td bgcolor=silver colspan=10 height=1></td></tr>";
        }
        $a .= "</table></p>";
    } else {
        $a = '';
    }
    return $a;
}