function EditRemedial($jdwlrem)
{
    $opt_filter_grade = GetOption2('nilai', "Nama", 'Nama', $_SESSION['_rem_filter_grade'], "KodeID='" . KodeID . "' and BisaRemedial='Y' and ProdiID='{$jdwlrem['ProdiID']}'", 'Nama', 0, 0);
    echo AmbilHeader($jdwlrem);
    $filter_tahun = empty($_SESSION['_rem_filter_tahun']) ? "" : "and a.TahunID = '{$_SESSION['_rem_filter_tahun']}'";
    $filter_grade = empty($_SESSION['_rem_filter_grade']) ? "" : "and a.GradeNilai = '{$_SESSION['_rem_filter_grade']}'";
    $filter_mkkode = empty($_SESSION['_rem_filter_mkkode']) ? "" : "and a.MKKode = '{$_SESSION['_rem_filter_mkkode']}'";
    $s1 = "select a.MhswID, m.Nama as _Mhsw, d.Nama as _Dosen, a.TahunID as _Tahun, a.KRSID, a.GradeNilai , a.SedangRemedial, a.MKKode, a.Nama,\r\n\t\t\t\tkr.KRSRemedialID, kr.Final, k.KHSID as _KHSIDTahunIni\r\n\t\t\t\tfrom krs a\r\n\t\t\t\t\tleft outer join mhsw m on a.MhswID=m.MhswID and m.KodeID='" . KodeID . "'\r\n\t\t\t\t\tleft outer join statusmhsw sm on sm.StatusMhswID=m.StatusMhswID and sm.KodeID='" . KodeID . "'\r\n\t\t\t\t\tleft outer join dosen d on a.DosenID=d.Login and d.KodeID='" . KodeID . "'\r\n\t\t\t\t\tleft outer join khs k on k.TahunID='{$jdwlrem['TahunID']}' and k.MhswID=a.MhswID and k.KodeID='" . KodeID . "' \r\n\t\t\t\t\tleft outer join krsremedial kr on kr.KRSID=a.KRSID and kr.TahunID='{$jdwlrem['TahunID']}' and kr.KodeID='" . KodeID . "'\r\n\t\twhere a.KodeID='" . KodeID . "'\r\n\t\t\tand a.Final = 'Y'\r\n\t\t\tand sm.Keluar = 'N'\r\n\t\t\t{$filter_tahun}\r\n\t\t\t{$filter_grade}\r\n\t\t\t{$filter_mkkode}\r\n\t\t\torder by a.MKKode, m.Nama\r\n\t\t";
    $r1 = _query($s1);
    loadJavaScripts();
    echo "\r\n\t\t<table class=box cellspacing=1 align=center width=800>\r\n\t\t   <form action='?' method=POST>\r\n\t\t\t<input type=hidden name='gos' value='RemedialSav' \\>\r\n\t\t\t<input type=hidden name='id' value='{$jdwlrem['JadwalRemedialID']}' \\>\r\n\t\t\t<table class=box cellspacing=1 align=center border=1 width=650>\r\n\t\t\t\r\n\t\t\t";
    $counting = 0;
    $currentMKKode = '938w5y39nbvwp9ent';
    while ($w1 = _fetch_array($r1)) {
        if ($currentMKKode != $w1['MKKode']) {
            echo "<br>\r\n\t\t\t\t  <tr><th class=ttl colspan=7>{$w1['MKKode']} - {$w1['Nama']}</th></tr>";
            echo "<tr><th class=ttl width=20>#</th>\r\n\t\t\t\t<th class=ttl width=80>NIM</th>\r\n\t\t\t\t<th class=ttl width>Nama</th>\r\n\t\t\t\t<th class=ttl width=50>Tahun</th>\r\n\t\t\t\t<th class=ttl width=200>Dosen MK</th>\r\n\t\t\t\t<th class=ttl width=30>Grade</th>\r\n\t\t\t\t<th class=ttl width=20>Check</th>";
            $currentMKKode = $w1['MKKode'];
        }
        $counting++;
        $class = $w1['_KHSIDTahunIni'] + 0 == 0 ? 'class=wrn' : '';
        $check = empty($w1['KRSRemedialID']) ? '' : 'checked';
        $grade = empty($w1['GradeNilai']) ? '-' : $w1['GradeNilai'];
        $pilihancheck = $w1['Final'] == 'Y' || $w1['_KHSIDTahunIni'] + 0 == 0 ? "<input type=checkbox name='Unused[]' value='{$w1['KRSID']}' {$check} readonly=true disabled=true>" : "<input type=checkbox name='Pilihan[]' value='{$w1['KRSID']}' {$check}>";
        echo "<tr><td align=right {$class}>{$counting}.</td>\r\n\t\t\t\t<td {$class}>{$w1['MhswID']}</td>\r\n\t\t\t\t<td {$class}>{$w1['_Mhsw']}</td>\r\n\t\t\t\t<td {$class} align=center>{$w1['_Tahun']}</td>\r\n\t\t\t\t<td {$class}>{$w1['_Dosen']}</td>\r\n\t\t\t\t<td {$class} align=center>{$w1['GradeNilai']}</td>\r\n\t\t\t\t<td {$class} align=center>{$pilihancheck}\r\n\t\t\t\t\t<input type=hidden name='SemuaPilihan[]' value='{$w1['KRSID']}~{$w1['MhswID']}~{$w1['SedangRemedial']}'></td>\r\n\t\t\t</tr>";
    }
    echo "<tr><td class=ul1 colspan=7 align=center><input type=submit name='Simpan' value='Simpan yang Dicentang'></td></tr>\r\n\t\t\t</table>";
}
Exemple #2
0
function LihatPerRuang($gel)
{
    $optprodi = GetOption2('prodi', "concat(ProdiID, ' - ', Nama)", 'ProdiID', $_SESSION['_usm_prodi'], "KodeID='" . KodeID . "'", 'ProdiID');
    $usmpmbopt = GetOption2('pmbusm', "concat(PMBUSMID, ' - ', Nama)", 'PMBUSMID', $_SESSION['_usm_pmbusm'], "KodeID='" . KodeID . "'", 'PMBUSMID');
    $pmbusmstring = empty($_SESSION['_usm_pmbusm']) ? "" : "and pu.PMBUSMID='{$_SESSION['_usm_pmbusm']}'";
    $s = "select distinct(ru.RuangID) as _RuangID \r\n\t\t\tfrom ruangusm ru left outer join prodiusm pu on ru.ProdiUSMID=pu.ProdiUSMID\r\n\t\t\twhere ru.KodeID='" . KodeID . "' and ru.PMBPeriodID='{$gel}' {$pmbusmstring} order by ru.RuangID";
    $r = _query($s);
    $w = _fetch_array($r);
    $ruangdef = $w['_RuangID'];
    $arrruang[] = $w['_RuangID'];
    while ($w = _fetch_array($r)) {
        $arrruang[] = $w['_RuangID'];
    }
    //$ruangdef = (!empty($_SESSION['_usm_ruang']))? $_SESSION['_usm_ruang'] : ((empty($ruangdef))? "" : $ruangdef);
    //$ruangopt = GetOptionsFromData($arrruang, $ruangdef, 1);
    //$_SESSION['_usm_ruang'] = $ruangdef;
    CetakKartuScript();
    $classHadir = $_SESSION['_usm_jenisx'] == 0 ? 'class=menuaktif' : 'class=menuitem';
    $classNilai = $_SESSION['_usm_jenisx'] == 1 ? 'class=menuaktif' : 'class=menuitem';
    echo "<p><table class=box cellspacing=1 cellpadding=4>\r\n\t  <form action='?' method=POST>\r\n\t  <input type=hidden name='mnux' value='{$_SESSION['mnux']}'>\r\n\t  <tr><td {$classHadir}><a href='?mnux={$_SESSION['mnux']}&gos=&_usm_jenisx=0'>Daftar Hadir</a></td><td rowspan=3 class='wrn'></td>\r\n\t\t  <td class=inp>Periode :</td><td class=ul1 colspan=2><input type=text name=tahunpmb value='{$gel}' size=10 disabled></td></tr>\r\n\t  <tr><td {$classNilai}><a href='?mnux={$_SESSION['mnux']}&gos=&_usm_jenisx=1'>Daftar Nilai</a></td><td class=inp>Program Studi:</td>\r\n\t\t  <td class=ul1 colspan=2><select name='_usm_prodi' onChange='this.form.submit()'>{$optprodi}</select><br></td></tr>\r\n\t  <tr><td class=ul1 align=center></td><td class=inp>Mata Uji:</td>\r\n\t       <td class=ul1 colspan=2><select name='_usm_pmbusm' onChange='this.form.submit()'>{$usmpmbopt}</select></td>\r\n\t\t   <td class=ul1 rowspan=2 width=50 align=center valign=center><a href='#' onClick=\"javascript:CetakDHU('{$gel}', '{$_SESSION['_usm_ruang']}', '{$_SESSION['_usm_prodi']}')\" /><img title='Print Denah USM' src='img/printer2.gif' />\r\n\t  </tr>\t   \r\n\t  </form></table></p>";
    $reltitle = empty($_SESSION['_usm_pmbusm']) ? "" : "<th class=ttl width=40>Hadir?</th>";
    $topbutton = empty($_SESSION['_usm_pmbusm']) ? "" : "<input type=button name='CheckAllMember' value='Hadir Semua' onClick=\"CheckAll('Hadir')\" />";
    $botbutton = empty($_SESSION['_usm_pmbusm']) ? "" : "<input type=button name='SubmitButton' value='Simpan' onClick=\"ignoreCheckBoxDisable('Hadir', this.form)\" />";
    $botbutton2 = empty($_SESSION['_usm_pmbusm']) ? "" : "<input type=button name='UnCheckAllMember' value='Clear Semua' onClick=\"UnCheckAll('Hadir')\" />";
    loadJavaScripts();
    $ProdiUSMID = GetaField('prodiusm', "INSTR(concat('|', ProdiID, '|'), concat('|', '{$_SESSION['_usm_prodi']}', '|'))!=0 and PMBUSMID='{$_SESSION['_usm_pmbusm']}' and PMBPeriodID = '{$gel}' and KodeID", KodeID, 'ProdiUSMID');
    if (empty($ProdiUSMID)) {
        echo ErrorMsg("Tidak ada data", "Tidak ada jadwal USM yang ditemukan.<br>\r\n\t\t\t\t\t\t\t\t\tHarap menghubungi Kepala PMB untuk men-setup jadwal terlebih dahulu");
    } else {
        echo "<Iframe name='frame{$n}' src='{$_SESSION['mnux']}.frame.php?ProdiUSMID={$ProdiUSMID}&gel={$gel}' align=center width=800 height=750 frameborder=0></Iframe>";
    }
}
function ListWawancara($gelombang)
{
    $s1 = "select * from `pmb` \r\n\t\t\twhere (PMBID like '%{$_SESSION['_wawanEntry']}%'\r\n\t\t\t\tor Nama like '%{$_SESSION['_wawanEntry']}%')\r\n\t\t\t\tand PMBPeriodID='{$gelombang}'\r\n\t\t\t\tand KodeID='" . KodeID . "'\r\n\t\t\torder by PMBID";
    $r1 = _query($s1);
    $n1 = _num_rows($r1);
    $x1 = 0;
    loadJavaScripts();
    if ($n1 == 0) {
        // Jika nama calon mahasiswa/no.PMB tidak diketemukan dalam table pmb
        if (!empty($_REQUEST['_wawanEntry'])) {
            echo "<br>Nama/No. Pmb: <b>{$_REQUEST['_wawanEntry']}</b> tidak diketemukan. Silakan mencoba lagi";
        }
    } else {
        echo "<p>\r\n\t\t\t\t\t<table class=box cellspacing=1 cellpadding=4 width=800>\r\n\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t<th class=ttl width=80 rowspan=2 valign=center>No. PMB (Daftar)</th>\r\n\t\t\t\t\t\t<th class=ttl width=200 rowspan=2 valign=center>Nama Calon Mahasiswa</th>\r\n\t\t\t\t\t\t<th class=ttl width=20 rowspan=2 valign=center>Prodi</th>\r\n\t\t\t\t\t\t<th class=ttl width=600 colspan=7>Data Wawancara</th>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t<th class=ttl width=20 align=center>#</th>\r\n\t\t\t\t\t\t<th class=ttl width=80>Tgl.</th>\r\n\t\t\t\t\t\t<th class=ttl width=240>Pewawancara</th>\r\n\t\t\t\t\t\t<th class=ttl width=20>Saran</th>\r\n\t\t\t\t\t\t<th class=ttl width=100>Rekomendasi</th>\r\n\t\t\t\t\t\t<th class=ttl width=20></th>\r\n\t\t\t\t\t\t<th class=ttl width=20></th>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t";
        while ($w1 = _fetch_array($r1)) {
            // Jika nama calon mahasiswa/no.PMB ditemukan
            $s = "select * from `wawancara` \r\n\t\t\t\t\twhere PMBID = '{$w1['PMBID']}' and KodeID='" . KodeID . "' and PMBPeriodID='{$gelombang}'";
            $r = _query($s);
            $n = _num_rows($r);
            $x = 0;
            if ($n == 0) {
                echo "<tr>\r\n\t\t\t\t\t\t<td class=ul1 align=center><b>{$w1['PMBID']}</b></td>\r\n\t\t\t\t\t\t<td class=ul1 align=center><b>{$w1['Nama']}</b></td>\r\n\t\t\t\t\t\t<td class=ul1 valign=center align=center>{$w1['Pilihan1']}<br><hr color=green><br>{$w1['Pilihan2']}</td>\r\n\t\t\t\t\t<td class=ul1 colspan=4 align=center><b> - Belum ada wawancara -</b></td>\r\n\t\t\t\t\t<td colspan=3 align=right>\t\t\r\n\t\t\t\t\t\t<input type=button name='Tambah' value='Tambah Wawancara'\r\n\t\t\t\t\t\t\tonClick=\"javascript:fnEditCama('{$gelombang}', 1, '{$w1['PMBID']}')\" />\r\n\t\t\t\t\t</td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t<td colspan=10>\r\n\t\t\t\t\t\t\t<hr color=green width=100%>\r\n\t\t\t\t\t\t</td>\r\n\t\t\t\t\t</tr>";
            } else {
                if ($n < 3) {
                    $n_row = 3;
                } else {
                    $n_row = $n + 1;
                }
                //Set Variable bila Nama/No.PMB ada/tidak ada di dalam table `wawancara`
                $x1++;
                echo "<tr>\r\n\t\t\t\t\t\t<td class=ul1 rowspan={$n_row} valign=center align=center><b>{$w1['PMBID']}</b></td>\r\n\t\t\t\t\t\t<td class=ul1 rowspan={$n_row} valign=center align=center><b>{$w1['Nama']}</b></td>\r\n\t\t\t\t\t\t<td class=ul1 rowspan={$n_row} valign=center align=center>{$w1['Pilihan1']}<br><hr color=green><br>{$w1['Pilihan2']}</td>";
                while ($arr = _fetch_array($r)) {
                    $x++;
                    if ($n == 0) {
                        $n_row = 2;
                    } else {
                        if ($n == 1) {
                            $n_row = 2;
                        } else {
                            $n_row = 1;
                        }
                    }
                    $tanggalwawancara = substr($arr['TanggalWawancara'], 0, 16);
                    echo "\r\n\t\t\t\t\t\t<td class=ul1 rowspan={$n_row} valign=center align=right>{$x}.</td>\r\n\t\t\t\t\t\t<td class=ul1 rowspan={$n_row} valign=center align=center>{$tanggalwawancara}</td>\r\n\t\t\t\t\t\t<td class=ul1 rowspan={$n_row} valign=center >{$arr['Pewawancara']} , {$arr['Pewawancara2']}</td>\r\n\t\t\t\t\t\t<td class=ul1 rowspan={$n_row} valign=center align=center>{$arr['SaranProgram']}</td>\r\n\t\t\t\t\t\t<td class=ul1 rowspan={$n_row} valign=center align=center>{$arr['HasilWawancara']}</td>\r\n\t\t\t\t\t\t<td class=ul1 rowspan={$n_row} valign=center ><a href=\"javascript:fnEditCama('{$gelombang}', 0, '{$arr['WawancaraID']}')\"><img src='img/edit.png' border=0></a></td>\r\n\t\t\t\t\t\t<td class=ul1 rowspan={$n_row} valign=center ></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";
                    if ($n < 2) {
                        echo "</tr><tr>";
                    }
                }
                echo "\t<td colspan=7 align=right>\t\t\r\n\t\t\t\t\t\t<input type=button name='Tambah' value='Tambah Wawancara'\r\n\t\t\t\t\t\t\tonClick=\"javascript:fnEditCama('{$gelombang}', 1, '{$w1['PMBID']}')\" />\r\n\t\t\t\t\t\t</td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t<td colspan=10>\r\n\t\t\t\t\t\t\t<hr color=green width=100%>\r\n\t\t\t\t\t\t</td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t";
            }
        }
        echo "</table></p>";
    }
}
Exemple #4
0
function TampilkanRemedial()
{
    $TahunID = $_SESSION['_remTahun'];
    $ProdiID = $_SESSION['_remProdi'];
    $ProgramID = $_SESSIOn['_remProg'];
    $whr_prodi = empty($ProdiID) ? "" : "and ProdiID='{$ProdiID}'";
    $whr_tahun = empty($TahunID) ? "" : "and TahunID='{$TahunID}'";
    $whr_prog = empty($ProgramID) ? "" : "and ProgramID='{$ProgramID}'";
    // Paging Parameters
    $limit = 20;
    $start_page = $limit * $_SESSION['_remPage'];
    $counting = $start_page;
    $s = "select * from jadwalremedial \r\n\t\t\twhere KodeID='" . KodeID . "'\r\n\t\t\t\t{$whr_tahun}\r\n\t\t\t\t{$whr_prodi}\r\n\t\t\t\t{$whr_prog}";
    $r = _query($s);
    loadJavaScripts();
    echo "<p><table class=box cellspacing=1 align=center width=900>\r\n\t\t\t<form action='?' method=POST>\r\n\t\t\t\t\r\n\t\t\t\t<tr><td class=ul1 align=center>\r\n\t\t\t\t\t\t<input type=button name='Laporan' value='Laporan Daftar Remedial Mahasiswa' onClick=\"fnDaftarRemedial()\">\r\n\t\t\t\t\t\t<input type=button name='CetakJadwal' value='Cetak Semua Jadwal' onClick=\"fnCetakJadwal()\">\r\n\t\t\t\t\t\t<input type=button name='CetakMahasiswa' value='Cetak Semua Peserta Remedial' onClick=\"fnCetakPeserta()\">\r\n\t\t\t\t\t\t<input type=button name='Gagal' value='Cetak Mahasiswa Gagal' onClick=\"fnGagalRemedial()\"></td>\r\n\t\t\t\t\t\t</tr>\r\n\t\t\t</form>\t\r\n\t\t</table></p>";
    echo "<p><table class=box cellspacing=1 align=center width=900>\r\n\t\t\t<form action='?' method=POST>\r\n\t\t\t\t<tr><th class=ttl width=20 colspan=2>#</th>\r\n\t\t\t\t\t<th class=ttl width=200>Matakuliah</th>\r\n\t\t\t\t\t<th class=ttl width=40>SKS</th>\r\n\t\t\t\t\t<th class=ttl width=120>Tanggal Penting</th>\r\n\t\t\t\t\t<th class=ttl width=70>&sum Mhsw</th>\r\n\t\t\t\t\t<th class=ttl width=70>Nilai</th>\r\n\t\t\t\t\t";
    while ($w = _fetch_array($r)) {
        $n++;
        $TanggalPenting = AmbilTanggalPenting($w['JadwalRemedialID']);
        $DetailMhsw = "{$w['JmlhMhsw']}\r\n\t\t\t\t\t\t<br><a href='#self' onClick=\"fnEditMhsw('{$w['JadwalRemedialID']}')\"><sup>Daftar Mhsw</sup></a>";
        echo "<tr><td class=inp width=10>{$n}</td>\r\n\t\t\t\t\t<td class=ul1 width=10><a href='#' onClick=\"fnEditRemedial(0, '{$w['JadwalRemedialID']}')\"><img src='img/edit.png'></a></td>\r\n\t\t\t\t\t<td class=ul1 width=200>{$w['Nama']}</td>\r\n\t\t\t\t\t<td class=ul1 width=40 align=center>{$w['SKS']}</td>\r\n\t\t\t\t\t<td class=ul1>{$TanggalPenting}</td>\r\n\t\t\t\t\t<td class=ul1 width=70 align=center>{$DetailMhsw}</td>\r\n\t\t\t\t\t<td class=ul1 width=70 align=center><a href='#' onClick=\"fnIsiNilai('{$w['JadwalRemedialID']}')\"><img src='img/edit.jpg'></a></td>\r\n\t\t\t  </tr>";
    }
    // Paging
    $totalpage = floor($n / $limit) + 1;
    $fontpage = $_SESSION['_remPage'] + 1 == 1 ? '<font color=red>1</font>' : '<font color=green>1</font>';
    $tempmnux = $_SESSION['mnux'];
    $pagestring = "<a href='#' onClick=\"changePage(1, '{$tempmnux}', this.form);\">{$fontpage}</a>";
    for ($j = 2; $j <= $totalpage; $j++) {
        $fontpage = $j == $_SESSION['_remPage'] + 1 ? '<font color=red>' : '<font color=green>';
        $pagestring .= ", <a href='#' onClick=\"changePage({$j}, '{$tempmnux}', this.form);\">{$fontpage}{$j}</font></a>";
    }
    //$nextstartpage = $start_page+1;
    echo "\r\n\t\t\r\n\t\t<tr>\r\n\t\t\t<td class=ul1 colspan=10 align=center><font color=green><b>Hal:</b></font> {$pagestring}</td>\r\n\t\t</tr>\r\n\t\t<tr>\r\n\t\t\t<td class=ul1 colspan=10 align=center><font color=green><b>Total:</b></font> <b>{$n}</b></td>\r\n\t\t</tr>";
    echo "</form>\r\n\t\t</table></p>\r\n\t\t";
}
Exemple #5
0
function ProdiEdt()
{
    $md = $_REQUEST['md'] + 0;
    if ($md == 0) {
        $w = GetFields('prodi', 'ProdiID', $_REQUEST['prid'], '*');
        $_prid = "<input type=hidden name='prid' value='{$w['ProdiID']}'><b>{$w['ProdiID']}</b>";
        $jdl = 'Edit Program Studi';
    } else {
        $w = array();
        $w['ProdiID'] = '';
        $w['Nama'] = '';
        $w['Nama_en'] = '';
        $w['JenjangID'] = '';
        $w['Gelar'] = '';
        $w['FakultasID'] = $_SESSION['fid'];
        $w['FormatNIM'] = '';
        $w['GunakanNIMSementara'] = 'N';
        $w['FormatNIMSementara'] = '';
        $w['DapatPindahProdi'] = '';
        $w['ProdiDiktiID'] = '';
        $w['NamaSesi'] = "Semester";
        $w['CekPrasyarat'] = 'Y';
        $w['DefSKS'] = 0;
        $w['DefKehadiran'] = 16;
        $w['DefMaxAbsen'] = 4;
        $w['TotalSKS'] = 0;
        $w['BatasStudi'] = 0;
        $w['JumlahSesi'] = 0;
        $w['Akreditasi'] = '';
        $w['NoSKDikti'] = '';
        $w['TglSKDikti'] = date('Y-m-d');
        $w['NoSKBAN'] = '';
        $w['TglSKBAN'] = date('Y-m-d');
        $w['PajakHonorDosen'] = 10;
        $w['Pejabat'] = '';
        $w['Jabatan'] = '';
        $w['NA'] = 'N';
        $_prid = "<input type=text name='prid' size=30 maxlength=20>";
        $jdl = 'Tambah Program Studi';
    }
    CheckFormScript("prid,Nama,FormatNIM,DefSKS");
    CariProdiDikti();
    loadJavaScripts();
    $NamaProdi = GetaField('prodidikti', 'ProdiDiktiID', $w['ProdiDiktiID'], 'Nama');
    $TglSKDikti = GetDateOption($w['TglSKDikti'], 'TglSKDikti');
    $TglSKBAN = GetDateOption($w['TglSKBAN'], 'TglSKBAN');
    $gns = $w['GunakanNIMSementara'] == 'Y' ? 'checked' : '';
    $dagns = $w['GunakanNIMSementara'] == 'Y' ? '' : 'disabled';
    $na = $w['NA'] == 'Y' ? 'checked' : '';
    $cp = $w['CekPrasyarat'] == 'Y' ? 'checked' : '';
    $snm = session_name();
    $sid = session_id();
    $opt = GetOption2('fakultas', "concat(FakultasID, '. ', Nama)", 'FakultasID', $w['FakultasID'], '', 'FakultasID');
    $optjen = GetOption2('jenjang', "concat(JenjangID, ' - ', Nama)", 'JenjangID', $w['JenjangID'], '', 'JenjangID');
    //GetCheckboxes($table, $key, $Fields, $Label, $Nilai='', $Separator=',') {
    $pind = GetCheckboxes("prodi", "ProdiID", "concat(ProdiID, ' - ', Nama) as NM", 'NM', $w['DapatPindahProdi'], '.', "ProdiID <> '{$w['ProdiID']}'");
    return "<p><table class=box cellspacing=1 cellpadding=4 width=600>\r\n  <form name='data' action='?' method=POST onSubmit=\"return CheckForm(data)\">\r\n  <input type=hidden name='mnux' value='{$_SESSION['mnux']}'>\r\n  <input type=hidden name='gos' value='ProdiSav'>\r\n  <input type=hidden name='md' value='{$md}'>\r\n\r\n  <tr><th colspan=2 class=ttl>{$jdl}</th></tr>\r\n  <tr><td class=inp>Program Studi</td><td class=ul>{$_prid}</td></tr>\r\n  <tr><td class=inp>Fakultas</td><td class=ul><select name='FakultasID'>{$opt}</select></td></tr>\r\n  <tr><td class=inp>Nama</td><td class=ul><input type=text name='Nama' value='{$w['Nama']}' size=30 maxlength=50></td></tr>\r\n  <tr><td class=inp>Nama Inggris</td><td class=ul><input type=text name='Nama_en' value='{$w['Nama_en']}' size=30 maxlength=50></td></tr>\r\n  <tr><td class=inp>Jenjang</td><td class=ul><select name='JenjangID'>{$optjen}</select></td></tr>\r\n  <tr><td class=inp>Gelar</td><td class=ul><input type=text name='Gelar' value='{$w['Gelar']}' size=30 maxlength=50></td></tr>\r\n  <tr><td class=inp>Format NIM</td><td class=ul><input type=text name='FormatNIM' value='{$w['FormatNIM']}' size=30 maxlength=100></td></tr>\r\n  <tr><td class=inp>Gunakan NIM Sementara?</td><td class=ul><input type=checkbox name='GunakanNIMSementara' value='Y' onClick=\"ToggleNIMSementara()\" {$gns}>\r\n\t\t\t\t\t<input type=text name='FormatNIMSementara' value='{$w['FormatNIMSementara']}' size=30 maxlength=100 {$dagns}></td></tr>\r\n  <tr><td class=inp>Dapat Pindah ke Prodi</td><td class=ul>{$pind}</td></tr>\r\n  <tr><td class=inp>Nama Sesi</td>\r\n      <td class=ul><input type=text name='NamaSesi' value='{$w['NamaSesi']}' size=20 maxlength=50> <sup>Misal: Semester, Cawu.</sup></td></tr>\r\n  <tr><td class=inp>Cek Prasyarat</td>\r\n      <td class=ul><input type=checkbox name='CekPrasyarat' value='Y' {$cp}> <sup>*) Jika dicentang, <br />\r\n      maka pengambilan KRS akan mengecek MK prasyarat</sup>\r\n      </td></tr>\r\n  <tr><td class=inp>Total SKS Lulus</td><td class=ul><input type=text name='TotalSKS' value='{$w['TotalSKS']}' size=5 maxlength=4></td></tr>\r\n  <tr><td class=inp>Default SKS</td><td class=ul><input type=text name='DefSKS' value='{$w['DefSKS']}' size=3 maxlength=3></td></tr>\r\n  <tr><td class=inp>Default Kehadiran</td><td class=ul><input type=text name='DefKehadiran' value='{$w['DefKehadiran']}' size=4 maxlength=3></td></tr>\r\n  <tr><td class=inp>Default Maksimum Absen</td><td class=ul><input type=text name='DefMaxAbsen' value='{$w['DefMaxAbsen']}' size=4 maxlength=3></td></tr>\r\n  <tr><td class=inp>Kode Prodi Dikti</td><td class=ul><input type=text name='ProdiDiktiID' value='{$w['ProdiDiktiID']}' size=10 maxlength=20>\r\n    <input type=text name='NamaProdi' value='{$NamaProdi}' size=30 maxlength=50>\r\n    <a href='javascript:cariprodidikti(data)'>Cari</a></td></tr>\r\n  <tr><td class=inp>Pajak Honor Dosen</td><td class=ul><input type=text name='PajakHonorDosen' value='{$w['PajakHonorDosen']}' size=3 maxlength=3></td></tr>\r\n  <tr><td class=inp>Tidak aktif?</td><td class=ul><input type=checkbox name='NA' value='Y' {$na}></td></tr>\r\n  \r\n  <tr><td class=ul colspan=2><b>Pejabat Jurusan</b></td></tr>\r\n  <tr><td class=inp>Nama Pejabat</td><td class=ul><input type=text name='Pejabat' value='{$w['Pejabat']}' size=30 maxlength=50></td></tr>\r\n  <tr><td class=inp>Nama Jabatan</td><td class=ul><input type=text name='Jabatan' value='{$w['Jabatan']}' size=30 maxlength=50></td></tr>\r\n  \r\n  <tr><td class=ul colspan=2><b>Batas Studi</b></td></tr>\r\n  <tr><td class=inp>Batas Studi</td><td class=ul><input type=text name='BatasStudi' value='{$w['BatasStudi']}' size=3 maxlength=2> Sesi/Semester</td></tr>\r\n  <tr><td class=inp>Jml Sesi/tahun</td><td class=ul><input type=text name='JumlahSesi' value='{$w['JumlahSesi']}' size=3 maxlength=2> per tahun</td></tr>\r\n  \r\n  <tr><td class=ul colspan=2><b>Surat Keputusan</b></td></tr>\r\n  <tr><td class=inp>No SK Dikti</td><td class=ul><input type=text name='NoSKDikti' value='{$w['NoSKDikti']}' size=30 maxlength=50></td></tr>\r\n  <tr><td class=inp>Tanggal SK Dikti</td><td class=ul>{$TglSKDikti}</td></tr>\r\n  <tr><td class=inp>No SK BAN</td><td class=ul><input type=text name='NoSKBAN' value='{$w['NoSKBAN']}' size=30 maxlength=50></td></tr>\r\n  <tr><td class=inp>Tanggal SK BAN</td><td class=ul>{$TglSKBAN}</td></tr>\r\n  <tr><td class=inp>Akreditasi</td><td class=ul><input type=text name='Akreditasi' value='{$w['Akreditasi']}' size=5 maxlength=10></td></tr>\r\n  <tr><td colspan=2 align=center>\r\n    <input type=submit name='Simpan' value='Simpan'>\r\n    <input type=reset name='Reset' value='Reset'>\r\n    <input type=button name='Batal' value='Batal' onClick=\"location='?mnux={$_SESSION['mnux']}&{$snm}={$sid}'\"></td></tr>\r\n  </form></table></p>";
}
Exemple #6
0
<?php

