function TampilkanHeaderKoreksiKelas($jdwl) { CheckFormScript('Ke_Kelas'); echo "<form action='?' name='Korek' method=POST onSubmit=\"return CheckForm(this)\">\r\n <input type=hidden name='mnux' value='koreksikelas'>\r\n <input type=hidden name='gos' value='KoreksiKelasSav'>\r\n <input type=hidden name='jid' value='{$jdwl['JadwalID']}'>"; //GetOption2($_table, $_field, $_order='', $_default='', $_where='', $_value='', $not=0) { $optjdwl = GetOption2("jadwal j \r\n left outer join dosen d on j.DosenID=d.Login\r\n left outer join hari h on j.HariID=h.HariID", "concat(j.JadwalID, '. ', h.Nama, ' ', j.MKKode, ' - ', j.Nama, ' ', j.NamaKelas, ' (', j.JenisJadwalID, ') - ', d.Nama)", "j.HariID, j.JamMulai", '', "INSTR(j.ProgramID, '.{$_SESSION['prid']}.')>0 and j.TahunID = '{$_SESSION['tahun']}' and INSTR(j.ProdiID, '.{$_SESSION['prodi']}.')>0 and MKKode='{$jdwl['MKKode']}' and JadwalID<>{$jdwl['JadwalID']} and JenisJadwalID = '{$jdwl['JenisJadwalID']}'", "JadwalID", 1); TuliskanCentangSemua(); echo "<p><table class=box cellspacing=1 cellpadding=4>\r\n <tr><td class=ul colspan=4><font size=+1>Jadwal Matakuliah Asal</td></tr>\r\n <tr><td class=inp>Jadwal</td><td class=ul>{$jdwl['JadwalID']}</td>\r\n <td class=inp>Ruang</td><td class=ul>{$jdwl['RuangID']} </td></tr>\r\n <tr><td class=inp>Waktu</td><td class=ul>{$jdwl['HR']}, {$jdwl['JM']}-{$jdwl['JS']}</td>\r\n <td class=inp>Kelas</td><td class=ul>{$jdwl['NamaKelas']}, SKS: {$jdwl['SKS']}</td></tr>\r\n <tr><td class=inp>Matakuliah</td><td class=ul>{$jdwl['MKKode']} - {$jdwl['Nama']} ({$jdwl['JenisJadwalID']})</td>\r\n <td class=inp>Dosen Utama</td><td class=ul>{$jdwl['DSN']}</td></tr>\r\n \r\n <tr><td class=ul colspan=4><font size=+1>Pindahkan ke Kelas:</td></tr>\r\n <tr><td class=inp>Kelas</td><td class=ul colspan=3><select name='Ke_Kelas' style='font-family: courier new'>{$optjdwl}</select></td></tr>\r\n <tr><td class=ul colspan=4><input type=submit name='Pindah' value='Pindahkan Mhsw'> \r\n Centang Mhsw yg akan dipindahkan kelas-nya \r\n <input type=button name='CentangAll' value='Centang Semua' onClick=\"CentangSemua(Korek, true);\">\r\n <input type=button name='UnCentangAll' value='Kosongkan Semua' onClick=\"CentangSemua(Korek, false);\">\r\n </td></tr>\r\n </table></p>"; }
function UbahPASav() { TuliskanCentangSemua(); $Tahun = $_REQUEST['thnsms']; $DariDosen = $_REQUEST['DariDosen']; $MenjadiDosen = $_REQUEST['MenjadiDosen']; $jmlawal = GetaField('mhsw', "PenasehatAkademik", $DariDosen, "count(PenasehatAkademik)") + 0; $btl = "<hr size=1 color=silver>Pilihan: <input type=button name='Kembali' value='Kembali' onClick=\"location='?mnux=dosen.pembimbing'\">"; if ($jmlawal == 0) { echo ErrorMsg("Gagal Proses", "Tidak ada mahasiswa di bawah bimbingan dosen dengan kode: <font size=+1>{$DariDosen}</font><br />\r\n Proses pengubahan pembimbing akademik dibatalkan.{$btl}"); } else { $drdsn = GetFields('dosen', 'Login', $DariDosen, "Nama, Gelar"); $kedsn = GetFields('dosen', 'Login', $MenjadiDosen, "Nama, Gelar"); if (empty($kedsn)) { echo ErrorMsg("Dosen Tidak Ditemukan", "Dosen dengan kode <font size=+1>{$MenjadiDosen}</font> tidak ditemukan.<br />\r\n Anda tidak dapat mengubah PA dari <font size=+1>{$drdsn['Nama']}, {$drdsn['Gelar']}</font> ({$DariDosen}) ke\r\n dosen yang tidak terdaftar dalam database.<br />\r\n Hubungi MIS/IT untuk informasi lebih lanjut.{$btl}"); } else { $s = "select m.MhswID, m.Nama, prd.Nama as PRD, prg.Nama as PRG\r\n from mhsw m\r\n left outer join khs k on k.MhswID = m.MhswID\r\n left outer join prodi prd on m.ProdiID=prd.ProdiID\r\n left outer join program prg on m.ProgramID=prg.ProgramID\r\n where \r\n m.StatusMhswID not in ('L', 'D', 'K')\r\n and m.NA='N' \r\n and PenasehatAkademik='{$DariDosen}'\r\n and k.TahunID = '{$Tahun}'\r\n order by m.MhswID"; $r = _query($s); $n = 0; $_npm = ''; //echo "<pre>$s</pre>"; $jmlawal = _num_rows($r); $fb = "<form action='?' method=post name=PAG>\r\n <input type=hidden name=mnux value=dosen.pembimbing>\r\n <input type=hidden name=gos value=UbahPASav1>\r\n <input type=hidden name=DariDosen value='{$DariDosen}'>\r\n <input type=hidden name=MenjadiDosen value='{$MenjadiDosen}'>\r\n <input type=hidden name=jmlawal value='{$jmlawal}'>"; $a = "<p><table class=box cellspacing=1><tr><td class=ul colspan=6>Centang Mhsw yg akan diganti PA-nya \r\n <input type=button name='CentangAll' value='Centang Semua' onClick=\"CentangSemua(PAG, true);\">\r\n <input type=button name='UnCentangAll' value='Kosongkan Semua' onClick=\"CentangSemua(PAG, false);\"></td></tr>"; $a .= "\r\n \r\n <tr><th class=ttl>#</th>\r\n <th class=ttl>NPM</th>\r\n <th class=ttl>Nama</th>\r\n <th class=ttl>Program</th>\r\n <th class=ttl>Program Studi</th>\r\n <th class=ttl>Centang</th>\r\n </tr>"; while ($w = _fetch_array($r)) { $n++; //$_npm .= "&_NPM[]=$w[MhswID]"; $a .= "<tr><td class=inp>{$n}</td>\r\n <td class=ul>{$w['MhswID']}</td>\r\n <td class=ul>{$w['Nama']}</td>\r\n <td class=ul>{$w['PRG']}</td>\r\n <td class=ul>{$w['PRD']}</td>\r\n <td class=ul align=center><input type=checkbox id='MhswID_{$n}' name='MhswID_{$n}' value='{$w['MhswID']}' checked></td>\r\n </tr>"; } $a .= "</table></p></form>"; echo $fb; echo Konfirmasi("Konfirmasi Pengubahan PA", "Anda akan mengubah Pembimbing Akademik mahasiswa dari <font size=+1>{$drdsn['Nama']}, {$drdsn['Gelar']}</font><br />\r\n menjadi <font size=+1>{$kedsn['Nama']}, {$kedsn['Gelar']}</font>?<br />\r\n Anda akan mengubah PA dari sebanyak: <font size=+1>{$jmlawal}</font> mahasiswa.<br />\r\n Di bawah adalah daftar mahasiswa yang akan diganti PA-nya.\r\n <hr size=1 color=silver>\r\n Pilihan: <input type=submit name='GantiPA' value='Ganti Penasehat Akademik'>\r\n <input type=button name='Batal' value='Batalkan Penggantian PA' onClick=\"location='?mnux=dosen.pembimbing'\">"); echo $a; } } }