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 CariMhsw()
{
HeaderCariMhsw();
TampilkanFotoScript();
// setup where-statement
$whr = array();
if ($_SESSION['crMhswID'] != '') {
$whr[] = "and m.MhswID like '{$_SESSION['crMhswID']}%'";
}
if ($_SESSION['crNamaMhsw'] != '') {
$whr[] = "and m.Nama like '%{$_SESSION['crNamaMhsw']}%'";
}
$strwhr = implode("\n", $whr);
// Tampilkan
include_once "class/dwolister.class.php";
$lst = new dwolister();
$lst->maxrow = 10;
$lst->page = $_SESSION['_mhswdropinPage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux={$_SESSION['mnux']}&_mhswdropinPage==PAGE='>=PAGE=</a>";
$lst->tables = "mhsw m\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 left outer join statusawal sa on m.StatusAwalID=sa.StatusAwalID\r\n where m.KodeID='" . KodeID . "'\r\n {$strwhr} {$ord}";
$lst->fields = "m.MhswID, m.Nama, m.StatusAwalID, m.StatusMhswID,\r\n m.Kelamin,\r\n m.Telepon, m.Handphone, m.Email, \r\n if (m.Foto is NULL or m.Foto = '', 'img/tux001.jpg', m.Foto) as _Foto,\r\n if (m.StatusAwalID = 'D', concat('<a href=\\'?mnux={$_SESSION['mnux']}&gos=fnKonversi&MhswID=', m.MhswID,'\\'><img src=img/edit.png /></a>'), '×') as _Konversi,\r\n m.ProgramID, m.ProdiID, m.Alamat, m.Kota,\r\n prd.Nama as PRD, sm.Nama as SM, sm.Keluar, sa.Nama as SA";
$lst->headerfmt = "<table class=box cellspacing=1 cellpadding=4 width=800>\r\n <tr><th class=ttl>No.</th>\r\n <th class=ttl>NPM<hr size=1 color=silver />Pindahkan</th>\r\n <th class=ttl>Nama</th>\r\n <th class=ttl>Program Studi</th>\r\n <th class=ttl>Status<hr size=1 color=silver />Masuk</th>\r\n <th class=ttl>Telp/HP</th>\r\n <th class=ttl width=20>Konversi<br />MK</th>\r\n </tr>";
$lst->footerfmt = "</table></p>";
$lst->detailfmt = "<tr>\r\n <td class=inp width=10><a name='=MhswID='>=NOMER=</a></td>\r\n <td class=cna=Keluar= width=100 align=center>\r\n =MhswID=\r\n\t <hr size=1 color=silver />\r\n\t <a href='?mnux={$_SESSION['mnux']}&gos=fnDropin&MhswID==MhswID='>Prodi</a> •\r\n\t <a href='?mnux={$_SESSION['mnux']}&gos=fnDropinProgram&MhswID==MhswID='>Program</a>\r\n </td>\r\n <td class=cna=Keluar= nowrap>\r\n <b>=Nama=</b></br>\r\n\t <img src='img/=Kelamin=.bmp' align=left />\r\n <a href='#' onClick=\"javascript:TampilkanFoto('=MhswID=', '=Nama=', '=_Foto=')\" title='=_Foto='>\r\n <img src='=_Foto=' width=30 align=right /></a>\r\n </td>\r\n <td class=cna=Keluar=>=ProgramID= \r\n <hr size=1 color=silver />\r\n =PRD= </td>\r\n <td class=cna=Keluar= width=60 align=center>\r\n =SM=\r\n <hr size=1 color=silver />\r\n =SA=\r\n </td>\r\n <td class=cna=Keluar=>=Telepon= \r\n <hr size=1 color=silver />\r\n =Handphone= </td>\r\n <td class=cna=Keluar= align=center>=_Konversi=</td>\r\n </tr>\r\n <tr><td bgcolor=silver colspan=7 height=1></td></tr>";
echo $lst->TampilkanData();
echo $ttl;
echo "<p>Hal.: " . $lst->TampilkanHalaman() . "<br />" . "Total: " . number_format($lst->MaxRowCount) . "</p>";
}
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 DaftarMhsw()
{
TampilkanFotoScript();
// setup where-statement
$whr = array();
$ord = '';
if ($_SESSION['srcmhswkey'] != 'Reset' && !empty($_SESSION['srcmhswkey']) && !empty($_SESSION['srcmhswval'])) {
$whr[] = "m.{$_SESSION['srcmhswkey']} like '%{$_SESSION['srcmhswval']}%' ";
$ord = "order by m.{$_SESSION['srcmhswkey']}";
}
if (!empty($_SESSION['prodi'])) {
$whr[] = "m.ProdiID='{$_SESSION['prodi']}'";
}
if (!empty($_SESSION['prid'])) {
$whr[] = "m.ProgramID='{$_SESSION['prid']}'";
}
if (!empty($whr)) {
$strwhr = "where " . implode(' and ', $whr);
}
if ($_SESSION['_LevelID'] == 120) {
// Mahasiswa
$strwhr = "where m.MhswID = '{$_SESSION['_Login']}'";
} else {
$strwhr = str_replace('NPM', "MhswID", $strwhr);
}
//echo 'test='.$strwhr;
$ord = str_replace('NPM', "MhswID", $ord);
// Tampilkan
include_once "class/dwolister.class.php";
$lst = new dwolister();
$lst->maxrow = 10;
$lst->page = $_SESSION['mhswpage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux={$_SESSION['mnux']}&mhswpage==PAGE='>=PAGE=</a>";
$lst->tables = "mhsw m\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 {$strwhr} {$ord}";
$lst->fields = "m.MhswID, m.Nama, m.StatusAwalID, m.StatusMhswID,\r\n m.Kelamin,\r\n m.Telepon, m.Handphone, m.Email, \r\n if (m.Foto is NULL or m.Foto = '', 'img/tux001.jpg', m.Foto) as _Foto,\r\n m.ProgramID, m.ProdiID, m.Alamat, m.Kota,\r\n prd.Nama as PRD, sm.Nama as SM, sm.Keluar";
$lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4 width=700>\r\n <tr><th class=ttl>No.</th>\r\n <th class=ttl>NPM</th>\r\n <th class=ttl>Nama</th>\r\n <th class=ttl>Program Studi</th>\r\n <th class=ttl>Status</th>\r\n <th class=ttl>Telp/HP</th>\r\n </tr>";
$lst->footerfmt = "</table></p>";
$lst->detailfmt = "<tr>\r\n <td class=inp width=10><a name='=MhswID='>=NOMER=</a></td>\r\n <td class=cna=Keluar= width=100>\r\n <a href='?mnux={$_SESSION['mnux']}.edt&mhswbck={$_SESSION['mnux']}&gos=MhswEdt&mhswid==MhswID='><img src='img/edit.png'>\r\n =MhswID=</a>\r\n <img src='img/=Kelamin=.bmp' align=right />\r\n </td>\r\n <td class=cna=Keluar= nowrap>\r\n <b>=Nama=</b>\r\n <a href='#' onClick=\"javascript:TampilkanFoto('=MhswID=', '=Nama=', '=_Foto=')\" title='=_Foto='>\r\n <img src='=_Foto=' width=30 align=right /></a>\r\n </td>\r\n <td class=cna=Keluar=>=ProgramID= \r\n <hr size=1 color=silver />\r\n =PRD= </td>\r\n <td class=cna=Keluar= width=60 align=center>=SM=</td>\r\n <td class=cna=Keluar=>=Telepon= \r\n <hr size=1 color=silver />\r\n =Handphone= </td>\r\n </tr>\r\n <tr><td bgcolor=silver colspan=6 height=1></td></tr>";
echo $lst->TampilkanData();
echo $ttl;
echo "<p>Hal.: " . $lst->TampilkanHalaman() . "<br />" . "Total: " . number_format($lst->MaxRowCount) . "</p>";
}
function DaftarKomprehensif()
{
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 k.TahunID = '{$_SESSION['TahunID']}' ";
$s = "select * from kompre k left outer join mhsw m on k.MhswID = m.MhswID and m.KodeID = '" . KodeID . "'\r\n \t\twhere k.NA = 'N' {$whr_prodi} {$whr_tahun} {$whr_nim} {$whr_nama}";
$qs = _query($s);
$group = mysql_num_rows($qs) == 0 ? '' : 'Group by k.MhswID, k.Gagal';
// Tampilkan
$komprepage = GetSetVar('komprepage', 1);
include_once "class/dwolister.class.php";
$lst = new dwolister();
$lst->maxrow = 10;
$lst->page = $_SESSION['komprepage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux={$_SESSION['mnux']}&komprepage==PAGE='>=PAGE=</a>";
$lst->tables = "kompre k\r\n left outer join mhsw m on k.MhswID = m.MhswID and m.KodeID = '" . KodeID . "'\r\n left outer join prodi prd on prd.ProdiID = m.ProdiID\r\n\twhere k.NA = 'N'\r\n {$whr_prodi}\r\n {$whr_nama}\r\n {$whr_nim}\r\n {$whr_tahun}\r\n\t{$group}\r\n ";
$lst->fields = "k.*, m.Nama as NamaMhsw,\r\n k.TanggalUjian as _TglUjian,\r\n m.PenasehatAkademik, \r\n\tconcat('cna',k.Final) as _Cls,\r\n\tm.ProdiID as _ProdiID,\r\n\tif(prd.PilihanKompre = 'Y', \r\n\t\tconcat('<a href=\\'#\\' onclick=\"javascript:EditJadwal(0, ', \r\n\t\t\t\tk.KompreID,\r\n\t\t\t\t', \\'',\r\n\t\t\t\tm.ProdiID, \r\n\t\t\t\t'\\')\" title=\\'Edit Jadwal Ujian\\'><img src=\\'img/edit.jpg\\' /></a>'),\r\n\t\tconcat('<a href=\\'#\\' onclick=\"javascript:KomprehensifEdit(0, ', \r\n\t\t\t\tk.KompreID,\r\n\t\t\t\t')\" title=\\'Edit Jadwal Ujian\\'>',\r\n\t\t\t\t'<sup>', k.TanggalUjian, '</sup></a>')) as _Jadwal";
$lst->headerfmt = "<table class=box cellspacing=1 cellpadding=4 width=940>\r\n <tr><th class=ttl width=20>#</th>\r\n <th class=ttl width=150>NPM</th>\r\n <th class=ttl>Nama</th>\r\n\t\t<th class=ttl width=100>Tanggal Ujian</th>\r\n\t\t<th class=ttl width=80>Nilai</th>\r\n <th class=ttl width=100>Lulus Kompre</th>\r\n </tr>";
$lst->footerfmt = "</table></p>";
$lst->detailfmt = "<tr>\r\n <td class==_Cls= align=center>\r\n =NOMER=\r\n </td>\r\n <td class==_Cls= align=center>\r\n\t=MhswID=\r\n\t<hr size=1 color=silver />\r\n <sup>=TahunID=</sup>\r\n </td>\r\n <td class==_Cls=>=NamaMhsw=</td>\r\n\t<td align='center' class==_Cls=>=_Jadwal=</td>\r\n\t <td class==_Cls= align=center>=NilaiRata=</td>\r\n <td class==_Cls= align=center>\r\n <a href=\"javascript:DetailKompre(0,=KompreID=,'=_ProdiID=')\" title='Detail Ujian'><img src='img/=Lulus=.gif' /></a>\r\n </td>\r\n </tr>\r\n <tr><td bgcolor=silver colspan=8 height=1></td></tr>";
echo $lst->TampilkanData();
echo $ttl;
echo "<p>Hal.: " . $lst->TampilkanHalaman() . "<br />" . "Total: " . number_format($lst->MaxRowCount) . "</p>";
}