function Proses()
{
$_max = 100;
$_praPrc = GetSetVar('_praPrc');
$_praCnt = GetSetVar('_praCnt');
$_dari = $_praPrc * $_max;
$s = "select m.MhswID, m.Nama\r\n from mhsw m\r\n where m.KodeID = '" . KodeID . "'\r\n and m.ProdiID = '{$_SESSION['ProdiID']}'\r\n and m.StatusMhswID = 'A'\r\n order by m.MhswID\r\n limit {$_dari}, {$_max}";
//die($s);
$r = _query($s);
$jml = _num_rows($r);
if ($jml > 0) {
while ($w = _fetch_array($r)) {
$_SESSION['_praCnt']++;
// Proses satu per satu
$MhswID = $w['MhswID'];
$Nama = $w['Nama'];
$oke = true;
$psn = '';
// Apakah ada SKS Minimalnya?
$oke = CheckSKSMin($MhswID, $psn);
// Apakah ada IP Minimalnya?
if ($oke) {
$oke = CheckIPMin($MhswID, $psn);
}
// Apakah ada MK Prasyaratnya?
if ($oke) {
$oke = CheckPrasyarat($MhswID, $psn);
}
echo <<<ESD
<script>
self.parent.Progresnya({$_SESSION['_praCnt']}, '{$MhswID}', '{$Nama}', '{$psn}');
</script>
ESD;
// Jika memenuhi syarat
if ($oke == true) {
$f = fopen("../" . $_SESSION['_praFile'] . ".txt", 'a');
fwrite($f, "{$MhswID}|{$Nama}|Oke\r\n");
fclose($f);
} else {
// Jika tidak memenuhi syarat
$f = fopen("../" . $_SESSION['_praFile'] . "_gagal.txt", 'a');
fwrite($f, "{$MhswID}|{$Nama}|{$psn}\r\n");
fclose($f);
}
}
// Nex Process
$_SESSION['_praPrc']++;
$time = 10;
echo <<<ESD
<script>
<!--
//window.setTimeout("location='{$_SESSION['mnux']}.proses.php?gos=Proses&_praPrc={$_praPrc}&_praCnt={$_SESSION['_praCnt']}'", {$time});
window.setTimeout("location='../{$_SESSION['mnux']}.proses.php'", {$time});
//-->
</script>
ESD;
} else {
echo "\r\n <script>\r\n self.parent.Selesai();\r\n </script>\r\n ";
}
}
function DftrMhswTA()
{
TampilkanFotoScript();
// setup where-statement
$whr_prodi = empty($_SESSION['FilterProdiID']) ? '' : "and m.ProdiID='{$_SESSION['FilterProdiID']}'";
$whr_nama = empty($_SESSION['FilterNamaMhsw']) ? '' : "and m.Nama like '{$_SESSION['FilterNamaMhsw']}%'";
$whr_nim = empty($_SESSION['FilterMhswID']) ? '' : "and m.MhswID like '{$_SESSION['FilterMhswID']}%'";
$whr_tahun = empty($_SESSION['TahunID']) ? '' : "and t.TahunID = '{$_SESSION['TahunID']}' ";
// Tampilkan
$tapage = GetSetVar('tapage', 1);
include_once "class/dwolister.class.php";
$lst = new dwolister();
$lst->maxrow = 10;
$lst->page = $_SESSION['tapage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux={$_SESSION['mnux']}&tapage==PAGE='>=PAGE=</a>";
$lst->tables = "ta t\r\n left outer join mhsw m on t.MhswID = m.MhswID and m.KodeID = '" . KodeID . "'\r\n left outer join dosen d on d.Login = t.Pembimbing and d.KodeID = '" . KodeID . "'\r\n left outer join dosen d1 on d1.Login = t.Penguji and d1.KodeID = '" . KodeID . "'\r\n left outer join prodi prd on prd.ProdiID = m.ProdiID\r\n where t.NA = 'N'\r\n {$whr_prodi}\r\n {$whr_nama}\r\n {$whr_nim}\r\n {$whr_tahun}\r\n ";
$lst->fields = "t.*, m.Nama as NamaMhsw,\r\n date_format(TglMulai, '%d-%m-%Y') as _TglMulai,\r\n date_format(TglSelesai, '%d-%m-%Y') as _TglSelesai,\r\n date_format(TglUjian, '%d-%m-%Y') as _TglUjian,\r\n m.PenasehatAkademik, \r\n d.Nama as NamaDosen, d.Gelar,\r\n d1.Nama as NamaPenguji, d1.Gelar as GelarPenguji,\r\n \r\n replace((select group_concat(concat('› ', td_d.Nama, ' <sup>', td_d.Gelar, '</sup>')) \r\n from tadosen td\r\n left outer join dosen td_d on td_d.Login = td.DosenID and td_d.KodeID = '" . KodeID . "' \r\n where td.TAID = t.TAID\r\n and td.Tipe=0), ',', '<br />') as _DP,\r\n \r\n\t(select count(tb.TAID) from tabimbingan tb where tb.TAID = t.TAID) as Bimbingan,\r\n\t\r\n replace((select group_concat(concat('› ', td_d.Nama, ' <sup>', td_d.Gelar, '</sup>')) \r\n from tadosen td\r\n left outer join dosen td_d on td_d.Login = td.DosenID and td_d.KodeID = '" . KodeID . "' \r\n where td.TAID = t.TAID\r\n and td.Tipe=1), ',', '<br />') as _DU\r\n ";
$lst->headerfmt = "<table class=box cellspacing=1 cellpadding=4 width=940>\r\n <tr><th class=ttl width=10>Edit</th>\r\n <th class=ttl width=80>NPM</th>\r\n <th class=ttl>Nama</th>\r\n <th class=ttl>Judul</th>\r\n <th class=ttl width=70>Tgl Mulai<hr size=1 color=white />Selesai</th>\r\n <th class=ttl width=180>Pembimbing</th>\r\n <th class=ttl width=70>Bimbingan</th>\r\n\t\t<th class=ttl width=180>Ujian Akhir<hr size=1 color=white />Penguji</th>\r\n <th class=ttl width=10>Lulus</th>\r\n </tr>";
$lst->footerfmt = "</table></p>";
$lst->detailfmt = "<tr>\r\n <td class=cna=Lulus= align=center>\r\n <a href='#' onClick=\"javascript:TAEdit(0,=TAID=)\"><img src='img/edit.png' title='Edit Data TA' /></a>\r\n </td>\r\n <td class=cna=Lulus= align=center>\r\n =MhswID=\r\n <hr size=1 color=silver />\r\n <sup>=TahunID=</sup>\r\n </td>\r\n <td class=cna=Lulus=>=NamaMhsw=</td>\r\n <td class=cna=Lulus=>=Judul=</td>\r\n <td class=cna=Lulus= align=center>\r\n <sup>=_TglMulai=\r\n <hr size=1 color=silver />\r\n =_TglSelesai=</sup>\r\n </td>\r\n\t<td class=cna=Lulus=>\r\n • =NamaDosen= <sup>=Gelar=</sup><br />\r\n =_DP=\r\n <div align=right>\r\n <a href='#' onClick=\"javscript:EditPembimbing(=TAID=)\" title='Edit Dosen Pembimbing'><img src='img/edit.png' /></a>\r\n </div>\r\n </td>\r\n <td class=cna=Lulus= align=center>\r\n\t =Bimbingan=×\r\n\t <div align=right>\r\n <a href='#' onClick=\"javscript:EditBimbingan(=TAID=)\" title='Edit Bimbingan'><img src='img/edit.png' /></a>\r\n\t </td>\r\n <td class=cna=Lulus= align=center>\r\n <sup>=_TglUjian=</sup>\r\n <hr size=1 color=silver />\r\n <div align=left>\r\n • =NamaPenguji= <sup>=GelarPenguji=</sup><br />\r\n =_DU=\r\n </div>\r\n <div align=right>\r\n <a href='#' onClick=\"javascript:TAUjian(=TAID=)\" title='Edit Dosen Penguji'><img src='img/edit.png' /></a>\r\n </div>\r\n </td>\r\n <td class=cna=Lulus= align=center>\r\n <a href='#' onClick=\"javascript:fnKelulusan(=TAID=)\"><img src='img/=Lulus=.gif' /></a>\r\n </td>\r\n </tr>\r\n <tr><td bgcolor=silver colspan=9 height=1></td></tr>";
echo $lst->TampilkanData();
echo $ttl;
echo "<p>Hal.: " . $lst->TampilkanHalaman() . "<br />" . "Total: " . number_format($lst->MaxRowCount) . "</p>";
}
function DftrTahun()
{
$_maxbaris = 10;
$fmtTgl = '%d-%m-%Y';
TahunEditScript();
include_once "class/dwolister.class.php";
$page = GetSetVar('page', 1);
$pagefmt = "<a href='?mnux={$_SESSION['mnux']}&gos=&page==PAGE='>=PAGE=</a>";
$pageoff = "<b>=PAGE=</b>";
$brs = "<hr size=1 color=silver />";
$gantibrs = "<tr><td bgcolor=silver height=1 colspan=11></td></tr>";
$lst = new dwolister();
$lst->tables = "tahun t\r\n where t.KodeID = '" . KodeID . "'\r\n and t.ProdiID = '{$_SESSION['prodi']}'\r\n and t.ProgramID = '{$_SESSION['prid']}'\r\n order by t.TahunID desc";
$lst->fields = "t.TahunID, t.Nama, t.ProgramID, t.ProdiID, \r\n t.SP,t.NA,\r\n date_format(t.TglKuliahMulai, '{$fmtTgl}') as _KuliahMulai,\r\n date_format(t.TglKuliahSelesai, '{$fmtTgl}') as _KuliahSelesai,\r\n date_format(t.TglKRSMulai, '{$fmtTgl}') as _KRSMulai,\r\n date_format(t.TglKRSSelesai, '{$fmtTgl}') as _KRSSelesai,\r\n\tdate_format(t.TglBayarMulai, '{$fmtTgl}') as _BayarMulai,\r\n date_format(t.TglBayarSelesai, '{$fmtTgl}') as _BayarSelesai,\r\n date_format(t.TglUTSMulai, '{$fmtTgl}') as _UTSMulai,\r\n date_format(t.TglUTSSelesai, '{$fmtTgl}') as _UTSSelesai,\r\n date_format(t.TglUASMulai, '{$fmtTgl}') as _UASMulai,\r\n date_format(t.TglUASSelesai, '{$fmtTgl}') as _UASSelesai,\r\n date_format(t.TglNilai, '{$fmtTgl}') as _TglNilai,\r\n t.Catatan, t.ProsesBuka\r\n ";
$lst->page = $_SESSION['page'] + 0;
$lst->maxrow = $_maxbaris;
$lst->pages = $pagefmt;
$lst->pageactive = $pageoff;
$lst->headerfmt = "<p><table class=box cellspacing=1 align=center width=940>\r\n <tr>\r\n <td class=ul1 colspan=9>\r\n <input type=button name='BuatTahun' value='Buat Tahun Baru' onClick=\"javascript:TahunEdit('', '{$_SESSION['prodi']}', '{$_SESSION['prid']}', 1)\" />\r\n <input type=button name='BuatTahunCopy' value='Copy Dari Prodi Lain' onClick=\"javascript:TahunEditCopy('', '{$_SESSION['prodi']}', '{$_SESSION['prid']}', 1)\" />\r\n <input type=button name='Refresh' value='Refresh' onClick=\"location='?mnux={$_SESSION['mnux']}&gos='\" />\r\n </td>\r\n </tr>\r\n <tr>\r\n <th class=ttl colspan=3>Kode</th>\r\n <th class=ttl>Nama Tahun</th>\r\n <th class=ttl>Perkuliahan</th>\r\n\t <th class=ttl>KRS</th>\r\n <th class=ttl>Pembayaran</th>\r\n <th class=ttl>UTS</th>\r\n <th class=ttl>UAS</th>\r\n <th class=ttl>Penilaian</th>\r\n <th class=ttl>SP</th>\r\n\t <th class=ttl>NA</th>\r\n </tr>";
$lst->detailfmt = "<tr>\r\n <td class=ul1 width=5>\r\n <a href='#' onClick=\"javascript:TahunCetak('=TahunID=', '=ProdiID=', '=ProgramID=')\"><img src='img/printer2.gif' width=12 /></a>\r\n </td>\r\n\t<td class=ul1 width=40 align=center><font color=green><b>=TahunID=</b><font></td>\r\n <td class=ul1 width=5>\r\n <a href='#' onClick=\"javascript:TahunEdit('=TahunID=', '=ProdiID=', '=ProgramID=', 0)\"><img src='img/edit.png' /></a>\r\n </td>\r\n <td class=ul1>\r\n <b>=Nama=</b>\r\n\t <div align=right><sub>=Catatan=<sub></div>\r\n </td>\r\n <td class=cna=NA= align=center width=80>\r\n =_KuliahMulai=\r\n <hr size=1 color=silver />\r\n =_KuliahSelesai=\r\n </td>\r\n <td class=cna=NA= align=center width=80>\r\n =_KRSMulai=\r\n <hr size=1 color=silver />\r\n =_KRSSelesai=\r\n </td>\r\n\t<td class=cna=NA= align=center width=80>\r\n =_BayarMulai=\r\n <hr size=1 color=silver />\r\n =_BayarSelesai=\r\n </td>\r\n <td class=cna=NA= align=center width=80>\r\n =_UTSMulai=\r\n <hr size=1 color=silver />\r\n =_UTSSelesai=\r\n </td>\r\n <td class=cna=NA= align=center width=80>\r\n =_UASMulai=\r\n <hr size=1 color=silver />\r\n =_UASSelesai=\r\n </td>\r\n <td class=cna=NA= align=center width=80>=_TglNilai=</td>\r\n <td class=cna=NA= width=5>=SP=</td>\r\n\t<td class=ul1 width=5><img src='img/book=NA=.gif' /></td>\r\n </tr>" . $gantibrs;
$lst->footerfmt = "</table>";
$hal = $lst->TampilkanHalaman();
$ttl = $lst->MaxRowCount;
echo $lst->TampilkanData();
echo "<p align=center>Hal: {$hal} <br />(Tot: {$ttl})</p>";
}
function DftrMhswPraktek()
{
TampilkanFotoScript();
// setup where-statement
$whr_prodi = empty($_SESSION['FilterProdiID']) ? '' : "and m.ProdiID='{$_SESSION['FilterProdiID']}'";
$whr_nama = empty($_SESSION['FilterNamaMhsw']) ? '' : "and m.Nama like '{$_SESSION['FilterNamaMhsw']}%'";
$whr_nim = empty($_SESSION['FilterMhswID']) ? '' : "and m.MhswID like '{$_SESSION['FilterMhswID']}%'";
$whr_tahun = empty($_SESSION['TahunID']) ? '' : "and p.TahunID = '{$_SESSION['TahunID']}' ";
// Tampilkan
$tapage = GetSetVar('praktekpage', 1);
include_once "class/dwolister.class.php";
$lst = new dwolister();
$lst->maxrow = 10;
$lst->page = $_SESSION['praktekpage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux={$_SESSION['mnux']}&praktekpage==PAGE='>=PAGE=</a>";
$lst->tables = "praktekkerja p\n left outer join mhsw m on p.MhswID = m.MhswID and m.KodeID = '" . KodeID . "'\n left outer join dosen d on d.Login = p.Pembimbing and d.KodeID = '" . KodeID . "'\n left outer join prodi prd on prd.ProdiID = m.ProdiID\n where p.NA = 'N'\n {$whr_prodi}\n {$whr_nama}\n {$whr_nim}\n {$whr_tahun}\n ";
$lst->fields = "p.*, m.Nama as NamaMhsw,\n date_format(p.TglMulai, '%d-%m-%Y') as _TglMulai,\n date_format(p.TglSelesai, '%d-%m-%Y') as _TglSelesai,\n m.PenasehatAkademik, \n d.Nama as NamaDosen, d.Gelar\n ";
$lst->headerfmt = "<table class=box cellspacing=1 cellpadding=4 width=940>\n <tr><th class=ttl width=10>Edit</th>\n <th class=ttl width=80>NIM</th>\n <th class=ttl>Nama</th>\n <th class=ttl>Profil Perusahaan</th>\n <th class=ttl width=70>Tgl Mulai<hr size=1 color=white />Selesai</th>\n <th class=ttl width=180>Pembimbing</th>\n <th class=ttl width=10>Lulus</th>\n </tr>";
$lst->footerfmt = "</table></p>";
$lst->detailfmt = "<tr>\n <td class=cna=Lulus= align=center>\n <a href='#' onClick=\"javascript:PraktekEdit(0,=PraktekKerjaID=)\"><img src='img/edit.png' title='Edit Data Praktek Kerja' /></a>\n </td>\n <td class=cna=Lulus= align=center>\n =MhswID=\n <hr size=1 color=silver />\n <sup>=TahunID=</sup>\n </td>\n <td class=cna=Lulus=>=NamaMhsw=</td>\n <td class=cna=Lulus=>=NamaPerusahaan=<sup>=TeleponPerusahaan=</sup>\n\t <br>\n\t <font size=1 color=teal>=AlamatPerusahaan= \n\t =KotaPerusahaan=</font>\n\t </td>\n <td class=cna=Lulus= align=center>\n <sup>=_TglMulai=\n <hr size=1 color=silver />\n =_TglSelesai=</sup>\n </td>\n\t<td class=cna=Lulus=>\n • =NamaDosen= <sup>=Gelar=</sup>\n </td>\n <td class=cna=Lulus= align=center>\n <a href='#' onClick=\"javascript:fnKelulusan(=PraktekKerjaID=)\"><img src='img/=Lulus=.gif' /></a>\n </td>\n </tr>\n <tr><td bgcolor=silver colspan=9 height=1></td></tr>";
echo $lst->TampilkanData();
echo $ttl;
echo "<p>Hal.: " . $lst->TampilkanHalaman() . "<br />" . "Total: " . number_format($lst->MaxRowCount) . "</p>";
}
function Sek()
{
$NamaSekolah = GetSetVar('NamaSekolah');
$KotaSekolah = GetSetVar('KotaSekolah');
include_once "pmbsetup.sek.php";
$sub = !empty($_REQUEST['sub']) ? $_REQUEST['sub'] : 'DftrSek';
$sub();
}
function CetakNilai($jid, $p)
{
$JadwalID = GetSetVar('JadwalID');
$jdwl = GetFields("jadwal j\r\n left outer join dosen d on d.Login = j.DosenID and d.KodeID = '" . KodeID . "'\r\n left outer join prodi prd on prd.ProdiID = j.ProdiID and prd.KodeID = '" . KodeID . "'\r\n left outer join program prg on prg.ProgramID = j.ProgramID and prg.KodeID = '" . KodeID . "'\r\n left outer join mk mk on mk.MKID = j.MKID\r\n left outer join hari huas on huas.HariID = date_format(j.UASTanggal, '%w') \r\n\tLEFT OUTER JOIN kelas k ON k.KelasID = j.NamaKelas\r\n ", "j.JadwalID", $JadwalID, "j.*, concat(d.Nama, ', ', d.Gelar) as DSN, d.NIDN,\r\n prd.Nama as _PRD, prg.Nama as _PRG,\r\n mk.Sesi,\r\n date_format(j.UASTanggal, '%d-%m-%Y') as _UASTanggal,\r\n date_format(j.UASTanggal, '%w') as _UASHari,\r\n huas.Nama as HRUAS,\r\n LEFT(j.UASJamMulai, 5) as _UASJamMulai, LEFT(j.UASJamSelesai, 5) as _UASJamSelesai, k.Nama AS namaKelas\r\n ");
$TahunID = $jdwl['TahunID'];
$thn = GetFields('tahun', "KodeID = '" . KodeID . "' and ProdiID = '{$jdwl['ProdiID']}' and ProgramID = '{$jdwl['ProgramID']}' and TahunID", $TahunID, "*");
// Buat Header
BuatHeader($jdwl, $thn, $p);
BuatIsinya($jdwl, $p);
BuatFooter($jdwl, $p);
}
function DaftarMhsw($mnux, $lnk = '', $keluar = 0)
{
include_once "class/xthlister.class.php";
$inqMhswPage = GetSetVar('inqMhswPage');
$arrKey = array('NIM' => 'MhswID', 'Nama' => 'Nama', 'Semua' => '');
// filter
$whr = array();
if (!empty($arrKey[$_SESSION['crmhswkey']]) && !empty($_SESSION['crmhswval'])) {
$whr[] = "m." . $arrKey[$_SESSION['crmhswkey']] . " like '%" . $_SESSION['crmhswval'] . "%' ";
}
if ($keluar > 0) {
$whr[] = "sm.Keluar <> 1";
}
if ($_SESSION['_LevelID'] > 1) {
if (empty($_SESSION['_LevelID'])) {
die(ErrorMsg("Tidak Dapat Akses", "Anda tidak memiliki hak akses ke data Mahasiswa."));
}
$_ProdiID = trim($_SESSION['_ProdiID'], ',');
$arrProdi = explode(',', $_ProdiID);
$_prodi = '';
for ($i = 0; $i < sizeof($arrProdi); $i++) {
$_prodi .= ",'" . $arrProdi[$i] . "'";
}
$_prodi = trim($_prodi, ',');
$_prodi = empty($arrProdi) ? '-1' : $_prodi;
//implode(', ', $arrProdi);
if ($_SESSION['_LevelID'] == 100) {
} else {
$whr[] = "m.ProdiID in ({$_prodi})";
}
}
// Satukan filter
$_whr = implode(' and ', $whr);
$_whr = empty($_whr) ? '' : "where {$_whr}";
// Tampilkan daftar
$lst = new xthlister();
$lst->page = $_SESSION['inqMhswPage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux={$lnk}&inqMhswPage==PAGE='>=PAGE=</a>";
$lst->tables = "mhsw m\n left outer join program prg on m.ProgramID=prg.ProgramID\n left outer join prodi prd on m.ProdiID=prd.ProdiID\n left outer join statusmhsw sm on m.StatusMhswID=sm.StatusMhswID\n {$_whr}\n order by m.MhswID";
$lst->fields = "m.MhswID, m.Nama, m.ProgramID, m.ProdiID, m.SKKeluar, m.Foto,\n prg.Nama as PRG, prd.Nama as PRD, sm.Nama as SM, sm.Keluar";
$lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4>\n <tr><th class=ttl>#</th>\n <th class=ttl>No Mhsw</th>\n <th class=ttl>Nama Mhsw</th>\n <th class=ttl>Program</th>\n <th class=ttl>Program Studi</th>\n <th class=ttl>Status</th>\n <th class=ttl>SK Lulus/Keluar</th>\n </tr>";
$lst->footerfmt = "</table></p>";
$lst->detailfmt = "<tr><td class=inp1>=NOMER=</td>\n <td bgcolor='#9BBB59' class=cna=Keluar=><a href='?mnux={$mnux}&mhswid==MhswID=&{$lnk}'><img src='img/edit.png'>\n =MhswID=</a></td>\n <td bgcolor='#8DB3E2' class=cna=Keluar=><a id='=MhswID=' class='jTip' name=' Foto Mahasiswa' href='foto.pop.php?width=156&mhswid==MhswID=&foto==Foto='>=Nama=</a></td>\n <td bgcolor='#E5B8B7' class=cna=Keluar=>=ProgramID=-=PRG=</td>\n <td bgcolor='#B2A1C7' class=cna=Keluar=>=ProdiID=-=PRD=</td>\n <td bgcolor='#FABF8F' class=cna=Keluar=>=SM=</td>\n <td bgcolor='#BFBFBF' class=cna=Keluar=>=SKKeluar= </td>\n </tr>";
echo $lst->TampilkanData();
echo "Halaman : " . $lst->TampilkanHalaman();
}
function DaftarMhsw($mnux, $lnk = '', $keluar = 0)
{
include_once "class/xthlister.class.b.php";
$inqMhswPage = GetSetVar('inqMhswPage');
$arrKey = array('NIM' => 'MhswID', 'Nama' => 'Nama', 'Semua' => '');
// filter
$whr = array();
if (!empty($arrKey[$_SESSION['crmhswkey']]) && !empty($_SESSION['crmhswval'])) {
$whr[] = "m." . $arrKey[$_SESSION['crmhswkey']] . " like '%" . $_SESSION['crmhswval'] . "%' ";
}
if ($keluar > 0) {
$whr[] = "sm.Keluar <> 1";
}
if ($_SESSION['_LevelID'] > 1) {
if (empty($_SESSION['_LevelID'])) {
die(ErrorMsg("Tidak Dapat Akses", "Anda tidak memiliki hak akses ke data Mahasiswa."));
}
$_ProdiID = trim($_SESSION['_ProdiID'], ',');
$arrProdi = explode(',', $_ProdiID);
$_prodi = '';
for ($i = 0; $i < sizeof($arrProdi); $i++) {
$_prodi .= ",'" . $arrProdi[$i] . "'";
}
$_prodi = trim($_prodi, ',');
$_prodi = empty($arrProdi) ? '-1' : $_prodi;
//implode(', ', $arrProdi);
if ($_SESSION['LevelID'] == 100) {
} else {
$whr[] = "m.ProdiID in ({$_prodi})";
}
}
// Satukan filter
$_whr = implode(' and ', $whr);
$_whr = empty($_whr) ? '' : "where {$_whr}";
// Tampilkan daftar
$lst = new xthlister();
$lst->page = $_SESSION['inqMhswPage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux={$lnk}&inqMhswPage==PAGE='>=PAGE=</a>";
$lst->tables = "mhsw m\n left outer join program prg on m.ProgramID=prg.ProgramID\n left outer join prodi prd on m.ProdiID=prd.ProdiID\n left outer join statusmhsw sm on m.StatusMhswID=sm.StatusMhswID\n {$_whr}\n order by m.MhswID";
$lst->fields = "m.MhswID, m.Nama, m.ProgramID, m.ProdiID, m.SKKeluar, m.Foto,\n prg.Nama as PRG, prd.Nama as PRD, sm.Nama as SM, sm.Keluar";
$lst->detailfmt = "\n <tr>\n <td class=inp1>=NOMER=</td>\n </tr>";
echo $lst->TampilkanData();
echo $lst->TampilkanHalaman();
}
function EdtSet()
{
global $mnux, $pref, $arrID;
$prodi = $_SESSION['prodi'];
$mkkode = $_SESSION['mkkode_' . $prodi];
$kurid = $_SESSION['kurid_' . $prodi];
$kuriset = GetSetVar('kuriset');
//$mk = GetFields('mk', "KurikulumID='$kurid' and MKKode", $mkkode, '*');
$mk = GetFields("mk mk left outer join prodi prd on mk.ProdiID=prd.ProdiID\r\n left outer join kurikulum kur on mk.KurikulumID=kur.KurikulumID\r\n left outer join dosen d on mk.Penanggungjawab=d.Login", "mk.KurikulumID='{$kurid}' and mk.MKKode", $mkkode, "mk.*, kur.Nama as KUR, prd.Nama as PRD, concat(d.Nama, ', ', d.Gelar) as PJ");
/*
$optkurikulum = GetOption2('kurikulum', "concat(KurikulumKode, ' - ', Nama)", 'KurikulumID', $_SESSION['kurid_'], "ProdiID='$_SESSION[prodi]'", 'KurikulumID');
$optmk = GetOption2('mk', "concat(MKKode, ' - ', Nama)", 'MKKode', '',
"MKKode<>'$mkkode' and KurikulumID=".$_SESSION['kurid_'.$_SESSION['prodi']], 'MKKode');
*/
$optkuri = GetOption2('kurikulum', "concat(KurikulumKode, ' - ', Nama)", 'KurikulumID', $_SESSION['kuriset'], "ProdiID='{$prodi}' and KodeID='" . KodeID . "'", 'KurikulumID');
$optmk = GetOption2('mk', "concat(MKKode, ' - ', Nama)", 'MKKode', '', "MKKode<>'{$mkkode}' and KurikulumID='" . $kuriset . "'", 'MKKode');
// Headernya
TampilkanHeaderMatakuliah($mk);
$setara = GetMKSetara($mk['MKSetara'], $mkkode);
echo "<p><table class=box cellspacing=1 cellpadding=4>\r\n <tr><td class=ul colspan=5><b>Matakuliah Setara</td></tr>\r\n <form action='?' method=POST>\r\n <input type=hidden name='mnux' value='{$mnux}'>\r\n <input type=hidden name='mkkode_{$prodi}' value='{$mkkode}'>\r\n <input type=hidden name='{$pref}' value='{$_SESSION[$pref]}'>\r\n <input type=hidden name='sub' value='EdtSetSav'>\r\n <input type=hidden name='BypassMenu' value='1' />\r\n \r\n <tr><td class=inp colspan=2>Kurikulum:</td>\r\n <td class=ul colspan=3><select name='kuriset' onChange=\"window.location='?mnux={$mnux}&{$pref}={$_SESSION[$pref]}&mkkode_{$_SESSION['prodi']}={$mkkode}&sub=EdtSet&kuriset='+this.value\">{$optkuri}</select>\r\n <tr><td class=inp colspan=2>Tambahkan:</td>\r\n <td class=ul colspan=3><select name='mkkode_add'>{$optmk}</select>\r\n <input type=submit name='Tambahkan' value='Tambahkan'></td></tr>\r\n </form>\r\n {$setara}\r\n </table></p>";
}
function DaftarMhsw($mnux, $lnk = '', $keluar = 0)
{
include_once "class/xthlister.class.php";
$dataMhswPage = GetSetVar('dataMhswPage');
$arrKey = array('NIM' => 'MhswID');
// filter
$whr = array();
if (!empty($arrKey[$_SESSION['crmhswkeyx']]) && !empty($_SESSION['crmhswvalx'])) {
$whr[] = "m." . $arrKey[$_SESSION['crmhswkeyx']] . " like '%" . $_SESSION['crmhswvalx'] . "%' ";
}
if ($_SESSION['_LevelID'] > 1) {
if (empty($_SESSION['_LevelID'])) {
die(ErrorMsg("Tidak Dapat Akses", "Anda tidak memiliki hak akses ke data Mahasiswa."));
}
$_ProdiID = trim($_SESSION['_ProdiID'], ',');
$arrProdi = explode(',', $_ProdiID);
$_prodi = '';
for ($i = 0; $i < sizeof($arrProdi); $i++) {
$_prodi .= ",'" . $arrProdi[$i] . "'";
}
$_prodi = trim($_prodi, ',');
$_prodi = empty($arrProdi) ? '-1' : $_prodi;
//implode(', ', $arrProdi);
if ($_SESSION['LevelID'] == 7) {
} else {
$whr[] = "m.ProdiID in ({$_prodi})";
}
}
// Satukan filter
$_whr = implode(' and ', $whr);
$_whr = empty($_whr) ? '' : "where {$_whr}";
// Tampilkan daftar
$lst = new xthlister();
$lst->tables = "mhsw m\n left outer join program prg on m.ProgramID=prg.ProgramID\n left outer join prodi prd on m.ProdiID=prd.ProdiID\n left outer join statusmhsw sm on m.StatusMhswID=sm.StatusMhswID\n {$_whr}\n order by m.MhswID";
$lst->fields = "m.MhswID,\n prg.Nama as PRG, prd.Nama as PRD, sm.Nama as SM, sm.Keluar";
$lst->headerfmt = "<p>\n <table class=box cellspacing=1 cellpadding=4>\n <tr bgcolor='#9BBB59'>\n <th rowspan='2' nowrap='true' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Tahun Akade-mik</span></strong></th>\n <th rowspan='2' nowrap='true' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Daya Tampung</span></strong></th>\n <th colspan='2' nowrap='true' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Jumlah Calon<br>Mahasiswa Reguler </span></strong></th>\n <th colspan='2' nowrap='true' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Jumlah<br>Mahasiswa Baru</span></strong></th>\n <th colspan='2' nowrap='true' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Jumlah<br>Total Mahasiswa</span></strong></th>\n <th colspan='2' nowrap='true' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Jumlah Lulusan</span></strong></th>\n <th colspan='3' nowrap='true' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>IPK<br>Lulusan Reguler</span></strong></th>\n <th colspan='3' nowrap='true' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Persentase<br>Lulusan Reguler<br>dengan IPK :</span></strong></th>\n </tr>\n <tr>\n <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Ikut Seleksi</span></strong></td>\n <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Lulus Seleksi</span></strong></td>\n <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Reguler</span></strong></td>\n <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Transfer</span></strong></td>\n <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Reguler</span></strong></td>\n <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Transfer</span></strong></td>\n <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Reguler </span></strong></td>\n <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Transfer</span></strong></td>\n <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Min</span></strong></td>\n <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Rat</span></strong></td>\n <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Mak</span></strong></td>\n <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>< 2,75</span></strong></td>\n <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>2,75-3,50</span></strong></td>\n <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>> 3,50</span></strong></td>\n </tr>\n <tr bgcolor='#9BBB59'>\n <td class='cna'>(1)</td>\n <td class='cna'>(2)</td>\n <td class='cna'>(3)</td>\n <td class='cna'>(4)</td>\n <td class='cna'>(5)</td>\n <td class='cna'>(6)</td>\n <td class='cna'>(7)</td>\n <td class='cna'>(8)</td>\n <td class='cna'>(9)</td>\n <td class='cna'>(10)</td>\n <td class='cna'>(11)</td>\n <td class='cna'>(12)</td>\n <td class='cna'>(13)</td>\n <td class='cna'>(14)</td>\n <td class='cna'>(15)</td>\n <td class='cna'>(16)</td>\n </tr>\n <tr>\n <td bgcolor='#9BBB59' class='cna'>TS-4</td>\n <td bgcolor='#DDD9C3' class='cna'>\n\t \n\t \n\t </td>\n <td bgcolor='#8DB3E2' class='cna'> </td>\n <td bgcolor='#8DB3E2' class='cna'> </td>\n <td bgcolor='#E5B8B7' class='cna'> </td>\n <td bgcolor='#E5B8B7' class='cna'> </td>\n <td bgcolor='#D6E3BC' class='cna'> </td>\n <td bgcolor='#D6E3BC' class='cna'> </td>\n <td bgcolor='#B2A1C7' class='cna'> </td>\n <td bgcolor='#B2A1C7' class='cna'> </td>\n <td bgcolor='#FABF8F' class='cna'> </td>\n <td bgcolor='#FABF8F' class='cna'> </td>\n <td bgcolor='#FABF8F' class='cna'> </td>\n <td bgcolor='#BFBFBF' class='cna'> </td>\n <td bgcolor='#BFBFBF' class='cna'> </td>\n <td bgcolor='#BFBFBF' class='cna'> </td>\n </tr>\n <tr>\n <td bgcolor='#9BBB59' class='cna'>TS-3</td>\n <td bgcolor='#DDD9C3' class='cna'> </td>\n <td bgcolor='#8DB3E2' class='cna'> </td>\n <td bgcolor='#8DB3E2' class='cna'> </td>\n <td bgcolor='#E5B8B7' class='cna'></td>\n <td bgcolor='#E5B8B7' class='cna'> </td>\n <td bgcolor='#D6E3BC' class='cna'> </td>\n <td bgcolor='#D6E3BC' class='cna'> </td>\n <td bgcolor='#B2A1C7' class='cna'> </td>\n <td bgcolor='#B2A1C7' class='cna'> </td>\n <td bgcolor='#FABF8F' class='cna'> </td>\n <td bgcolor='#FABF8F' class='cna'> </td>\n <td bgcolor='#FABF8F' class='cna'> </td>\n <td bgcolor='#BFBFBF' class='cna'> </td>\n <td bgcolor='#BFBFBF' class='cna'> </td>\n <td bgcolor='#BFBFBF' class='cna'> </td>\n </tr>\n <tr>\n <td bgcolor='#9BBB59' class='cna'>TS-2</td>\n <td bgcolor='#DDD9C3' class='cna'> </td>\n <td bgcolor='#8DB3E2' class='cna'> </td>\n <td bgcolor='#8DB3E2' class='cna'> </td>\n <td bgcolor='#E5B8B7' class='cna'></td>\n <td bgcolor='#E5B8B7' class='cna'> </td>\n <td bgcolor='#D6E3BC' class='cna'> </td>\n <td bgcolor='#D6E3BC' class='cna'> </td>\n <td bgcolor='#B2A1C7' class='cna'> </td>\n <td bgcolor='#B2A1C7' class='cna'> </td>\n <td bgcolor='#FABF8F' class='cna'> </td>\n <td bgcolor='#FABF8F' class='cna'> </td>\n <td bgcolor='#FABF8F' class='cna'> </td>\n <td bgcolor='#BFBFBF' class='cna'> </td>\n <td bgcolor='#BFBFBF' class='cna'> </td>\n <td bgcolor='#BFBFBF' class='cna'> </td>\n </tr>\n <tr>\n <td bgcolor='#9BBB59' class='cna'>TS-1</td>\n <td bgcolor='#DDD9C3' class='cna'> </td>\n <td bgcolor='#8DB3E2' class='cna'> </td>\n <td bgcolor='#8DB3E2' class='cna'> </td>\n <td bgcolor='#E5B8B7' class='cna'></td>\n <td bgcolor='#E5B8B7' class='cna'> </td>\n <td bgcolor='#D6E3BC' class='cna'> </td>\n <td bgcolor='#D6E3BC' class='cna'> </td>\n <td bgcolor='#B2A1C7' class='cna'> </td>\n <td bgcolor='#B2A1C7' class='cna'> </td>\n <td bgcolor='#FABF8F' class='cna'> </td>\n <td bgcolor='#FABF8F' class='cna'> </td>\n <td bgcolor='#FABF8F' class='cna'> </td>\n <td bgcolor='#BFBFBF' class='cna'> </td>\n <td bgcolor='#BFBFBF' class='cna'> </td>\n <td bgcolor='#BFBFBF' class='cna'> </td>\n </tr>\n <tr>\n <td bgcolor='#9BBB59' class='cna'>TS</td>\n <td bgcolor='#DDD9C3' class='cna'><countif></td>\n <td bgcolor='#8DB3E2' class='cna'> </td>\n <td bgcolor='#8DB3E2' class='cna'> </td>\n <td bgcolor='#E5B8B7' class='cna'></td>\n <td bgcolor='#E5B8B7' class='cna'> </td>\n <td bgcolor='#D6E3BC' class='cna'> </td>\n <td bgcolor='#D6E3BC' class='cna'> </td>\n <td bgcolor='#B2A1C7' class='cna'> </td>\n <td bgcolor='#B2A1C7' class='cna'> </td>\n <td bgcolor='#FABF8F' class='cna'> </td>\n <td bgcolor='#FABF8F' class='cna'> </td>\n <td bgcolor='#FABF8F' class='cna'> </td>\n <td bgcolor='#BFBFBF' class='cna'> </td>\n <td bgcolor='#BFBFBF' class='cna'> </td>\n <td bgcolor='#BFBFBF' class='cna'> </td>\n </tr>\n <tr>\n <td bgcolor='#9BBB59' class='cna'>Jumlah</td>\n <td bgcolor='#9BBB59' class='cna'> </td>\n <td bgcolor='#9BBB59' class='cna'> </td>\n <td bgcolor='#9BBB59' class='cna'> </td>\n <td bgcolor='#9BBB59' class='cna'></td>\n <td bgcolor='#9BBB59' class='cna'> </td>\n <td bgcolor='#9BBB59' class='cna'> </td>\n <td bgcolor='#9BBB59' class='cna'> </td>\n <td bgcolor='#9BBB59' class='cna'> </td>\n <td bgcolor='#9BBB59' class='cna'> </td>\n <td bgcolor='#9BBB59' class='cna'> </td>\n <td bgcolor='#9BBB59' class='cna'> </td>\n <td bgcolor='#9BBB59' class='cna'> </td>\n <td bgcolor='#9BBB59' class='cna'> </td>\n <td bgcolor='#9BBB59' class='cna'> </td>\n <td bgcolor='#9BBB59' class='cna'> </td>\n </tr>";
$lst->footerfmt = "</table></p>";
echo $lst->TampilkanData();
echo "Halaman : " . $lst->TampilkanHalaman();
}
function DftrPT()
{
$CariPerguruanTinggi = GetSetVar('CariPerguruanTinggi', 'Nama Perguruan Tinggi');
$arrCariPerguruanTinggi = array('Nama Perguruan Tinggi' => 'Nama', 'Kode Perguruan Tinggi' => 'PerguruanTinggiID');
echo "<table class=box cellspacing=1 cellpadding=4>\r\n <form action='index.php' method=GET>\r\n <input type=hidden name='mnux' value='{$_SESSION['mnux']}'>\r\n <input type=hidden name='gos' value=''>\r\n <input type=hidden name='md' value='{$md}'>\r\n <input type=hidden name='SRPT' value='{$_REQUEST['SRPT']}'>\r\n <tr><td class=inp>Cari Perguruan Tinggi:</td><td class=ul colspan=2><input type=text name='NamaPerguruanTinggi' value='{$_SESSION['NamaPerguruanTinggi']}' size=20 maxlength=20>\r\n <input type=submit name='CariPerguruanTinggi' value='Nama Perguruan Tinggi'> <input type=submit name='CariPerguruanTinggi' value='Kode Perguruan Tinggi'></td></tr>\r\n <tr><td class=inp>Filter Kota:</td><td class=ul><input type=text name='KotaPerguruanTinggi' value='{$_SESSION['KotaPerguruanTinggi']}' size=20 maxlength=20></td><td class=ul><input type=submit name='KotaPerguruanTinggiS' value='Filter'> *) kosongkan jika tidak ingin difilter</td>\r\n </form></table>";
$whr = array();
if (!empty($_SESSION['NamaPerguruanTinggi'])) {
if ($arrCariPerguruanTinggi[$CariPerguruanTinggi] == 'PerguruanTinggiID') {
$whr[] = $arrCariPerguruanTinggi[$CariPerguruanTinggi] . " like '{$_SESSION['NamaPerguruanTinggi']}%' ";
} else {
$whr[] = $arrCariPerguruanTinggi[$CariPerguruanTinggi] . " like '%{$_SESSION['NamaPerguruanTinggi']}%' ";
}
}
if (!empty($_SESSION['KotaPerguruanTinggi'])) {
$whr[] = "Kota like '%{$_SESSION['KotaPerguruanTinggi']}%' ";
}
$_whr = implode(" and ", $whr);
$_whr = empty($_whr) ? '' : "where {$_whr}";
include_once "class/dwolister.class.php";
$pagefmt = "<a href='?mnux={$_SESSION['mnux']}&gos=&_asalPTPage==PAGE='>=PAGE=</a>";
$pageoff = "<b>=PAGE=</b>";
$brs = "<hr size=1 color=silver />";
$gantibrs = "<tr><td bgcolor=silver height=1 colspan=11></td></tr>";
$lister = new dwolister();
$lister->tables = "perguruantinggi {$_whr}\r\n order by " . $arrCariPerguruanTinggi[$CariPerguruanTinggi];
//echo $lister->tables;
$lister->fields = "*";
$lister->startrow = $_SESSION['_asalPTPage'] + 0;
$lister->maxrow = $_maxbaris;
$lister->pages = $pagefmt;
$lister->pageactive = $pageoff;
$lister->page = $_SESSION['_asalPTPage'] + 0;
$lister->headerfmt = "<table class=box cellspacing=1 cellpadding=4>\r\n <tr><td class=ul colspan=8><a href='#' onClick=\"EdtPerguruanTinggi(1, '')\">Tambah Perguruan Tinggi</a></td></tr>\r\n\t \r\n <tr>\r\n\t <th class=ttl>No.</th>\r\n <th class=ttl>Kode</th>\r\n\t <th class=ttl>Nama</th>\r\n <th class=ttl>Jenis</th>\r\n\t <th class=ttl>Kota</th>\r\n\t <th class=ttl>Website</th>\r\n\t <th class=ttl>Telephone</th>\r\n\t <th class=ttl>NA</th>\r\n </tr>";
$lister->detailfmt = "<tr>\r\n\t <td class=inp width=18 align=right>=NOMER=</td>\r\n <td class=cna=NA= nowrap><a href='#self' onClick=\"EdtPerguruanTinggi(0, '=PerguruanTinggiID=')\"><img src='img/edit.png' border=0>\r\n =PerguruanTinggiID=</a></td>\r\n\t <td class=cna=NA=>=Nama=</a></td>\r\n\t <td class=cna=NA=>=JenisPerguruanTinggiID= </td>\r\n\t <td class=cna=NA=>=Kota= </td>\r\n\t <td class=cna=NA=>=Website= </td>\r\n\t <td class=cna=NA=>=Telephone= </td>\r\n\t <td class=cna=NA=><center><img src='img/book=NA=.gif' border=0></td></tr>";
$lister->footerfmt = "</table>";
$hal = $lister->TampilkanHalaman($pagefmt, $pageoff);
$ttl = $lister->MaxRowCount;
echo $lister->TampilkanData();
echo "<p align=center>Hal: {$hal} <br />(Tot: {$ttl})</p>\r\n\t\t<script>\r\n\t\t\tfunction EdtPerguruanTinggi(md, PTid)\r\n\t\t\t{\tlnk = '{$_SESSION['mnux']}.edit.php?md='+md+'&PTid='+PTid;\r\n\t\t\t\twin2 = window.open(lnk, '', 'width=620, height=700, scrollbars, status');\r\n\t\t\t\tif (win2.opener == null) childWindow.opener = self;\r\n\t\t\t}\r\n\t\t</script>";
}
function DaftarAntriDosen()
{
include_once "class/xthlister.class.php";
$AntrianIDPage = GetSetVar('AntrianIDPage');
$arrKey = array('NIM' => 'nim', 'Nama' => 'nama', 'Semua' => '');
// filter
$whr = array();
// Satukan filter
$_whr = implode(' and ', $whr);
$_whr = empty($_whr) ? '' : "where {$_whr}";
// Tampilkan daftar
$lst = new xthlister();
$lst->page = $_SESSION['AntrianIDPage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "=PAGE=";
$lst->tables = "antridosenid d\n left outer join prodi prd on d.ProdiID=prd.ProdiID\n {$_whr}\n order by d.Login";
$lst->fields = "d.Login, d.Nama, d.LevelID, d.KodeID, d.Password, d.ProdiID, d.Foto";
$lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4>\n <tr><th class=ttl>#</th>\n <th class=ttl>NIP</th>\n <th class=ttl>Nama Dosen</th>\n <th class=ttl>Prodi</th>\n <th class=ttl>Konfirmasi</th>\n </tr>";
$lst->footerfmt = "</table></p>";
$lst->detailfmt = "<tr><td>=NOMER=</td>\n <td bgcolor='#9BBB59' class=cna=Keluar=>=Login=</td>\n <td bgcolor='#8DB3E2' class=cna=Keluar=>=Nama=</td>\n <td bgcolor='#B2A1C7' class=cna=Keluar=>=ProdiID=</td>\n <td bgcolor='#BFBFBF' class=cna=Keluar=>\n\t\n\t\t<form action='?' method='post'>\n\t\t<input type=hidden name='mnux' value='modules/antrianid/antrianid.dosen'>\n\t\t <input type=hidden name='gos' value='UsrSav'>\n\t\t\n\t\t<input type='hidden' name='Login' value='=Login='******'hidden' name='Nama' value='=Nama='>\n\t\t<input type='hidden' name='Password' value='=Password='******'hidden' name='lvlid' value='=LevelID='>\n\t\t<input type='hidden' name='kid' value='=KodeID='>\n\t\t\n\t\t<input type='submit' class='btn light' value='Simpan' name='Salin'>\n\t\t</form>\n\t\t\n\t</td>\n </tr>";
echo $lst->TampilkanData();
echo "Halaman : " . $lst->TampilkanHalaman();
}
function DaftarAntriMhsw1()
{
include_once "class/xthlister.class.php";
$AntrianIDPage = GetSetVar('AntrianIDPage');
$arrKey = array('NIM' => 'nim', 'Nama' => 'nama', 'Semua' => '');
// filter
$whr = array();
// Satukan filter
$_whr = implode(' and ', $whr);
$_whr = empty($_whr) ? '' : "where {$_whr}";
// Tampilkan daftar
$lst = new xthlister();
$lst->page = $_SESSION['AntrianIDPage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "=PAGE=";
$lst->tables = "antrimhswid a\n left outer join program prg on a.ProgramID=prg.ProgramID\n left outer join prodi prd on a.ProdiID=prd.ProdiID\n left outer join statusmhsw sm on a.StatusMhswID=sm.StatusMhswID\n {$_whr}\n order by a.MhswID";
$lst->fields = "a.MhswID, a.Nama, a.LevelID, a.KodeID, a.Password, a.ProgramID, a.ProdiID, a.SKKeluar, a.Foto,\n sm.Keluar";
$lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4>\n <tr><th class=ttl>#</th>\n <th class=ttl>No Mhsw</th>\n <th class=ttl>Nama Mhsw</th>\n <th class=ttl>Program</th>\n <th class=ttl>Prodi</th>\n </tr>";
$lst->footerfmt = "</table></p>";
$lst->detailfmt = "<tr><td>=NOMER=</td>\n <td bgcolor='#9BBB59' class=cna=Keluar=>=MhswID=</td>\n <td bgcolor='#8DB3E2' class=cna=Keluar=>=Nama=</td>\n <td bgcolor='#E5B8B7' class=cna=Keluar=>=ProgramID=</td>\n <td bgcolor='#B2A1C7' class=cna=Keluar=>=ProdiID=</td>\n\t</form>\n\t\t\n\t</td>\n </tr>";
echo $lst->TampilkanData();
echo "Halaman : " . $lst->TampilkanHalaman();
}
function DaftarAntri()
{
include_once "class/xthlister.class.php";
$DaftarAntrianPage = GetSetVar('DaftarAntrianPage');
$arrKey = array('NIM' => 'nim', 'Nama' => 'nama', 'Semua' => '');
// filter
$whr = array();
// Satukan filter
$_whr = implode(' and ', $whr);
$_whr = empty($_whr) ? '' : "where {$_whr}";
// Tampilkan daftar
$lst = new xthlister();
$lst->page = $_SESSION['DaftarAntrianPage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "=PAGE=";
$lst->tables = "antrian a {$_whr} order by a.lastmodified";
$lst->fields = "a.nim, a.nama, a.jenis, a.judul, a.kodjenis";
$lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4 width='100%'>\n <tr>\n\t<th class=ttl>#</th>\n <th class=ttl>NIM</th>\n <th class=ttl>Nama Mahasiswa</th>\n <th class=ttl>Jenis Surat</th>\n <th class=ttl>Judul Surat</th>\n <th class=ttl>Kode Jenis</th>\n <th class=ttl>Print</th>\n </tr>";
$lst->footerfmt = "</table></p>";
$lst->detailfmt = "<tr>\n\t<td>=NOMER=</td>\n <td bgcolor='#9BBB59' class=cna=Keluar=>=nim=</td>\n <td bgcolor='#8DB3E2' class=cna=Keluar=>=nama=</td>\n <td bgcolor='#E5B8B7' class=cna=Keluar=>=jenis=</td>\n <td bgcolor='#B2A1C7' class=cna=Keluar=>=judul=</td>\n <td bgcolor='#FABF8F' class=cna=Keluar=>=kodjenis=</td>\n <td bgcolor='#BFBFBF' class=cna=Keluar=>\n\t\t<form action='modules/cetak.php' method='post' target='_parent'>\n\t\t<input type='hidden' name='cetak_id' value='nim'>\n\t\t<input type='submit' value='Print'>\n\t\t</form>\n\t</td>\n </tr>";
echo $lst->TampilkanData();
echo "Halaman : " . $lst->TampilkanHalaman();
}
function DftrGelombang()
{
global $_maxbaris;
include_once "class/lister.class.php";
GelEdtScript();
$_gelombangpage = GetSetVar('_gelombangpage', 0);
$pagefmt = "<a href='?mnux={$_SESSION['mnux']}&gos=gelombang&sub=&_gelombangpage==PAGE='>=PAGE=</a>";
$pageoff = "<b>=PAGE=</b>";
$brs = "<hr size=1 color=silver />";
$gantibrs = "<tr><td bgcolor=silver height=1 colspan=8></td></tr>";
$lst = new lister();
$lst->tables = "pmbperiod p where p.KodeID = '" . KodeID . "' order by p.PMBPeriodID desc";
$lst->fields = "p.PMBPeriodID, p.Nama,\n p.NA,\n date_format(p.TglMulai, '%d/%m/%y') as _TglMulai,\n date_format(p.TglSelesai, '%d/%m/%y') as _TglSelesai,\n date_format(p.UjianMulai, '%d/%m/%y') as _UjianMulai,\n date_format(p.UjianSelesai, '%d/%m/%y') as _UjianSelesai,\n date_format(p.BayarMulai, '%d/%m/%y') as _BayarMulai,\n date_format(p.BayarSelesai, '%d/%m/%y') as _BayarSelesai,\n\tdate_format(p.WawancaraMulai, '%d/%m/%y') as _WawancaraMulai,\n\tdate_format(p.WawancaraSelesai, '%d/%m/%y') as _WawancaraSelesai";
$lst->startrow = $_SESSION['_gelombangpage'] + 0;
$lst->maxrow = $_maxbaris;
$lst->headerfmt = "<p><table class=box cellspacing=1 align=center width=800>\n <tr>\n <td class=ul1 colspan=7>\n <input type=button name='Tambah' value='Tambah Gelombang'\n onClick=\"javascript:GelEdt(1, '', '{$_SESSION['mnux']}')\" />\n <input type=button name='Refresh' value='Refresh'\n onClick=\"window.location='?mnux={$_SESSION['mnux']}'\" />\n Catatan: Hanya ada 1 gelombang yang aktif.\n </td>\n </tr>\n \n <tr>\n <th class=ttl colspan=2>#</th>\n <th class=ttl>Gelombang</th>\n <th class=ttl>Nama Gelombang</th>\n <th class=ttl>Periode</th>\n <th class=ttl>Ujian</th>\n <th class=ttl>Bayar</th>\n <th class=ttl>NA</th>\n </tr>";
$lst->detailfmt = "<tr>\n <td class=inp width=10>=NOMER=</td>\n <td class=ul1 width=10>\n <a href='#' onClick=\"javascript:GelEdt(0, '=PMBPeriodID=', '{$_SESSION['mnux']}')\"><img src='img/edit.png' /></a></td>\n <td class=cna=NA= width=100>=PMBPeriodID=</td>\n <td class=cna=NA=>=Nama=</td>\n <td class=cna=NA= width=80 align=center>=_TglMulai={$brs}=_TglSelesai=</td>\n <td class=cna=NA= width=80 align=center>=_UjianMulai={$brs}=_UjianSelesai=</td>\n <td class=cna=NA= width=80 align=center>=_BayarMulai={$brs}=_BayarSelesai=</td>\n <td class=ul1 width=10 align=center><img src='img/book=NA=.gif' /></td>\n </tr>" . $gantibrs;
$lst->footerfmt = "</table>";
$hal = $lst->WritePages($pagefmt, $pageoff);
$ttl = $lst->MaxRowCount;
echo $lst->ListIt();
echo "<p align=center>Hal: {$hal} <br />(Tot: {$ttl})</p>";
}
function DftrSek()
{
global $_defmaxrow, $mnux, $pref;
$CariSekolah = GetSetVar('CariSekolah', 'Nama Sekolah');
$arrCariSekolah = array('Nama Sekolah' => 'Nama', 'Kode Sekolah' => 'SekolahID');
echo "<table class=box cellspacing=1 cellpadding=4>\r\n <form action='index.php' method=GET>\r\n <input type=hidden name='mnux' value='pmbasalsek'>\r\n <input type=hidden name='gos' value='DftrSek'>\r\n <input type=hidden name='md' value='{$md}'>\r\n <input type=hidden name='SRSEK' value='{$_REQUEST['SRSEK']}'>\r\n <tr><td class=inp1>Cari Sekolah:</td><td class=ul colspan=2><input type=text name='NamaSekolah' value='{$_SESSION['NamaSekolah']}' size=20 maxlength=20>\r\n <input type=submit name='CariSekolah' value='Nama Sekolah'> <input type=submit name='CariSekolah' value='Kode Sekolah'></td></tr>\r\n <tr><td class=inp1>Filter Kota:</td><td class=ul><input type=text name='KotaSekolah' value='{$_SESSION['KotaSekolah']}' size=20 maxlength=20></td><td class=ul><input type=submit name='KotaSekolahS' value='Filter'> *) kosongkan jika tidak ingin difilter</td>\r\n </form></table><br>";
$whr = array();
if (!empty($_SESSION['NamaSekolah'])) {
if ($arrCariSekolah[$CariSekolah] == 'SekolahID') {
$whr[] = $arrCariSekolah[$CariSekolah] . " like '{$_SESSION['NamaSekolah']}%' ";
} else {
$whr[] = $arrCariSekolah[$CariSekolah] . " like '%{$_SESSION['NamaSekolah']}%' ";
}
}
if (!empty($_SESSION['KotaSekolah'])) {
$whr[] = "Kota like '%{$_SESSION['KotaSekolah']}%' ";
}
$_whr = implode(" and ", $whr);
$_whr = empty($_whr) ? '' : "where {$_whr}";
include_once "class/lister.class.php";
$pagefmt = "<a href='?mnux={$mnux}&{$pref}=Sek&SRSEK==STARTROW='>=PAGE=</a>";
$pageoff = "<b>=PAGE=</b>";
$lister = new lister();
$lister->tables = "asalsekolah {$_whr}\r\n order by " . $arrCariSekolah[$CariSekolah];
//echo $lister->tables;
$lister->fields = "*";
$lister->startrow = $_REQUEST['SRSEK'] + 0;
$lister->maxrow = $_defmaxrow;
$lister->headerfmt = "<table class=box cellspacing=1 cellpadding=4>\r\n <tr><td class=ul colspan=8><a href='?mnux=pmbasalsek&gos=SekEdt&md=1'>Tambah Sekolah</a></td></tr>\r\n\t \r\n <tr>\r\n\t <th class=ttl>No.</th>\r\n <th class=ttl>Kode</th>\r\n\t <th class=ttl>Nama</th>\r\n <th class=ttl>Jenis</th>\r\n\t <th class=ttl>Kota</th>\r\n\t <th class=ttl>Website</th>\r\n\t <th class=ttl>Telephone</th>\r\n\t <th class=ttl>NA</th>\r\n </tr>";
$lister->detailfmt = "<tr>\r\n\t <td class=inp1 width=18 align=right>=NOMER=</td>\r\n <td class=cna=NA= nowrap><a href=\"?SRSEK={$_REQUEST['SRSEK']}&mnux=pmbasalsek&gos=SekEdt&sekid==SekolahID=\"><img src='img/edit.png' border=0>\r\n =SekolahID=</a></td>\r\n\t <td class=cna=NA=>=Nama=</a></td>\r\n\t <td class=cna=NA=>=JenisSekolahID= </td>\r\n\t <td class=cna=NA=>=Kota= </td>\r\n\t <td class=cna=NA=>=Website= </td>\r\n\t <td class=cna=NA=>=Telephone= </td>\r\n\t <td class=cna=NA=><center><img src='img/book=NA=.gif' border=0></td></tr>";
$lister->footerfmt = "</table>";
$halaman = $lister->WritePages($pagefmt, $pageoff);
$TotalNews = $lister->MaxRowCount;
$usrlist = $lister->ListIt() . "<br>\r\n\t Halaman: {$halaman}<br>\r\n\t Total: {$TotalNews}";
echo $usrlist;
}
function DaftarMhswSkorsing($mnux = '', $gos = '')
{
$inqMhswPage = GetSetVar('inqMhswPage');
$arrKey = array('NPM' => 'MhswID', 'Nama' => 'Nama', 'Semua' => '');
$whr = '';
if (!empty($arrKey[$_SESSION['crmhswkey']]) && !empty($_SESSION['crmhswval'])) {
$whr = "m." . $arrKey[$_SESSION['crmhswkey']] . " like '%" . $_SESSION['crmhswval'] . "%' ";
}
$whr = empty($whr) ? '' : "where " . $whr;
$maxdata = 40;
// Data
$s = "select m.MhswID, m.Nama, m.ProgramID, m.ProdiID,\r\n prg.Nama as PRG, prd.Nama as PRD, sm.Nama as SM, sm.Keluar\r\n from mhsw m\r\n left outer join program prg on m.ProgramID=prg.ProgramID\r\n left outer join prodi prd on m.ProdiID=prd.ProdiID\r\n left outer join statusmhsw sm on m.StatusMhswID=sm.StatusMhswID\r\n {$whr}\r\n order by m.MhswID\r\n limit {$maxdata}";
$r = _query($s);
// Tampilkan
$jmldata = _num_rows($r);
echo "<p><table class=box cellspacing=1>\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>Status</th>\r\n <th class=ttl>Skorsing</th>\r\n </tr>";
$n = 0;
while ($w = _fetch_array($r)) {
if ($w['Keluar'] == "Y") {
$c = "class=nac";
$skr = '';
$strMhswID = $w['MhswID'];
} else {
$c = "class=ul";
$strMhswID = "<a href='?mnux={$mnux}&mhswid={$w['MhswID']}'>{$w['MhswID']}</a>";
$sqlskorsing = "select TahunID\r\n from khs\r\n where MhswID='{$w['MhswID']}'\r\n and StatusMhswID='S'\r\n order by TahunID";
$skr = GetArrayTable($sqlskorsing, 'TahunID', 'TahunID', ', ', '');
}
$n++;
echo "<tr>\r\n <td class=inp>{$n}</td>\r\n <td {$c}>{$strMhswID}</td>\r\n <td {$c}>{$w['Nama']}</td>\r\n <td {$c}>{$w['PRG']}</td>\r\n <td {$c}>{$w['SM']}</td>\r\n <td {$c}>{$skr} </td>\r\n </tr>";
}
echo "</table></p>";
if ($jmldata >= $maxdata) {
echo "<p>*) Data yang ditampilkan dibatasi <font size=+1>{$maxdata}</font> mhsw.</p>";
}
}
$hdrjdwl = "<tr><th class=ttl>No</th>\n <th class=ttl>Jam</th>\n <th class=ttl>Ruang</th>\n <th class=ttl>Kode MK</th>\n <th class=ttl>Matakuliah</th>\n <th class=ttl>Kelas</th>\n <th class=ttl>SKS</th>\n <th class=ttl>Prodi</th>\n <th class=ttl>Dosen</th>\n <th class=ttl title='Presensi'>Prs</th>\n <th class=ttl>Link</th>\n </tr>";
echo "<p><table class=box cellspacing=1 cellpadding=4>";
while ($w = _fetch_array($r)) {
if ($hari != $w['HariID']) {
$hari = $w['HariID'];
echo "<tr><td class=ul colspan=12><b>{$w['HR']}</b></td></tr>";
echo $hdrjdwl;
}
$nomer++;
$totsks += $w['SKS'];
// Array dosen
$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 />');
// Array prodi
$arrprodi = explode('.', TRIM($w['ProdiID'], '.'));
$strprodi = implode(',', $arrprodi);
$_prodi = empty($strprodi) ? '' : GetArrayTable("select Nama from prodi where ProdiID in ({$strprodi}) order by ProdiID", "ProdiID", "Nama", '<br />');
echo "<tr><td class=inp1>{$nomer}</td>\n <td class=ul>{$w['JamMulai']}-{$w['JamSelesai']}</td>\n <td class=ul>{$w['RuangID']}</td>\n <td class=ul>{$w['MKKode']}</td>\n <td class=ul>{$w['Nama']}</td>\n <td class=ul>{$w['NamaKelas']} </td>\n <td class=ul>{$w['SKS']} ({$w['SKSAsli']})</td>\n <td class=ul>{$_prodi}</td>\n <td class=ul>{$_dosen}</td>\n <td class=ul align=right>{$w['Kehadiran']}</td>\n <td class=ul><a href='?mnux=dosen.nilai&tahun={$_SESSION['tahun']}&jadwalid={$w['JadwalID']}&dosen={$_SESSION['dosen']}'>Nilai</a></td>\n </tr>";
}
echo "<tr><td colspan=6 align=right>Total SKS :</td><td class=cnnY align=right><b>{$totsks}</b></td></tr>\n </table></p>";
}
// *** Parameters ***
$tahun = GetSetVar('tahun');
$dosen = GetSetVar('dosen');
// *** Main ***
TampilkanJudul("Jadwal Mengajar Dosen");
TampilkanHeaderJadwalDosen();
if (!empty($dosen) && !empty($tahun)) {
TampilkanJadwalDosen();
}
$s = "update pmb set LulusUjian='Y' $where";
$r = _query($s);
}
DftrHasilUSM();
}
function DftrHasilUSM() {
TampilkanFilterHasilUSM();
TampilkanDaftarUSM();
}
// *** Parameters ***
$pmbperiod = GetSetVar("pmbperiod");
$pmbfid = GetSetVar('pmbfid');
$pmbpil1 = GetSetVar('pmbpil1');
$pmbprodi = GetSetVar('pmbprodi');
$pmbnilailulus = GetSetVar('pmbnilailulus', 80);
$_pmbhasilgrade = GetSetVar('pmbhasilgrade', 'A');
$_pmbhasildari = GetSetVar('pmbhasildari', 1);
$_pmbhasilsampai = GetSetVar('pmbhasilsampai', 10);
$pmbtahun = GetSetVar('pmbtahun', $pmbperiod);
if (empty($pmbtahun)) {
$pmbperiod = GetaField("pmbperiod", "NA", 'N', "PMBPeriodID");
$_SESSION['pmbperiod'] = $pmbperiod;
}
$gos = (empty($_REQUEST['gos']))? 'DftrHasilUSM' : $_REQUEST['gos'];
// *** Main ***
TampilkanJudul("Hasil USM");
$gos();
?>
<?php
// Author: Emanuel Setio Dewo
// 24 Jan 2007
// *** Parameters ***
$tahun = GetSetVar('tahun');
$prodi = GetSetVar('prodi');
$prid = GetSetVar('prid');
// *** Main ***
TampilkanJudul("Cek Tagihan KRS Mahasiswa");
TampilkanTahunProdiProgram('_cek_tagihan_krs', '');
// Tampilkan pesan
echo "<p>Tabel berikut ini membandingkan SKS yang diambil di KRS (tabel: krstemp) dengan\r\n jumlah SKS yang ditagihkan ke mhsw (tabel: bipotmhsw).\r\n Jika jumlah SKS-nya tidak sama, maka baris akan ditampilkan dengan warna merah. \r\n Jika jumlah SKS-nya sama, maka baris akan ditampilkan dengan warna putih. <input type=button name='Cetak' value='Cetak' onClick='window.print()'></p>";
if (!empty($tahun) && !empty($prodi)) {
TampilkanTagihanKRSMhsw(5);
}
// *** Functions ***
function TampilkanTagihanKRSMhsw($BNID)
{
$s = "select k.KHSID, k.MhswID, m.Nama, sum(k.SKS) as JmlSKS\r\n from krstemp k\r\n left outer join mhsw m on k.MhswID=m.MhswID\r\n left outer join jadwal j on k.JadwalID=j.JadwalID\r\n where k.TahunID='{$_SESSION['tahun']}'\r\n and m.ProdiID='{$_SESSION['prodi']}'\r\n and k.NA='N'\r\n and j.JenisJadwalID='K'\r\n and j.JadwalSer=0\r\n group by k.MhswID";
$r = _query($s);
$n = 0;
echo "<p><table class=box cellspacing=1>\r\n <tr><th class=ttl>#</th>\r\n <th class=ttl>NPM</th>\r\n <th class=ttl>Nama Mhsw</th>\r\n <th class=ttl>SKS<br />Temp</th>\r\n <th class=ttl>SKS<br />Tagih</th>\r\n <th class=ttl>Rupiah<br />Tagih</th>\r\n <th class=ttl>Total</th>\r\n </tr>";
while ($w = _fetch_array($r)) {
$n++;
$jml = GetFields('bipotmhsw', "MhswID='{$w['MhswID']}' and TahunID='{$_SESSION['tahun']}' and BIPOTNamaID", $BNID, "Jumlah, Besar");
$rupiah = number_format($jml['Besar']);
$total = number_format($jml['Besar'] * $jml['Jumlah']);
$c = $jml['Jumlah'] != $w['JmlSKS'] ? 'class=wrn' : 'class=ul';
$link = $jml['Jumlah'] != $w['JmlSKS'] ? "<a href='cetak/krs.cetak.php?khsid={$w['KHSID']}&prn=1'>{$w['MhswID']}</a>" : $w['MhswID'];
echo "<tr>\r\n <td class=inp>{$n}</td>\r\n <td {$c}>{$link}</td>\r\n <td {$c}>{$w['Nama']}</td>\r\n <td {$c} align=right>{$w['JmlSKS']}</td>\r\n <td {$c} align=right>{$jml['Jumlah']}</td>\r\n <td {$c} align=right>{$rupiah}</td>\r\n <td {$c} align=right>{$total}</td>\r\n </tr>";
<?php
// Author : Emanuel Setio Dewo
// Email : setio.dewo@gmail.com
// Start : 08/10/2008
session_start();
include_once "../sisfokampus1.php";
HeaderSisfoKampus("Data Mahasiswa Yang Lulus");
// *** Parameters ***
$TahunID = GetSetVar('TahunID');
$ProdiID = GetSetVar('ProdiID');
// *** Main ***
$gos = empty($_REQUEST['gos']) ? 'Satu' : $_REQUEST['gos'];
$gos();
// *** Functions ***
function Satu()
{
echo <<<ESD
<font size=+1>Data Mahasiswa Yang Lulus</font> <sup>TRLSM</sup><br />
<table class=box cellspacing=1 width=100%>
<tr><td>
Anda akan mengexport data kelulusan mahasiswa.<br />
Sistem akan memproses data kelulusan dari tahun akademik yang telah ditentukan di atas.<br />
Status Mhsw yang akan diproses: <b>L</b>ulus, <b>C</b>uti, <b>N</b>on-aktif.<br />
Tekan tombol Proses untuk memulai proses export.
</td>
<td width=80 align=right valign=top>
<input type=button name='Proses' value='Proses'
onClick="location='../{$_SESSION['mnux']}.lulusmhsw.php?gos=Proses'" />
</td>
</tr>
$jdwl = GetFields('jadwal', 'JadwalID', $JadwalID, '*');
$MhswIDPart = $_REQUEST['MhswIDPart'];
$KHSID = array();
$KHSID = $_REQUEST['KHSID'];
//foreach ($KHSID as $val) echo "$val<br />";
$inKHSID = implode(',', $KHSID);
$s = "select MhswID, KHSID\r\n from khs\r\n where KHSID in ({$inKHSID})";
$r = _query($s);
echo "<ol>";
while ($w = _fetch_array($r)) {
$ada = GetaField("krs", "MhswID='{$w['MhswID']}' and JadwalID", $jdwl['JadwalID'], 'KRSID') + 0;
if ($ada == 0) {
$str = "insert into krs\r\n (KHSID, MhswID, TahunID, JadwalID,\r\n MKID, MKKode, SKS, HargaStandar, Harga,\r\n Catatan, LoginBuat, TanggalBuat)\r\n values ({$w['KHSID']}, '{$w['MhswID']}', '{$jdwl['TahunID']}', {$jdwl['JadwalID']},\r\n '{$jdwl['MKID']}', '{$jdwl['MKKode']}', '{$jdwl['SKS']}', '{$jdwl['HargaStandar']}', '{$jdwl['Harga']}',\r\n 'DITERIMA', 'BATCH-0922', now())";
$rstr = _query($str);
} else {
$str = "SDH.";
}
echo "<li>{$w['MhswID']} - {$w['KHSID']} » {$str}</li>";
}
echo "</ol>";
}
// *** Parameters ***
$JadwalID = GetSetVar('JadwalID');
$MhswIDPart = GetSetVar('MhswIDPart');
$gos = $_REQUEST['gos'];
// *** Main ***
TampilkanJudul("Input KRS Masal Berdasarkan Jadwal & Angkatan");
TampilkanInputJadwal();
if (!empty($gos)) {
$gos();
}
<?php
// Author : Emanuel Setio Dewo
// Email : setio.dewo@gmail.com
// Start : 08/10/2008
session_start();
include_once "../sisfokampus1.php";
HeaderSisfoKampus("Aktivitas Mahasiswa");
// *** Parameters ***
$TahunID = GetSetVar('TahunID');
$ProdiID = GetSetVar('ProdiID');
$DariMhsw = GetSetVar('DariMhsw');
$SampaiMhsw = GetSetVar('SampaiMhsw');
// *** Main ***
$gos = empty($_REQUEST['gos']) ? 'Satu' : $_REQUEST['gos'];
$gos();
// *** Functions ***
function Satu()
{
echo <<<ESD
<font size=+1>Aktivitas Mahasiswa</font> <sup>TRAKM</sup><br />
<table class=box cellspacing=1 width=99%>
<form action='../{$_SESSION['mnux']}.mhsw.php' method=POST>
<tr>
<td width=200 valign=top>
Dari NIM:<br />
<input type=text name='DariMhsw' value='{$_SESSION['DariMhsw']}' size=20 maxlength=50 />
<font color=red>*)</font>
</td>
<td width=200 valign=top>
<?php
// Author : Irvandy Goutama
// Start : 29 April 2008
// Email : irvandygoutama@gmail.com
// *** Parameters ***
$_statusmhswNama = GetSetVar('_statusmhswID');
$_statusmhswNama = GetSetVar('_statusmhswNama');
$_statusmhswProdi = GetSetVar('_statusmhswProdi');
$_statusmhswPrg = GetSetVar('_statusmhswPrg');
$_statusmhswNomer = GetSetVar('_statusmhswNomer');
$_statusmhswPage = GetSetVar('_statusmhswPage');
$_statusmhswUrut = GetSetVar('_statusmhswUrut', 1);
$arrUrutMhsw = array('NIM~psm.MhswID asc, m.Nama', 'NIM (balik)~psm.MhswID desc, m.Nama', 'Nama~m.Nama');
RandomStringScript();
// *** Main ***
TampilkanJudul("Pengurusan Status Mahasiswa");
$gos = empty($_REQUEST['gos']) ? 'StatusMhsw' : $_REQUEST['gos'];
$gos();
// *** Functions ***
function AmbilUrutanMhswID()
{
global $arrUrutMhsw;
$a = '';
$i = 0;
foreach ($arrUrutMhsw as $u) {
$_u = explode('~', $u);
$sel = $i == $_SESSION['_statusmhswUrut'] ? 'selected' : '';
$a .= "<option value='{$i}' {$sel}>" . $_u[0] . "</option>";
$i++;
}
$r = _query($s);
//update KRSTEMP
$s1 = "update krstemp\r\n\t\t\t\tset JadwalID={$Ke_Kelas}, Catatan='Pindah Jadwal dari {$jid}', LoginEdit='{$_SESSION['_Login']}', TanggalEdit=now()\r\n\t\t\t\twhere KRSID={$krsid}";
$r1 = _query($s1);
//update Jadwal
$s0 = "update jadwal\r\n\t\t\t\tset JumlahMhsw=JumlahMhsw-1 where JadwalID = '{$Ke_kelas}'";
$r0 = _query($s0);
}
}
HitungJumlahMhsw($jid);
HitungJumlahMhsw($Ke_Kelas);
echo Konfirmasi("Telah Dipindahkan", "Sebanyak <font size=+1>{$n}</font> mhsw telah dipindah kelasnya.\r\n <hr size=1 color=silver>\r\n Option: <a href='?mnux=koreksikelas'>Kembali</a>");
}
function HitungJumlahMhsw($jid)
{
$mhswkrs = GetaField('krstemp', 'JadwalID', $jid, "count(KRSID)") + 0;
$mhsw = GetaField('krs', 'JadwalID', $jid, "count(KRSID)") + 0;
$s = "update jadwal set JumlahMhsw = '{$mhsw}', JumlahMhswKRS = '{$mhswkrs}' where JadwalID = '{$jid}' ";
$r = _query($s);
}
// *** Parameters ***
$prodi = GetSetVar('prodi');
$prid = GetSetVar('prid');
$tahun = GetSetVar('tahun');
$gos = empty($_REQUEST['gos']) ? 'DftrJdwl' : $_REQUEST['gos'];
// *** Main ***
TampilkanJudul("Koreksi Kelas");
TampilkanTahunProdiProgram('koreksikelas', '');
if (!empty($prid) && !empty($prodi)) {
$gos();
}
<?php
// Author : Emanuel Setio Dewo
// Email : setio.dewo@gmail.com
// Start : 18/12/2008
// *** Parameters ***
$tabalumni = GetSetVar('tabalumni', 0);
$mhswid = GetSetVar('mhswid');
$mhswbck = GetSetVar('mhswbck');
// *** Main ***
TampilkanJudul("Edit Alumni");
$gos = empty($_REQUEST['gos']) ? 'fnEdit' : $_REQUEST['gos'];
$gos();
// *** Functions ***
function fnEdit()
{
$mhsw = GetFields("mhsw m", "m.MhswID='{$_SESSION['mhswid']}' and m.KodeID", KodeID, "m.*");
$alumni = GetFields("alumni a", "a.MhswID='{$_SESSION['mhswid']}' and a.KodeID", KodeID, "a.*");
if (empty($mhsw) || empty($alumni)) {
echo ErrorMsg('Error', "Data alumni tidak ditemukan.<br />\r\n Hubungi Sysadmin untuk informasi lebih lanjut.\r\n <hr size=1 color=silver />\r\n <input type=button name='btnKembali' value='Kembali'\r\n onClick=\"location='?mnux={$_SESSION['mhswbck']}&gos='\" />");
} else {
TampilkanHeader($mhsw, $alumni);
TampilkanTab($mhsw, $alumni, $_SESSION['tabalumni']);
}
}
function TampilkanHeader($mhsw, $alumni)
{
$prodi = GetaField('prodi', "ProdiID='{$mhsw['ProdiID']}' and KodeID", KodeID, "Nama");
echo <<<ESD
<table class=box cellspacing=1 align=center width=600>
<tr><td class=inp width=60>Nama:</td>
<?php
// Author : Emanuel Setio Dewo
// Email : setio.dewo@gmail.com
// Start : 04/12/2008
//
// *** Parameters ***
$_honBulan = GetSetVar('_honBulan', date('m'));
$_honTahun = GetSetVar('_honTahun', date('Y'));
$_honDosen = GetSetVar('_honDosen');
$_honProdi = GetSetVar('_honProdi');
// *** Main ***
TampilkanJudul("Honor Dosen");
TampilkanHeaderHonorer();
$gos = empty($_REQUEST['gos']) ? 'DftrHondok' : $_REQUEST['gos'];
$gos();
// *** Functions ***
function TampilkanHeaderHonorer()
{
$optbulan = GetMonthOption($_SESSION['_honBulan']);
$optprodi = GetOption2('prodi', "concat(ProdiID, ' - ', Nama)", 'ProdiID', $_SESSION['_honProdi'], "KodeID='" . KodeID . "'", 'ProdiID');
RandomStringScript();
echo <<<ESD
<table class=box cellspacing=1 width=880>
<form name='frmHeaderHondok' action='?' method=POST>
<input type=hidden name='mnux' value='{$_SESSION['mnux']}' />
<input type=hidden name='gos' value='' />
<input type=hidden name='_honPage' value='1' />
<tr>
<td class=ul1>
<?php
// Author : Emanuel Setio Dewo
// Email : setio.dewo@gmail.com
// Start : 16 Sept 2008
// *** Parameters ***
$_krsTahunID = GetSetVar('_krsTahunID');
$_krsMhswID = GetSetVar('_krsMhswID');
// *** Main ***
TampilkanJudul("Nilai Semester Mahasiswa");
CekBolehAksesModul();
TampilkanCariMhswnya();
if (!empty($_krsTahunID) && !empty($_krsMhswID)) {
$oke = BolehAksesData($_krsMhswID);
if ($oke) {
$oke = ValidasiDataMhsw($_krsTahunID, $_krsMhswID, $khs);
}
if ($oke) {
$oke = CekPembayaran($_krsMhswID);
}
if ($oke) {
$mhsw = GetFields("mhsw m\r\n left outer join statusawal sta on sta.StatusAwalID = m.StatusAwalID \r\n\t left outer join dosen d on d.Login = m.PenasehatAkademik", "m.KodeID = '" . KodeID . "' and m.MhswID", $_krsMhswID, "m.*, sta.Nama as STAWAL, d.Nama as namaDosen");
$thn = GetFields("tahun", "KodeID = '" . KodeID . "' and TahunID", $_krsTahunID, "*");
$gos = sqling($_REQUEST['gos']);
if (empty($gos)) {
TampilkanHeaderMhsw($thn, $mhsw, $khs);
TampilkanDaftarKRSMhsw($thn, $mhsw, $khs);
} else {
$gos();
}
}
$isi .= str_pad($w['SKS'], 2, ' ', STR_PAD_LEFT) . ' ';
$isi .= str_pad($w['TanggalDispensasi'], 12, ' ', STR_PAD_LEFT) . ' ';
$isi .= str_pad($Catatan, 30, ' ') . ' ';
$isi .= $_lf;
fwrite($f, $isi);
}
$hal++;
fwrite($f, $div);
fwrite($f, str_pad("Dicetak oleh: " . $_SESSION['_Login'] . ', ' . date("d-m-Y H:i"), 50, ' '));
//str_pad("(Akhir Laporan) Hal. : ".$hal.'/'.$jumhal, 100, ' ', STR_PAD_LEFT));
// Tutup & tampilkan
fwrite($f, chr(12));
fclose($f);
TampilkanFileDWOPRN($nmf, 'akd.lap');
}
// *** Parameters ***
$tahun = GetSetVar('tahun');
$prodi = GetSetVar('prodi');
$prid = GetSetVar('prid');
$DariNPM = GetSetVar('DariNPM');
$SampaiNPM = GetSetVar('SampaiNPM');
// *** Main ***
TampilkanJudul("Daftar KRS Mahasiswa Yang Dispensasi");
//TampilkanTahunProdiProgram('akd.lap.krsmhsw', 'DftrAkdLapKRSMhsw');
TampilkanTahunProdiProgram('akd.lap.krsmhsw.dispen', 'DftrAkdLapKRSMhswDispen', '', '', 1);
if (!empty($tahun)) {
DftrAkdLapKRSMhswDispen();
}
?>
$_SESSION['NIMPOS'] = 0;
echo "<p>Sistem akan memproses <font size=+2>{$jml}</font> data</p>\r\n <p><IFRAME src='cluster.nim.prc.php?gos=PRCNIM&prodi={$prodiid}&thnangkatan={$tahun_angkatan}' frameborder=0>\r\n </IFRAME></p>";
}
function headerKelas($namaKelas)
{
$t = "<p><table class=box cellpadding=4 cellspacing=1>";
$t .= "<tr><th class=ttl colspan=4>Kelas : {$namaKelas}</th>";
$t .= "<tr><td class=ttl>No.</td><td class=ttl>PMBID</td><td class=ttl>Nama</td><td class=ttl>NIM</td></tr>";
return $t;
}
$prodi = GetSetVar('prodi');
$prid = GetSetVar('prid');
$pmbperiod = GetSetVar("pmbperiod");
$Kaps = GetFields('prodi', 'ProdiID', $prodi, "KapasitasKelas");
$kapasitas_kelas = GetSetVar('kapasitas_kelas', $Kaps['KapasitasKelas']);
$tahun_angkatan = GetSetVar('tahun_angkatan');
if (empty($pmbperiod)) {
$pmbperiod = GetaField("pmbperiod", "NA", 'N', "PMBPeriodID");
$_SESSION['pmbperiod'] = $pmbperiod;
}
$gos = empty($_REQUEST['gos']) ? 'setupKelas' : $_REQUEST['gos'];
$subg = $_REQUEST['subg'];
// *** Main ***
TampilkanJudul("Pembagian Kelas dan NIM");
TampilkanFilterMhsw();
if (!empty($_SESSION['prodi']) && !empty($_SESSION['prid']) && !empty($_SESSION['KodeID'])) {
$gos();
if (!empty($subg)) {
$jml = GetaField('pmb', "PMBPeriodID = '{$_SESSION['pmbperiod']}' and ProdiID='{$_SESSION['prodi']}' and ProgramID='{$_SESSION['prid']}' and NIM IS NULL and LulusUjian", 'Y', 'count(PMBID)');
if ($jml > 0) {
GenerateNIM();