//Author: Irvandy Goutama
// Start: 8 Januari 2009
// Email: irvandygoutama@gmail.com
// *** Parameters ***
$md = $_REQUEST['md'];
$opk_kelas = GetSetVar('opk_kelas', '');
$prodi = GetSetVar('prodi', '');
$program = GetSetVar('program', '');
$kelamin_by = GetSetVar('kelamin_by', '');
$nilai_dari = GetSetVar('nilai_dari', '0');
$nilai_sampai = GetSetVar('nilai_sampai', '100');
loadJavaScripts();
// *** Main ***
$sub = empty($_REQUEST['sub']) ? 'HalamanUtamaOPK' : $_REQUEST['sub'];
$sub();
// *** Helper Functions ***
function GetOptionsFromData($sourceArray, $chosen)
{
    $optresult = "";
    if ($chosen == '' or empty($chosen)) {
        $optresult .= "<option value='' selected></option>";
    } else {
        $optresult .= "<option value=''></option>";
    }
    for ($i = 0; $i < count($sourceArray); $i++) {
        if ($chosen == $sourceArray[$i]) {
            $optresult .= "<option value='{$sourceArray[$i]}' selected>{$sourceArray[$i]}</option>";
        } else {
            $optresult .= "<option value='{$sourceArray[$i]}'>{$sourceArray[$i]}</option>";
function EditRemedial($JadwalRemedialID)
{
    $MKID = $_REQUEST['MKID'] + 0;
    if ($JadwalRemedialID == 0) {
        $tahunstring = empty($_SESSION['TahunID']) ? "" : "and j.TahunID='{$_SESSION['TahunID']}'";
        $prodistring = empty($_SESSION['_remedialProdiID']) ? "" : "and j.ProdiID='{$_SESSION['_remedialProdiID']}'";
        $s = "select j.MKKode, j.Nama, j.SKS, j.ProdiID, j.TahunID, d.Nama as _Dosen \r\n\t\t\t\tfrom jadwal j left outer join dosen d on j.DosenID=d.Login and j.KodeID=d.KodeID\r\n\t\t\t\twhere j.MKID='{$MKID}' {$tahunstring} {$prodistring} and j.KodeID='" . KodeID . "'";
        $r = _query($s);
        $w = _fetch_array($r);
        $w['TglTatapMuka1'] = date('Y-m-d') . " 00:00:00";
        $w['AkhirTglTatapMuka1'] = date('Y-m-d') . " 00:00:00";
        $w['TglTatapMuka2'] = date('Y-m-d') . " 00:00:00";
        $w['AkhirTglTatapMuka2'] = date('Y-m-d') . " 00:00:00";
        $w['TglUjian'] = date('Y-m-d') . " 00:00:00";
        $w['AkhirTglUjian'] = date('Y-m-d') . " 00:00:00";
        //$gos = 'JadwalRemedialSav';
    } else {
        $s = "select jd.*, d.Nama as _Dosen \r\n\t\t\tfrom jadwalremedial jd left outer join dosen d on jd.DosenID=d.Login and jd.KodeID=d.KodeID\r\n\t\t\twhere jd.KodeID='" . KodeID . "' and jd.JadwalRemedialID='{$JadwalRemedialID}'";
        $r = _query($s);
        $w = _fetch_array($r);
        //$gos = 'RemedialSav';
    }
    $tglTatap1 = GetDateOption($w['TglTatapMuka1'], 'TglTatapMuka1');
    $tempjamtatap1 = substr($w['TglTatapMuka1'], 11, 5);
    $jamTatap1 = GetTimeOption($tempjamtatap1, 'TglTatapMuka1');
    $tempakhirjamtatap1 = substr($w['AkhirTglTatapMuka1'], 11, 5);
    $akhirjamTatap1 = GetTimeOption($tempakhirjamtatap1, 'AkhirTglTatapMuka1');
    $tglTatap2 = GetDateOption($w['TglTatapMuka2'], 'TglTatapMuka2');
    $tempjamtatap2 = substr($w['TglTatapMuka2'], 11, 5);
    $jamTatap2 = GetTimeOption($tempjamtatap2, 'TglTatapMuka2');
    $tempakhirjamtatap2 = substr($w['AkhirTglTatapMuka2'], 11, 5);
    $akhirjamTatap2 = GetTimeOption($tempakhirjamtatap2, 'AkhirTglTatapMuka2');
    $tglUjian = GetDateOption($w['TglUjian'], 'TglUjian');
    $tempjamUjian = substr($w['TglUjian'], 11, 5);
    $jamUjian = GetTimeOption($tempjamUjian, 'TglUjian');
    $tempakhirjamujian = substr($w['AkhirTglUjian'], 11, 5);
    $akhirjamUjian = GetTimeOption($tempakhirjamujian, 'AkhirTglUjian');
    $optruangtatap1 = GetOption2('ruang', 'RuangID', 'RuangID', $w['RuangIDTatapMuka1'], "KodeID='" . KodeID . "'", 'RuangID');
    $optruangtatap2 = GetOption2('ruang', 'RuangID', 'RuangID', $w['RuangIDTatapMuka2'], "KodeID='" . KodeID . "'", 'RuangID');
    $optruangujian = GetOption2('ruang', 'RuangID', 'RuangID', $w['RuangIDUjian'], "KodeID='" . KodeID . "'", 'RuangID');
    $optdosen = GetOption2('dosen', 'Nama', 'Nama', $w['DosenID'], "KodeID='" . KodeID . "' and INSTR(ProdiID, '.{$w['ProdiID']}.')>0", 'Login');
    CheckDatesScript();
    echo "<table class=box cellspacing=1 align=center width=800>\r\n\t\t\t<form name='rem_form' action='?' method=POST onSubmit=\"return CheckHours(this)\">\r\n\t\t\t\t<input type=hidden name='gos' value='JadwalRemedialSav' \\>\r\n\t\t\t\t<input type=hidden name='JRID' value='{$JadwalRemedialID}' \\>\r\n\t\t\t\t<input type=hidden name='MKID' value='{$_REQUEST['MKID']}' \\>\r\n\t\t\t\t<input type=hidden name='TahunID' value='{$_SESSION['TahunID']}' \\>\r\n\t\t\t\t<input type=hidden name='ProdiID' value='{$w['ProdiID']}' \\>\r\n\t\t\t\t<input type=hidden name='RemTahunID' value='{$_SESSION['_remedialTahunID']}' \\>\r\n\t\t\t\t\r\n\t\t\t\t<tr><td colspan=4><hr color=green size=2></hr></td><tr>\t\r\n\t\t\t\t<tr><td class=inp>Mata Kuliah:</td>\r\n\t\t\t\t\t<td class=ul1>{$w['MKKode']} - {$w['Nama']}</td>\r\n\t\t\t\t\t<td class=inp>SKS</td>\r\n\t\t\t\t\t<td class=ul1>{$w['SKS']}</td></tr>\r\n\t\t\t\t<tr><td class=inp width=100>Thn Akademik:</td>\r\n\t\t\t\t\t<td class=ul1 width=300>{$w['TahunID']}</td>\r\n\t\t\t\t\t<td class=inp width=100>Program Studi:</td>\r\n\t\t\t\t\t<td class=ul1 width=300>{$w['ProdiID']} - {$w['ProgramID']}</td></tr>\r\n\t\t\t\t<tr><td colspan=4><hr color=green size=2></hr></td><tr>\t\r\n\t\t\t\t<tr><td class=inp>Dosen Remedial:</td>\r\n\t\t\t\t\t<td class=ul1><select name='DosenID'>{$optdosen}</select></td></tr>\t\t\r\n\t\t\t\t<tr><td class=inp>Tanggal Kuliah:</td>\r\n\t\t\t\t\t<td class=ul1>{$tglTatap1}</td>\r\n\t\t\t\t\t<td class=ul1><font color=green>&</font></td>\r\n\t\t\t\t\t<td class=ul1>{$tglTatap2}</td></tr>\r\n\t\t\t\t<tr><td class=inp>Jam Kuliah:</td>\r\n\t\t\t\t\t<td class=ul1>{$jamTatap1} - {$akhirjamTatap1}</td>\r\n\t\t\t\t\t<td class=inp></td>\r\n\t\t\t\t\t<td class=ul1>{$jamTatap2} - {$akhirjamTatap2}</td></tr>\r\n\t\t\t\t<tr><td class=inp>Ruang Kuliah:</td>\r\n\t\t\t\t\t<td class=ul1><select name='RuangTatap1'>{$optruangtatap1}</select></td>\r\n\t\t\t\t\t<td class=inp></td>\r\n\t\t\t\t\t<td class=ul1><select name='RuangTatap2'>{$optruangtatap2}</select></td></tr>\r\n\t\t\t\t<tr><td class=inp>Tanggal Ujian:</td>\r\n\t\t\t\t\t<td class=ul1>{$tglUjian}</td></tr>\r\n\t\t\t\t<tr><td class=inp>Jam Ujian:</td>\r\n\t\t\t\t\t<td class=ul1>{$jamUjian} - {$akhirjamUjian}</td></tr>\r\n\t\t\t\t<tr><td class=inp>Ruang Ujian:</td>\r\n\t\t\t\t\t<td class=ul1><select name='RuangUjian'>{$optruangujian}</td></tr>\r\n\t\t\t\t<tr><td colspan=4><hr color=green size=2></hr></td><tr>";
    if ($JadwalRemedialID == 0) {
        echo "\t\t<tr><td colspan=4 align=center><input type=submit name='Simpan' value='Simpan dan Proses Remedial'>\r\n\t\t\t\t\t\t\t\t  <input type=button name='Batal' value='Batal' onClick=\"self.close()\"</td></tr>";
        echo "\t</form>\r\n\t\t</table>";
    } else {
        echo "\t\t<tr><td colspan=4 align=center><input type=submit name='Simpan' value='Simpan Jadwal'></td></tr>";
        echo "\t</form>\r\n\t\t\t</table>";
        loadJavaScripts();
        echo "\r\n\t\t\t<table class=box cellspacing=1 align=center width=800>\r\n\t\t\t   <form action='?' method=POST>\r\n\t\t\t\t<input type=hidden name='gos' value='RemedialSav' \\>\r\n\t\t\t\t<input type=hidden name='JRID' value='{$JadwalRemedialID}' \\>\r\n\t\t\t\t<input type=hidden name='MKID' value='{$_REQUEST['MKID']}' \\>\r\n\t\t\t\t<input type=hidden name='TahunID' value='{$_SESSION['TahunID']}' \\>\r\n\t\t\t\t<input type=hidden name='ProdiID' value='{$_SESSION['_remedialProdiID']}' \\>\r\n\t\t\t\t<input type=hidden name='RemTahunID' value='{$_SESSION['_remedialTahunID']}' \\>\r\n\t\t\t   <tr><td width=800>\r\n\t\t\t\t<table class=box cellspacing=1 align=center border=1 width=650>\r\n\t\t\t\t<tr><th class=ttl width=20>#</th>\r\n\t\t\t\t\t<th class=ttl width=80>NIM</th>\r\n\t\t\t\t\t<th class=ttl width>Nama</th>\r\n\t\t\t\t\t<th class=ttl width=50>Tahun</th>\r\n\t\t\t\t\t<th class=ttl width=200>Dosen MK</th>\r\n\t\t\t\t\t<th class=ttl width=30>Grade</th>\r\n\t\t\t\t\t<th class=ttl width=20>Check</th>\r\n\t\t\t\t";
        $s1 = "select a.MhswID, m.Nama, a.RemedialID, d.Nama as _Dosen, a.TahunID as _Tahun, a.KRSID, a.GradeNilai, r.Final, r.RemedialSet \r\n\t\t\t\t\t\t\t\t   from krs a \r\n\t\t\t\t\t\t\t\t\t\tleft outer join khs b on a.KHSID=b.KHSID and a.KodeID=b.KodeID\r\n\t\t\t\t\t\t\t\t\t\tleft outer join mhsw m on m.MhswID=a.MhswID and a.KodeID=m.KodeID\r\n\t\t\t\t\t\t\t\t\t\tleft outer join jadwal j on a.JadwalID=j.JadwalID and a.KodeID=j.KodeID\r\n\t\t\t\t\t\t\t\t\t\tleft outer join dosen d on j.DosenID=d.Login and a.KodeID=d.KodeID\r\n\t\t\t\t\t\t\t\t\t\tleft outer join remedial r on a.RemedialID=r.RemedialID\r\n\t\t\twhere (a.GradeNilai='D' or a.GradeNilai='E') and a.TidakLengkap='N' and a.Final='Y' and a.KodeID='" . KodeID . "' and a.MKID='{$MKID}'\r\n\t\t\t\tand (r.TahunID='{$_SESSION['_remedialTahunID']}' or r.TahunID is NULL)\r\n\t\t\t\torder by a.Nama\r\n\t\t\t";
        $r1 = _query($s1);
        $counting = 0;
        while ($w1 = _fetch_array($r1)) {
            $counting++;
            $check = empty($w1['RemedialID']) ? '' : 'checked';
            $disabled = ($w1['Final'] == 'Y' or $w1['RemedialSet'] == 'Y') ? 'disabled' : '';
            $grade = empty($w1['GradeNilai']) ? '-' : $w1['GradeNilai'];
            echo "<tr><td>{$counting}.</td>\r\n\t\t\t\t\t<td>{$w1['MhswID']}</td>\r\n\t\t\t\t\t<td>{$w1['Nama']}</td>\r\n\t\t\t\t\t<td align=center>{$w1['_Tahun']}</td>\r\n\t\t\t\t\t<td>{$w1['_Dosen']}</td>\r\n\t\t\t\t\t<td align=center>{$w1['GradeNilai']}</td>\r\n\t\t\t\t\t<td align=center><input type=checkbox id='Norm{$counting}' name='Pilihan[]' value='{$w1['KRSID']}' {$check} {$disabled}>\r\n\t\t\t\t\t\t\t\t\t <input type=hidden name='SemuaPilihan[]' value='{$w1['KRSID']}'></td>\r\n\t\t\t\t\t </td></tr>";
        }
        $s1 = "select r.MhswID, m.Nama, r.RemedialID, d.Nama as _Dosen, r.TahunID as _Tahun, r.KRSID, r.GradeNilai, \r\n\t\t\t\t\tr.RemedialLanjutanID, r2.Final, r2.RemedialSet\r\n\t\t\t\t\t\t\t\t   from remedial r\r\n\t\t\t\t\t\t\t\t\t\tleft outer join krs k on r.KRSID=k.KRSID and r.KodeID=k.KodeID\r\n\t\t\t\t\t\t\t\t\t\tleft outer join mhsw m on m.MhswID=r.MhswID and r.KodeID=m.KodeID\r\n\t\t\t\t\t\t\t\t\t\tleft outer join jadwalremedial jd on jd.JadwalRemedialID=r.JadwalRemedialID\r\n\t\t\t\t\t\t\t\t\t\tleft outer join dosen d on jd.DosenID=d.Login and r.KodeID=d.KodeID\r\n\t\t\t\t\t\t\t\t\t\tleft outer join remedial r2 on r.RemedialLanjutanID=r2.RemedialID\r\n\t\t\twhere (r.GradeNilai='D' or r.GradeNilai='E') and r.Final='Y' and r.RemedialLanjutanID=0 and r.KodeID='" . KodeID . "' and k.MKID='{$MKID}'\r\n\t\t\t\tand (r.TahunID!='{$_SESSION['_remedialTahunID']}')\r\n\t\t\t\torder by m.Nama\r\n\t\t\t";
        $countNORM = $counting;
        $countREM = 0;
        $r1 = _query($s1);
        while ($w1 = _fetch_array($r1)) {
            $counting++;
            $countREM++;
            $check = $w1['RemedialLanjutanID'] == 0 ? '' : 'checked';
            $disabled = ($w1['Final'] == 'Y' or $w1['RemedialSet'] == 'Y') ? 'disabled' : '';
            $grade = empty($w1['GradeNilai']) ? '-' : $w1[GradeNilai];
            echo "<tr><td>{$counting}.</td>\r\n\t\t\t\t\t<td>{$w1['MhswID']}</td>\r\n\t\t\t\t\t<td>{$w1['Nama']}(REM)</td>\r\n\t\t\t\t\t<td align=center>{$w1['_Tahun']}</td>\r\n\t\t\t\t\t<td>{$w1['_Dosen']}</td>\r\n\t\t\t\t\t<td align=center>{$w1['GradeNilai']}</td>\r\n\t\t\t\t\t<td align=center><input type=checkbox id='Rem{$countREM}' name='PilihanRem[]' value='{$w1['RemedialID']}' {$check} {$disabled}>\r\n\t\t\t\t\t\t\t\t\t <input type=hidden name='SemuaPilihanRem[]' value='{$w1['RemedialID']}'></td>\r\n\t\t\t\t\t </td></tr>";
        }
        echo "\t\t</table></td></tr>";
        echo "\t\t<tr><td colspan=4 align=center><input type=button name='SubmitButton' value='Simpan' onClick=\"ignoreCheckBoxDisable('Norm', 'Rem', this.form)\" />\r\n\t\t\t\t\t\t\t\t  <input type=button name='Batal' value='Batal' onClick=\"self.close()\" />\r\n\t\t\t\t\t\t\t\t  <input type=hidden id='JumlahNorm' name='JumlahNorm' value='{$countNORM}' >\r\n\t\t\t\t\t\t\t\t  <input type=hidden id='JumlahRem' name='JumlahRem' value='{$countREM}' >\r\n\t\t\t\t\t\t\t\t  </td></tr></table>";
    }
}
function ListKelas()
{
    loadJavaScripts();
    $opttahun = GetOption2('tahun', "TahunID", 'TahunID', $_SESSION['opk_tahun'], '', 'TahunID');
    $commonwidth = 25;
    $kelaminwidth = 3 * $commonwidth;
    $prodiwidth = $n * $commonwidth;
    $nilaiwidth = 2 * $commonwidth;
    $s = "select ProdiID, Nama from prodi where KodeID='" . KodeID . "' order by ProdiID";
    $r = _query($s);
    $n = _num_rows($r);
    while ($w = _fetch_array($r)) {
        $prodititle .= "<th class=ttl width={$commonwidth}>{$w['ProdiID']}</th>";
    }
    $ss = "select * from kelas where TahunID='{$_SESSION['opk_tahun']}' and KodeID='" . KodeID . "' order by Nama";
    $rr = _query($ss);
    $nn = _num_rows($rr) + 2;
    // Total statistik berdasarkan kelamin
    $s1 = "select m.MhswID, m.Kelamin\r\n\t\t\t\tfrom mhsw m left outer join kelas mk on m.KelasID=mk.KelasID  \r\n\t\t\t\twhere m.KodeID='" . KodeID . "' and mk.KodeID='" . KodeID . "' and mk.TahunID='{$_SESSION['opk_tahun']}'";
    $r1 = _query($s1);
    $pria = 0;
    $wanita = 0;
    $nogender = 0;
    while ($w1 = _fetch_array($r1)) {
        if ($w1['Kelamin'] == 'P') {
            $pria++;
        } else {
            if ($w1['Kelamin'] == 'W') {
                $wanita++;
            } else {
                $nogender++;
            }
        }
    }
    // Total statistik berdasarkan prodi
    $s1 = "select p.ProdiID, count(m.ProdiID) as _count from prodi p \r\n\t\t\t\tleft outer join mhsw m on p.ProdiID=m.ProdiID\r\n\t\t\t\tleft outer join kelas mk on m.KelasID=mk.KelasID\r\n\t\t\t\twhere m.KodeID='" . KodeID . "' and mk.KodeID='" . KodeID . "' and p.KodeID='" . KodeID . "' and mk.TahunID='{$_SESSION['opk_tahun']}' group by m.ProdiID";
    $r1 = _query($s1);
    $w1 = _fetch_array($r1);
    $r = _query($s);
    $prodistring = '';
    while ($w = _fetch_array($r)) {
        if ($w1['ProdiID'] == $w['ProdiID']) {
            $prodistring .= "{$w['ProdiID']}: <b>{$w1['_count']}</b> &bull; ";
            $w1 = _fetch_array($r1);
        } else {
            $prodistring .= "{$w['ProdiID']}: <b>0</b> &bull; ";
        }
    }
    // Total statistik berdasarkan nilai
    $s1 = "select MhswID, NilaiUjian \r\n\t\t\t\tfrom mhsw m left outer join kelas mk on m.KelasID=mk.KelasID\r\n\t\t\t\twhere mk.TahunID='{$_SESSION['opk_tahun']}' and m.KodeID='" . KodeID . "' and mk.KodeID='" . KodeID . "'";
    $r1 = _query($s1);
    $n1 = _num_rows($r1);
    $total = 0;
    while ($w1 = _fetch_array($r1)) {
        $total += $w1['NilaiUjian'];
    }
    $average = $n1 == 0 ? 0 : number_format($total / $n1, 2);
    // Make the title names
    echo "<table class=box cellspacing=1 align=center width=800>\r\n\t\t\t<form action='?' method=POST>\r\n\t\t\t\t<input type=hidden name='mnux' value='{$_SESSION['mnux']}' />\r\n\t\t\t\t<input type=hidden name='gos' value='' />\r\n\t\t\t\t\r\n\t\t\t\t<tr><td class=inp>Tahun Akademik:</td>\r\n\t\t\t\t\t<td class=ul1><input type=text name='opk_tahun' value='{$_SESSION['opk_tahun']}' size=3 maxlength=10>\r\n\t\t\t\t\t\t\t\t\t\t\t<input type=submit name='Set' value='Set'></td></tr>\r\n\t\t\t</form>\r\n\t\t  </table>\r\n\t\t  \r\n\t\t  <table class=box cellspacing=1 align=center width=800>\r\n\t\t\t\t<input type=hidden name='gos' value='' />\r\n\t\t\t\t\r\n\t\t\t\t<tr><td class=ul1 align=center colspan=10><font color=green><b>STATISTIK TOTAL SELURUH KELAS:</b><font></td></tr>\r\n\t\t\t\t<tr><td class=inp>Total Peserta:</td>\r\n\t\t\t\t\t<td class=ul1><b>{$n1}</b></td>\r\n\t\t\t\t<tr><td class=inp>Berdasarkan Kelamin:</td>\r\n\t\t\t\t\t<td class=ul1>Pria: <b>{$pria}</b> &bull; Wanita: <b>{$wanita}</b></td></tr>\r\n\t\t\t\t<tr><td class=inp>Berdasarkan Prodi:</td>\r\n\t\t\t\t\t<td class=ul1>{$prodistring}</td></tr>\r\n\t\t\t\t<tr><td class=inp>Berdasarkan Nilai:</td>\r\n\t\t\t\t\t<td class=ul1>Total Nilai: <b>{$total}</b> &bull; Rata-rata Nilai: <b>{$average}</b></td></tr> \r\n\t\t</table>\t\t\t\t\t\t\t\r\n\t\t\t\r\n\t\t<table class=box cellspacing=1 align=center width=800>\r\n\t\t\t\t<tr><td>{$nbsp}</td></tr>\r\n\t\t\t\t<tr><th class=ttl rowspan=2 width=15>#</th>\r\n\t\t\t\t\t<th class=ttl rowspan=2 width=80>Nama Kelas</th>\r\n\t\t\t\t\t<th class=ttl rowspan=2 width=30>Kapasitas Sekarang</th>\r\n\t\t\t\t\t<th class=ttl rowspan=2 width=30>Kapasitas Maksimum</th>\r\n\t\t\t\t\t<td rowspan={$nn} width=5>&nbsp</th>\r\n\t\t\t\t\t<th class=ttl colspan=3 width={$kelaminwidth}>Berdasarkan Kelamin</th>\r\n\t\t\t\t\t<td rowspan={$nn} width=5>&nbsp</th>\r\n\t\t\t\t\t<th class=ttl colspan={$n} width={$prodiwidth}>Berdasarkan Program Studi</th>\r\n\t\t\t\t\t<td rowspan={$nn} width=5>&nbsp</th>\r\n\t\t\t\t\t<th class=ttl colspan=2 width={$nilaiwidth}>Berdasarkan Nilai</th>\r\n\t\t\t\t\t<td rowspan={$nn} width=5>&nbsp</th>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<tr>\r\n\t\t\t\t\t<th class=ttl width={$commonwidth}><img src='../img/P.bmp'></img></th>\r\n\t\t\t\t\t<th class=ttl width={$commonwidth}><img src='../img/W.bmp'></img></th>\r\n\t\t\t\t\t<th class=ttl width={$commonwidth}>&times</th>\r\n\t\t\t\t\t{$prodititle}\r\n\t\t\t\t\t<th class=ttl width={$commonwidth}>Total</th>\r\n\t\t\t\t\t<th class=ttl width={$commonwidth}>Rata2</th>\r\n\t\t\t\t</tr>";
    $counting = 0;
    // Fill the table
    while ($ww = _fetch_array($rr)) {
        $counting++;
        echo "<tr>\r\n\t\t\t\t<td class=ul1 align=right><a href='#' onClick=\"javascript:fnEditKelas(0, {$ww['KelasID']})\" />\r\n\t\t\t\t\t<img title='Edit Kelas' src='../img/edit.png' /></a> {$counting}.</td>\r\n\t\t\t\t<td class=ul1>{$ww['Nama']}</td>\r\n\t\t\t\t<td class=ul1 align=center>{$ww['KapasitasSekarang']}</td>\r\n\t\t\t\t<td class=ul1 align=center>{$ww['KapasitasMaksimum']}</td>";
        $s1 = "select MhswID, Kelamin from mhsw where KelasID='{$ww['KelasID']}' and KodeID='" . KodeID . "'";
        $r1 = _query($s1);
        $pria = 0;
        $wanita = 0;
        $nogender = 0;
        while ($w1 = _fetch_array($r1)) {
            if ($w1['Kelamin'] == 'P') {
                $pria++;
            } else {
                if ($w1['Kelamin'] == 'W') {
                    $wanita++;
                } else {
                    $nogender++;
                }
            }
        }
        echo " <td class=ul1 align=center>{$pria}</td>\r\n\t\t\t\t<td class=ul1 align=center>{$wanita}</td>\r\n\t\t\t\t<td class=ul1 align=center>{$nogender}</td>";
        $s1 = "select m.ProdiID, p.Nama, count(m.ProdiID) as _count \r\n\t\t\t\t\tfrom prodi p left outer join mhsw m on m.ProdiID=p.ProdiID\r\n\t\t\t\twhere m.KelasID='{$ww['KelasID']}' and m.KodeID='" . KodeID . "' and p.KodeID='" . KodeID . "' group by p.ProdiID order by p.ProdiID";
        $r1 = _query($s1);
        $r = _query($s);
        $w1 = _fetch_array($r1);
        while ($w = _fetch_array($r)) {
            if ($w1['ProdiID'] == $w['ProdiID']) {
                echo "<td class=ul1 align=center>{$w1['_count']}</td>";
                $w1 = _fetch_array($r1);
            } else {
                echo "<td class=ul1 align=center>0</td>";
            }
        }
        $s2 = "select MhswID, NilaiUjian from mhsw where KelasID='{$ww['KelasID']}' and KodeID='" . KodeID . "'";
        $r2 = _query($s2);
        $n2 = _num_rows($r2);
        $total = 0;
        while ($w2 = _fetch_array($r2)) {
            $total += $w2['NilaiUjian'];
        }
        echo "<td class=ul1 align=center>{$total}</td>";
        $average = $n2 == 0 ? 0 : number_format($total / $n2, 2);
        echo "<td class=ul1 align=center>{$average}</td>";
        echo "</tr>";
        //echo "<td class=ul1 align=center><img src='../img/book$ww[NA].gif' /></td>";
    }
    echo "\t   <tr><td class=ul1 colspan=20 align=center><input type=button name='Kembali' value='Kembali' onClick=\"self.close()\" ></td></tr>\r\n\t\t <table>";
}