function TampilkanJadwal() { $hdrjdwl = "<tr><th class=ttl>ID</th>\r\n <th class=ttl>Waktu</th>\r\n <th class=ttl>Ruang</th>\r\n <th class=ttl>Kode MK</th>\r\n <th class=ttl>Matakuliah</th>\r\n <th class=ttl>Kelas</th>\r\n <th class=ttl>Jen</th>\r\n <th class=ttl>SKS</th>\r\n <th class=ttl>Dosen</th>\r\n <th class=ttl>Jml<br />Mhsw</th>\r\n <th class=ttl title='Kelas Serial'>Serial</th>\r\n <th class=ttl>Hrg<br />Std?</th>\r\n <th class=ttl title='Presensi'>Pres</th>\r\n <th class=ttl title='Prasyarat'>Pra</th>\r\n <th class=ttl title='Tutup Jadwal'>Tutup</th>\r\n </tr>\r\n "; $s = "select j.*, r.KampusID,\r\n time_format(j.JamMulai, '%H:%i') as Mulai,\r\n time_format(j.JamSelesai, '%H:%i') as Selesai\r\n from jadwal j\r\n left outer join mk mk on j.MKID=mk.MKID\r\n left outer join ruang r on j.RuangID=r.RuangID\r\n where j.NamaKelas<>'KLINIK'\r\n and j.KodeID='{$_SESSION['KodeID']}' and j.TahunID='{$_SESSION['tahun']}'\r\n and INSTR(j.ProdiID, '.{$_SESSION['prodi']}.')>0\r\n and INSTR(j.ProgramID, '.{$_SESSION['prid']}.')>0\r\n order by j.HariID, j.JamMulai, j.MKKode, j.NamaKelas"; $r = _query($s); // Tampilkan daftar jadwal $hari = -1; $gotohari = DftrHari(); echo "<p><table class=box cellspacing=1 cellpadding=4 width=100%>"; while ($w = _fetch_array($r)) { if ($hari != $w['HariID']) { $hari = $w['HariID']; $NamaHari = GetaField('hari', 'HariID', $hari, 'Nama'); echo "<tr><td class=ul colspan=12><b><a name='{$hari}'></a>{$NamaHari}</b>\r\n <a href='#Atas' title='Kembali ke atas'>^</a> {$gotohari}</td></tr>"; echo $hdrjdwl; } $c = $w['NA'] == 'N' ? "class=ul" : "class=nac"; // Kelas Serial $ser = $w['JadwalSer'] == 0 ? '' : "<abbr title='Serial dgn Jadwal: {$w['JadwalSer']}'>» " . $w['JadwalSer'] . "</abbr>"; $jumlahser = $w['JumlahKelasSerial'] > 0 ? 'Ada: ' . $w['JumlahKelasSerial'] : ' '; $arrdosen = explode('.', TRIM($w['DosenID'], '.')); $strdosen = implode(',', $arrdosen); $dosen = empty($strdosen) ? '' : GetArrayTable("select Nama from dosen where Login in ({$strdosen}) order by Nama", "Login", "Nama", '<br />'); $hrg = $w['HargaStandar'] == 'Y' ? "<img src='img/{$w['HargaStandar']}.gif'>" : number_format($w['Harga']); $arrpra = GetArrayTable("select concat(mk.MKKode, ' - ', mk.Nama, ' (SKS min: ', mk.SKSMin, ', IPK min: ', mk.IPKMin, ')') as PRA \r\n from mkpra\r\n left outer join mk on mkpra.PraID=mk.MKID\r\n where mkpra.MKID='{$w['MKID']}' ", 'PRA', 'PRA', $_lf); $strpra = empty($arrpra) ? ' ' : "<a name='{$w['JadwalID']}' onClick=\"javascript:alert('{$arrpra}')\"><img src='img/check.gif'></a>"; $ttp1 = $w['NA'] == 'Y' ? $w['JadwalID'] : "<a href='?mnux=jadwal&gos=JdwlEdt&md=0&JadwalID={$w['JadwalID']}'><img src='img/edit.png'>\r\n {$w['JadwalID']}</a>"; $ttp2 = $w['NA'] == 'Y' ? "×" : "<a href='?mnux=jadwal.tutup&gos=JdwlTtp&JadwalID={$w['JadwalID']}'><img src='img/del.gif'></a>"; echo "<tr>\r\n <td class=inp1 nowrap>{$ttp1}</td>\r\n <td {$c}>{$w['Mulai']}-{$w['Selesai']}</td>\r\n <td {$c}>{$w['KampusID']}-{$w['RuangID']}</td>\r\n <td {$c}>{$w['MKKode']}</td>\r\n <td {$c}>{$w['Nama']}</td>\r\n <td {$c}>{$w['NamaKelas']} </td>\r\n <td {$c} align=center>{$w['JenisJadwalID']}</td>\r\n <td {$c}>{$w['SKS']} ({$w['SKSAsli']})</td>\r\n <td {$c}>{$dosen} </td>\r\n <td {$c} align=right>{$w['JumlahMhsw']}/{$w['Kapasitas']}</td>\r\n <td {$c} align=right title='Jumlah Kelas Serial'>{$jumlahser} {$ser}</td>\r\n <td {$c} align=center>{$hrg}</td>\r\n <td {$c} title='Presensi'><a href='?mnux=jadwal.pres&JadwalID={$w['JadwalID']}'><img src='img/check.gif'></a> {$w['Kehadiran']}</td>\r\n <td {$c} title='Matakuliah prasyarat'>{$strpra}</td>\r\n <td {$c} align=center title='Tutup'>{$ttp2}</td></tr>\r\n </tr>"; } echo "</table></p>"; // Tampilkan pesan echo "<p><table class=box cellspacing=1 cellpadding=4 width=100%>\r\n <tr><td class=ul nowrap><b>Jadwal Serial</b></td>\r\n <td class=ul>Jadwal Serial adalah jadwal matakuliah yang dipecah menjadi beberapa kali\r\n pertemuan dalam 1 minggu. Karena sebenarnya adalah 1 jadwal matakuliah,\r\n maka mahasiswa wajib hadir di setiap pertemuan\r\n dan masing-masing pertemuan memiliki isian presensi sendiri.\r\n Nilai akan diperhitungkan dengan jumlah SKS-nya.</td></tr>\r\n <tr><td class=ul nowrap><b>Pres (Presensi)</b></td>\r\n <td class=ul>Memasukkan presensi dosen dan mahasiswa.</td></tr>\r\n </table></p>"; }
function KRSAdd($mhsw, $datatahun, $khs) { if ($datatahun['TglKRSMulai'] <= date('Y-m-d') && date('Y-m-d') <= $datatahun['TglKRSSelesai'] || $datatahun['TglUbahKRSMulai'] <= date('Y-m-d') && date('Y-m-d') <= $datatahun['TglUbahKRSSelesai'] || $_SESSION['_LevelID'] == 1) { } else { die("KRS sudah tidak dapat diubah"); } // Ambil data KRS $kecuali = JadwalKRSMhsw($mhsw, $datatahun, $khs); $sqlkecuali = empty($kecuali) ? '' : "and not (j.JadwalID in ({$kecuali}))"; // Jadwal $whr = ''; if (($mhsw['ProdiID'] == '31' || $mhsw['ProdiID'] == '32') && substr($mhsw['MhswID'], 2, 4) <= '2003') { $whr = ""; } elseif (($mhsw['ProdiID'] == '31' || $mhsw['ProdiID'] == '32') && substr($mhsw['MhswID'], 2, 4) == '2004' && $mhsw['StatusAwalID'] == 'P') { $whr = ""; } else { $whr = "and INSTR(j.ProgramID, '.{$mhsw['ProgramID']}.')>0"; } $s = "select j.*, jj.Nama as JJ,\r\n time_format(j.JamMulai, '%H:%i') as JM,\r\n time_format(j.JamSelesai, '%H:%i') as JS\r\n from jadwal j\r\n left outer join jenisjadwal jj on j.JenisJadwalID=jj.JenisJadwalID\r\n where j.TahunID='{$khs['TahunID']}'\r\n and j.NA<>'Y'\r\n and INSTR(j.ProdiID, '.{$mhsw['ProdiID']}.')>0\r\n {$whr}\r\n {$sqlkecuali}\r\n order by j.HariID, j.JamMulai, j.MKKode "; $r = _query($s); // Tampilkan TampilkanJudul("<a href='#Atas'></a>Tambah KRS"); $hari = -1; $kehari = DftrHari(); $btn = "<tr><td class=ul colspan=12><input type=submit name='Ambil' value='Ambil Matakuliah'>\r\n <input type=reset name='Reset' value='Reset'>\r\n <input type=button name='Batal' value='Batal' onClick=\"location='?mnux=krs'\">\r\n </td></tr>"; $hdrjdwl = "<tr>\r\n <th class=ttl>ID</th>\r\n <th class=ttl>Ambil</th>\r\n <th class=ttl>Jam</th>\r\n <th class=ttl>Ruang</th>\r\n <th class=ttl title='Kapasitas Kelas'>Kaps</th>\r\n <th class=ttl>Kode MK</th>\r\n <th class=ttl>Matakuliah</th>\r\n <th class=ttl>Kelas</th>\r\n <th class=ttl title='Jenis Kuliah'>Jen</th>\r\n <th class=ttl>SKS</th>\r\n <th class=ttl>Dosen</th>\r\n <th class=ttl title='Apakah harganya standar?'>Hrg<br />Std?</td>\r\n <th class=ttl title='Matakuliah prasyarat'>Pra</td>\r\n </tr>"; echo "<p><table class=box cellspacing=1 cellpadding=4>\r\n <form action='?' name='krs' method=POST>\r\n <input type=hidden name='mnux' value='krs'>\r\n <input type=hidden name='gos' value=''>\r\n <input type=hidden name='slnt' value='krs.lib'>\r\n <input type=hidden name='slntx' value='KRSSav'>\r\n <input type=hidden name='mhswid' value='{$mhsw['MhswID']}'>\r\n <input type=hidden name='tahun' value='{$khs['TahunID']}'>\r\n <input type=hidden name='khsid' value='{$khs['KHSID']}'>"; while ($w = _fetch_array($r)) { if ($hari != $w['HariID']) { if ($hari > 0) { echo $btn; } $hari = $w['HariID']; $namahari = GetaField('hari', 'HariID', $hari, 'Nama'); echo "<tr><td class=ul colspan=12><a name='{$hari}'></a><b>{$namahari}</b>\r\n <a href='#Atas'>^</a> {$kehari}</td></tr>"; echo $hdrjdwl; } // Daftar Dosen $arrdosen = explode('.', TRIM($w['DosenID'], '.')); for ($i = 0; $i < sizeof($arrdosen); $i++) { $arrdosen[$i] = "'" . $arrdosen[$i] . "'"; } $strdosen = implode(',', $arrdosen); $dosen = empty($strdosen) ? '' : GetArrayTable("select concat(Nama, ', ', Gelar) as NM from dosen where Login in ({$strdosen}) order by Nama", "Login", "NM", '<br />'); $hrg = $w['HargaStandar'] == 'Y' ? "<img src='img/{$w['HargaStandar']}.gif'>" : number_format($w['Harga']); // Tampilkan $cb = $w['JadwalSer'] == 0 ? "<input type=checkbox name='JDWL[]' value='{$w['JadwalID']}'>" : "» {$w['JadwalSer']}"; // Disable jika sudah memenuhi kapasitas $cb = $w['JumlahMhswKRS'] >= $w['Kapasitas'] ? ' ' : $cb; $c = $w['JumlahMhswKRS'] >= $w['Kapasitas'] ? "class=wrn" : "class=ul"; $arrpra = GetArrayTable("select mk.MKKode\r\n from mkpra\r\n left outer join mk on mkpra.PraID=mk.MKID\r\n where mkpra.MKID='{$w['MKID']}' ", 'MKKode', 'MKKode'); $arrpra = empty($arrpra) ? " " : $arrpra; echo "<tr>\r\n <td class=inp1>{$w['JadwalID']}</td>\r\n <td {$c} align=center>{$cb}</td>\r\n <td {$c}>{$w['JM']}-{$w['JS']}</td>\r\n <td {$c}>{$w['RuangID']} </td>\r\n <td {$c} align=right>{$w['JumlahMhswKRS']}/{$w['Kapasitas']}</td>\r\n <td {$c}>{$w['MKKode']}</td>\r\n <td {$c}>{$w['Nama']}</td>\r\n <td {$c}>{$w['NamaKelas']} </td>\r\n <td {$c} align=center title='{$w['JJ']}'>{$w['JenisJadwalID']}</td>\r\n <td {$c} align=right>{$w['SKS']} ({$w['SKSAsli']})</td>\r\n <td {$c}>{$dosen} </td>\r\n <td {$c} align=center>{$hrg}</td>\r\n <td {$c}>{$arrpra}</td>\r\n </tr>"; } echo $btn; echo "</table></p>"; }
function TampilkanJadwal() { global $thn; $hdrjdwl = "<tr><th class=ttl>ID</th>\r\n <th class=ttl>Waktu</th>\r\n <th class=ttl>Ruang</th>\r\n <th class=ttl>Kode MK</th>\r\n <th class=ttl>Matakuliah</th>\r\n <th class=ttl>Kelas</th>\r\n <th class=ttl>Jen</th>\r\n <th class=ttl>SKS</th>\r\n <th class=ttl>Dosen</th>\r\n <th class=ttl>Jml<br />Mhsw</th>\r\n <th class=ttl>Jml<br />Mhsw<br />KRS</th>\r\n <th class=ttl colspan=2 title='Kelas Serial'>Serial</th>\r\n <th class=ttl>Hrg<br />Std?</th>\r\n <th class=ttl><img src='img/printer.gif'></th>\r\n\t\t<th class=ttl Title='Cetak Label'><img src='img/printer.gif'></th>\r\n <th class=ttl title='Presensi'>Pres</th>\r\n <th class=ttl title='Prasyarat'>Pra</th>\r\n <th class=ttl title='Hapus Jadwal'>Hapus</th>\r\n </tr>\r\n "; $_jj = empty($_SESSION['jenjad']) ? '' : "and j.JenisJadwalID='{$_SESSION['jenjad']}' "; $s = "select j.*, r.KampusID, d.Nama as NamaDosen, concat(d.Nama, ', ', d.Gelar) as DSN,\r\n time_format(j.JamMulai, '%H:%i') as Mulai,\r\n time_format(j.JamSelesai, '%H:%i') as Selesai\r\n from jadwal j\r\n left outer join mk mk on j.MKID=mk.MKID\r\n left outer join dosen d on j.DosenID=d.Login\r\n left outer join ruang r on j.RuangID=r.RuangID\r\n where j.NamaKelas<>'KLINIK' and j.NA<>'Y' {$_jj}\r\n and j.KodeID='{$_SESSION['KodeID']}' and j.TahunID='{$_SESSION['tahun']}'\r\n and INSTR(j.ProdiID, '.{$_SESSION['prodi']}.')>0\r\n and INSTR(j.ProgramID, '.{$_SESSION['prid']}.')>0\r\n order by j.HariID, j.JamMulai, j.MKKode, j.NamaKelas"; $r = _query($s); // Tampilkan daftar jadwal $hari = -1; $gotohari = DftrHari(); echo "<p><table class=box cellspacing=1 width=100%>"; while ($w = _fetch_array($r)) { if ($hari != $w['HariID']) { $hari = $w['HariID']; $NamaHari = GetaField('hari', 'HariID', $hari, 'Nama'); echo "<tr><td class=ul colspan=12><b><a name='{$hari}'></a>{$NamaHari}</b>\r\n <a href='#Atas' title='Kembali ke atas'>^</a> {$gotohari} << <a href='?mnux=jadwal&md=1&gos=JdwlEdt&md=1&hari={$w['HariID']}'>Tambah Jadwal</a> >></td></tr>"; echo $hdrjdwl; } $c = $w['Final'] == 'Y' ? "class=inp1" : "class=ul"; // assisten dosen $assisten = GetAssistenDosen($w); //$func = (!empty($assisten)) ? BuatSelectCetak($w) : ''; // Kelas Serial $ser = $w['JadwalSer'] == 0 ? '' : "<abbr title='Serial dgn Jadwal: {$w['JadwalSer']}'>" . $w['JadwalSer'] . "</abbr>"; $tambahser = $w['JadwalSer'] == 0 ? "<a href='?mnux=jadwal&gos=JdwlEdt&md=1&JadwalSer={$w['JadwalID']}&MKID={$w['MKID']}'><img src='img/share.gif'></a>" : ''; $jumlahser = $w['JumlahKelasSerial'] > 0 ? $w['JumlahKelasSerial'] : ' '; // Harga standar $hrg = $w['HargaStandar'] == 'Y' ? "<img src='img/{$w['HargaStandar']}.gif'>" : number_format($w['Harga']); // ambil prasyarat $arrpra = GetArrayTable("select concat(mk.MKKode, ' - ', mk.Nama, ' (SKS min: ', mk.SKSMin, ', IPK min: ', mk.IPKMin, ')') as PRA \r\n from mkpra\r\n left outer join mk on mkpra.PraID=mk.MKID\r\n where mkpra.MKID='{$w['MKID']}' ", 'PRA', 'PRA', $_lf); $strpra = empty($arrpra) ? ' ' : "<a name='{$w['JadwalID']}' onClick=\"javascript:alert('{$arrpra}')\"><img src='img/check.gif'></a>"; // Validasi cetak Daftar Mhsw //$dftrmhsw = ($thn['TglUbahKRSSelesai'] < date('Y-m-d'))? '' : "<a href='jadwal.cetak.mhsw.php?RincianMhsw&JadwalID=$w[JadwalID]' Title='Daftar Mahasiswa' target=_blank>Dftr</a>"; if ($w['Final'] == 'Y') { $edit = ' '; $hps = ' '; } else { $edit = "<a href='?mnux=jadwal&gos=JdwlEdt&md=0&JadwalID={$w['JadwalID']}'><img src='img/edit.png'><a name='{$w['JadwalID']}'></a>"; $hps = "<a href='?mnux=jadwal&gos=JdwlDel&JadwalID={$w['JadwalID']}'><img src='img/del.gif'></a>"; } if ($thn['TglKRSMulai'] < date('Y-m-d')) { if ($_SESSION['_LevelID'] == 1 || $_SESSION['_LevelID'] == 20 || $_SESSION['_LevelID'] == 41) { $edit = "<a href='?mnux=jadwal&gos=JdwlEdt&md=0&JadwalID={$w['JadwalID']}'><img src='img/edit.png'><a name='{$w['JadwalID']}'></a>"; $hps = "<a href='?mnux=jadwal&gos=JdwlDel&JadwalID={$w['JadwalID']}'><img src='img/del.gif'></a>"; } else { $edit = ""; $hps = " "; } } if ($thn['TglAutodebetSelesai'] >= date('Y-m-d') || $_SESSION['_LevelID'] == 1 || $_SESSION['_LevelID'] == 20) { $dhksem = "<a href='cetak/jadwal.cetak.mhsw.php?RincianMhsw&JadwalID={$w['JadwalID']}' Title='Daftar Mahasiswa' target=_blank>DHK Sem</a>"; } else { $dhksem = ''; } //$edit = ($thn['TglKRSMulai']) > date('Y-m-d')? '' : "<a href='?mnux=jadwal&gos=JdwlEdt&md=0&JadwalID=$w[JadwalID]'><img src='img/edit.png'><a name='$w[JadwalID]'></a>"; echo "<tr>\r\n <td class=inp1 nowrap>{$edit} {$w['JadwalID']}</td>\r\n <td {$c}>{$w['Mulai']}-{$w['Selesai']}</td>\r\n <td {$c}>{$w['KampusID']}-{$w['RuangID']}</td>\r\n <td {$c}>{$w['MKKode']}</td>\r\n <td {$c}>{$w['Nama']}</td>\r\n <td {$c}>{$w['NamaKelas']} </td>\r\n <td {$c} align=center>{$w['JenisJadwalID']}</td>\r\n <td {$c}>{$w['SKS']}/{$w['SKSHonor']}</td>\r\n <td {$c}><a href='?mnux=jadwal&gos=AssDsnEdt&JadwalID={$w['JadwalID']}' title='Tambah Dosen Pengampu'><img src='img/share.gif'></a>\r\n <abbr title='{$w['DSN']}'>{$w['NamaDosen']}</abbr>\r\n {$assisten}</td>\r\n <td {$c} align=right>{$w['JumlahMhsw']}/{$w['Kapasitas']}</td>\r\n <td {$c} align=right>{$w['JumlahMhswKRS']}</td>\r\n <td {$c} align=center title='Kelas Serial'> {$ser}{$tambahser}</td>\r\n <td {$c} align=right title='Jumlah Kelas Serial'>{$jumlahser}</td>\r\n <td {$c} align=center>{$hrg}</td>\r\n <td {$c}><a href='cetak/jadwal.cetakdh.php?JadwalID={$w['JadwalID']}&ctk=0' title='Daftar Hadir Kuliah' target=_blank>DHK</a>{$func} {$dhksem}</td>\r\n\t\t\t<td {$c}><a href='cetak.label.jdwl.php?JadwalID={$w['JadwalID']}&tahun={$_SESSION['tahun']}&prodi={$_SESSION['prodi']}&prid={$_SESSION['prid']}&asal=1' title='Cetak Label Map'>LABEL</a></td>\r\n <td {$c} title='Presensi'><a href='?mnux=jadwal.pres&dosen={$w['DosenID']}&JadwalID={$w['JadwalID']}'><img src='img/check.gif'></a> {$w['Kehadiran']}</td>\r\n <td {$c} title='Matakuliah prasyarat'>{$strpra}</td>\r\n <td {$c} align=center title='Hapus'>{$hps}</td></tr>\r\n </tr>"; } echo "</table></p>"; // Tampilkan pesan echo "<p><table class=box cellspacing=1 cellpadding=4 width=100%>\r\n <tr><td class=ul nowrap><b>Jadwal Serial</b></td>\r\n <td class=ul>Jadwal Serial adalah jadwal matakuliah yang dipecah menjadi beberapa kali\r\n pertemuan dalam 1 minggu. Karena sebenarnya adalah 1 jadwal matakuliah,\r\n maka mahasiswa wajib hadir di setiap pertemuan\r\n dan masing-masing pertemuan memiliki isian presensi sendiri.\r\n Nilai akan diperhitungkan dengan jumlah SKS-nya.</td></tr>\r\n <tr><td class=ul nowrap><b>Pres (Presensi)</b></td>\r\n <td class=ul>Memasukkan presensi dosen dan mahasiswa.</td></tr>\r\n </table></p>"; }