function TampilkanDaftarMhsw($lnk = '')
{
if (!empty($_SESSION['crkey']) && !empty($_SESSION['crval'])) {
$arrkey = array('NPM' => 'MhswID', 'Nama' => 'Nama');
$whr = $arrkey[$_SESSION['crkey']] . " like '%{$_SESSION['crval']}%'";
$ord = $arrkey[$_SESSION['crkey']];
// Tampilkan
include_once "class/dwolister.class.php";
$lst = new dwolister();
$lst->maxrow = 20;
$lst->page = $_SESSION['klinpage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux=dosen&gos=&klinpage==PAGE='>=PAGE=</a>";
$lst->tables = "mhsw m\r\n where m.{$whr} and ProdiID='11'\r\n order by m.{$ord}";
$lst->fields = "m.MhswID, m.Nama, m.TahunID, Telepon, Handphone, Alamat, Kota, NA ";
$lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4>\r\n\t<tr><th class=ttl>#</th>\r\n\t <th class=ttl>NPM</th>\r\n\t <th class=ttl>Nama</th>\r\n\t <th class=ttl>Angkatan</th>\r\n\t <th class=ttl>Telepon</th>\r\n\t <th class=ttl>Handphone</th>\r\n\t <th class=ttl>Alamat</th>\r\n\t <th class=ttl>Kota</th>\r\n </tr>";
$lst->detailfmt = "<tr>\r\n\t <td class=inp1 width=18 align=right>=NOMER=</td>\r\n\t <td class=cna=NA= nowrap><a href='{$lnk}'><img src='img/edit.png'>\r\n\t =MhswID=</a></td>\r\n\t <td class=cna=NA=>=Nama=</td>\r\n\t <td class=cna=NA=>=TahunID= </td>\r\n\t <td class=cna=NA=>=Telepon= </td>\r\n\t <td class=cna=NA=>=Handphone= </td>\r\n\t <td class=cna=NA=>=Alamat= </td>\r\n\t <td class=cna=NA=>=Kota= </td>\r\n\t </tr>";
$lst->footerfmt = "</table></p>";
echo $lst->TampilkanData();
$halaman = $lst->TampilkanHalaman();
$total = $lst->MaxRowCount;
$total = number_format($total);
echo "<p>Halaman : " . $halaman . "<br />" . "Total: " . $total . "</p>";
}
}
function DftrWisudawan($wsd)
{
// filter
$_whr = array();
if (!empty($_SESSION['prid'])) {
$_whr[] = "m.ProgramID='{$_SESSION['prid']}'";
}
if (!empty($_SESSION['prodi'])) {
$_whr[] = "m.ProdiID='{$_SESSION['prodi']}'";
}
$whr = empty($_whr) ? '' : " and " . implode(' and ', $_whr);
// Tombol delete
$del = date('Y-m-d') < $wsd['TglSelesai'] ? "<a href='?mnux=wisuda.daftar&gos=WisudawanDel&MhswID==MhswID='><img src='img/del.gif'></a>" : " ";
// Tampilkan
include_once "class/dwolister.class.php";
$lst = new dwolister();
$lst->maxrow = 20;
$lst->page = $_SESSION['wsdpage1'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux=wisuda.daftar&wsdpage1==PAGE='>=PAGE=</a>";
$lst->tables = "mhsw m\r\n left outer join wisudawan wn on m.MhswID=wn.MhswID\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 ta ta on m.TAID=ta.TAID \r\n where m.KodeID='{$_SESSION['KodeID']}' and m.WisudaID='{$wsd['WisudaID']}'\r\n {$whr}\r\n order by m.MhswID";
$lst->fields = "m.MhswID, m.Nama, m.TotalSKS, m.IPK, m.SKKeluar, m.TglSKKeluar, wn.*,\r\n date_format(m.TglSKKeluar, '%d-%m-%Y') as TGLSK,\r\n prg.Nama as PRG, prd.Nama as PRD, ta.Judul, ta.GradeNilai, ta.BobotNilai";
$lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4>\r\n <tr><th class=ttl>#</th>\r\n <th class=ttl>NPM<br />Nama</th>\r\n <th class=ttl>IPK</th>\r\n <th class=ttl>Judul</th>\r\n <th class=ttl>Nilai</th>\r\n <th class=ttl title='Hapus Mhsw Dari Daftar Wisuda'>Del</th>\r\n <th class=ttl colspan=2>SK Lulus</th>\r\n <th class=ul>»</th>\r\n <th class=ttl>Toga</th>\r\n <th class=ttl>Topi</th>\r\n <th class=ttl>Kalung</th>\r\n <th class=ttl>Surat Undangan</th>\r\n <th class=ttl>Foto</th>\r\n <th class=ttl>Ijazah</th>\r\n </tr>";
$lst->footerfmt = "</table></p>";
$lst->detailfmt = "<tr>\r\n <td class=inp>=NOMER=</td>\r\n <td class=ul nowrap><a href='?mnux=mhsw.inq.det&mhswid==MhswID=' title='Inquiry'>=MhswID=</a><br />=Nama=</td>\r\n <td class=ul align=right>=IPK=</td>\r\n <td class=ul>=Judul=</td>\r\n <td class=ul align=center>=GradeNilai=</td>\r\n <td class=ul align=center>{$del}</td>\r\n <td class=ul><input type=checkbox name='SKL[]' value==MhswID=></td>\r\n <td class=ul>=SKKeluar=<br />=TGLSK=</td>\r\n \r\n <td class=ul align=center><a href='?mnux=wisuda.daftar&gos=WsdProp&mhswid==MhswID='><img src='img/edit.png'></a></td>\r\n <td class=ul align=center><img src='img/=Toga=.gif'><br />=UkuranToga=</td>\r\n <td class=ul align=center><img src='img/=Topi=.gif'><br />=UkuranTopi=</td>\r\n <td class=ul align=center><img src='img/=Kalung=.gif'></td>\r\n <td class=ul align=center><img src='img/=Undangan=.gif'></td>\r\n <td class=ul align=center><img src='img/=Foto=.gif'></td>\r\n <td class=ul align=center><img src='img/=Ijazah=.gif'><br />=NomerIjazah=</td>\r\n </tr>";
echo $lst->TampilkanData();
echo "</form>";
echo "<p>Hal.: " . $lst->TampilkanHalaman() . "<br />";
echo "Total : " . $lst->MaxRowCount . "</p>";
}
function DftrPSSB()
{
// Akan ditampilkan atau langsung print?
$prn = '';
// Tampilkan Menu
echo "<p><a href='?mnux=pmb.pssb&gos=PSSBEDT&md=1'>Tambah Data PSB</a> |\r\n <a href='cetak/pmb.pssb.daftar.php?tahunpssb={$_SESSION['tahunpssb']}' target=_blank>Cetak Peserta PSB</a></p>";
$snm = session_name();
$sid = session_id();
// Tampilkan
$TOT = GetaField('pssb p
left outer join prodi prd on p.ProdiID=prd.ProdiID
left outer join program prg on p.ProgramID=prg.ProgramID', "p.TahunID='{$_SESSION['tahunpssb']}' and p.KodeID", $_SESSION['KodeID'], 'count(PSSBID)');
echo "<p><table class=box><tr><td class=ul>Jumlah Calon Mahasiswa PSB : <b>{$TOT}</b></td></tr></table></p>";
include_once "class/dwolister.class.php";
$lst = new dwolister();
$lst->maxrow = 20;
$lst->page = $_SESSION['pssbpage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux=pmb.pssb&pssbpage==PAGE='>=PAGE=</a>";
$lst->tables = "pssb p\r\n left outer join prodi prd on p.ProdiID=prd.ProdiID\r\n left outer join program prg on p.ProgramID=prg.ProgramID\r\n where p.TahunID='{$_SESSION['tahunpssb']}' and p.KodeID='{$_SESSION['KodeID']}'\r\n order by p.PSSBID desc";
$lst->fields = "p.*,\r\n prd.Nama as PRD, prg.Nama as PRG";
$lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4>\r\n <form action='cetak/pmb.pssb.cetak.php' name='LST' target=_blank>\r\n <input type=hidden name='tahunpssb' value='{$_SESSION['tahunpssb']}'>\r\n <input type=hidden name='prn' value='{$prn}'>\r\n <input type=hidden name='TglDUMulai' value='{$_SESSION['TglDUMulai']}'>\r\n <input type=hidden name='TglDUSelesai' value='{$_SESSION['TglDUSelesai']}'>\r\n <input type=hidden name='TglBayar' value='{$_SESSION['TglBayar']}'>\r\n <input type=hidden name='TglTangan' value='{$_SESSION['TglTangan']}'>\r\n <tr><th class=ttl>No.</th>\r\n <th class=ttl>No PSB</th>\r\n <th class=ttl>Nama</th>\r\n <th class=ttl>Program Studi</th>\r\n <th class=ttl>Telp/HP</th>\r\n <th class=ttl>Diskon<br />%</th>\r\n <th class=ttl title='Cetak batch'>Batch<br />\r\n <input type=submit name='Cetak' value='Cetak'></th>\r\n <th class=ttl title='Surat Pemberitahuan'>Surat</th>\r\n <th class=ttl title='Hapus'>Hapus</th>\r\n </tr>";
$lst->footerfmt = "</form></table></p>";
$lst->detailfmt = "<tr>\r\n <td class=inp1>=NOMER=</td>\r\n <td class=ul><a href='?mnux=pmb.pssb&gos=PSSBEDT&pssbid==PSSBID='><img src='img/edit.png'>\r\n =PSSBID=</a></td>\r\n <td class=ul>=Nama=</td>\r\n <td class=ul>=ProgramID= - =PRD=</td>\r\n <td class=ul>=Telepon=/=Handphone=</td>\r\n <td class=ul align=right>=Diskon=</td>\r\n <td class=ul align=center><input type=checkbox name='pssbid[]' value='=PSSBID=' checked></td>\r\n <td class=ul align=center><a href='cetak/pmb.pssb.cetak.php?pssbid[]==PSSBID=&tahunpssb={$_SESSION['tahunpssb']}&TglDUMulai={$_SESSION['TglDUMulai']}&TglDUSelesai={$_SESSION['TglDUSelesai']}&TglBayar={$_SESSION['TglBayar']}&TglTangan={$_SESSION['TglTangan']}&prn={$prn}' target=_blank><img src='img/printer.gif'></a></td>\r\n <td class=ul align=center><a href='?mnux=pmb.pssb&gos=PSSBDEL&pssbid==PSSBID='><img src='img/del.gif'></a></td>\r\n </tr>";
echo $lst->TampilkanData();
echo "<p>Hal.: " . $lst->TampilkanHalaman() . "</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 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 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 DispDispensasi()
{
include_once "class/dwolister.class.php";
echo "<p><a href='?mnux=dispensasi&gos=DispensasiEdt&md=1'>Buat Surat Dispensasi</a></p>";
$whr = '';
$whr = empty($_SESSION['crdispid']) ? '' : "DispensasiID like '%{$_SESSION['crdispid']}%' ";
$whr = empty($whr) ? '' : "where " . $whr;
$lst = new dwolister();
$lst->tables = "dispensasi {$whr}\r\n order by Tanggal Desc";
$lst->fields = "*, date_format(Tanggal, '%d/%m/%Y') as TGL,\r\n date_format(SampaiTanggal, '%d/%m/%Y') as STGL";
$lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4>\r\n <tr><th class=ttl>No.</th>\r\n <th class=ttl>Nomer Surat</th>\r\n <th class=ttl>Tertanggal</th>\r\n <th class=ttl>Mahasiswa</th>\r\n <th class=ttl>Perihal</th>\r\n </tr>";
$lst->footerfmt = "</table></p>";
$lst->detailfmt = "<tr><td class=inp1>=NOMER=</td>\r\n <td class=ul><a href='?mnux=dispensasi&gos=DispensasiEdt&md=0&dispid==DispensasiID='><img src='img/edit.png'>\r\n =DispensasiID=</a></td>\r\n <td class=ul>=TGL= ~ =STGL=</td>\r\n <td class=ul>=MhswID=</td>\r\n <td class=ul>=Judul=</td>\r\n </tr>";
echo $lst->TampilkanData();
echo "<p>Halaman: " . $lst->TampilkanHalaman() . "</p>";
}
function DaftarMhsw($mnux, $lnk = '', $keluar = 0)
{
include_once "class/dwolister.class.php";
$inqMhswPage = GetSetVar('inqMhswPage');
$arrKey = array('NPM' => '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 dwolister();
$lst->page = $_SESSION['inqMhswPage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux={$lnk}&inqMhswPage==PAGE='>=PAGE=</a>";
$lst->tables = "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";
$lst->fields = "m.MhswID, m.Nama, m.ProgramID, m.ProdiID, m.SKKeluar, m.Foto,\r\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>\r\n <tr><th class=ttl>#</th>\r\n <th class=ttl>No Mhsw</th>\r\n <th class=ttl>Nama Mhsw</th>\r\n <th class=ttl>Program</th>\r\n <th class=ttl>Program Studi</th>\r\n <th class=ttl>Status</th>\r\n <th class=ttl>SK Lulus/Keluar</th>\r\n </tr>";
$lst->footerfmt = "</table></p>";
$lst->detailfmt = "<tr><td class=inp1>=NOMER=</td>\r\n <td class=cna=Keluar=><a href='?mnux={$mnux}&mhswid==MhswID=&{$lnk}'><img src='img/edit.png'>\r\n =MhswID=</a></td>\r\n <td class=cna=Keluar=><a id='=MhswID=' class='jTip' name=' Foto Mahasiswa' href='cetak/foto.pop.php?width=156&mhswid==MhswID=&foto==Foto='>=Nama=</a></td>\r\n <td class=cna=Keluar=>=ProgramID=-=PRG=</td>\r\n <td class=cna=Keluar=>=ProdiID=-=PRD=</td>\r\n <td class=cna=Keluar=>=SM=</td>\r\n <td class=cna=Keluar=>=SKKeluar= </td>\r\n </tr>";
echo $lst->TampilkanData();
echo "Halaman : " . $lst->TampilkanHalaman();
}
function DftrCama($gels, $gel)
{
TampilkanHeader($gels, $gel);
global $_maxbaris, $arrUrut;
include_once "class/dwolister.class.php";
// Urutan
$_urut = $arrUrut[$_SESSION['_pmbUrut']];
$__urut = explode('~', $_urut);
$urut = "order by " . $__urut[1];
// Filter formulir
$whr = array();
if (!empty($_SESSION['_pmbFrmID'])) {
$whr[] = "p.PMBFormulirID='{$_SESSION['_pmbFrmID']}'";
}
if (!empty($_SESSION['_pmbPrg'])) {
$whr[] = "p.ProgramID = '{$_SESSION['_pmbPrg']}' ";
}
if (!empty($_SESSION['_pmbNama'])) {
$whr[] = "p.Nama like '%{$_SESSION['_pmbNama']}%'";
}
if (!empty($_SESSION['_pmbNomer'])) {
$whr[] = "p.PMBID like '%{$_SESSION['_pmbNomer']}%'";
}
$_whr = implode(' and ', $whr);
$_whr = empty($_whr) ? '' : 'and ' . $_whr;
$NIMSementara = GetaField('prodi', 'ProdiID', $pmb['ProdiID'], 'GunakanNIMSementara');
$pagefmt = "<a href='?mnux={$_SESSION['mnux']}&gos=&_pmbPage==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 = "pmb p \r\n left outer join pmbformulir f on p.PMBFormulirID = f.PMBFormulirID\r\n left outer join prodi _p on p.ProdiID = _p.ProdiID\r\n left outer join program _prg on p.ProgramID = _prg.ProgramID\r\n left outer join statusawal _sta on p.StatusAwalID = _sta.StatusAwalID\r\n\tleft outer join mhsw m on m.MhswID = p.MhswID\r\n where p.KodeID = '" . KodeID . "' \r\n and p.PMBPeriodID='{$gel}'\r\n {$_whr}\r\n {$urut}";
$lst->fields = "p.PMBID, p.MhswID, p.Nama, p.Kelamin, \r\n p.ProdiID, p.Pilihan1, p.Pilihan2, p.Pilihan3,\r\n f.Nama as FRM, p.LulusUjian, m.NIMSementara,\r\n _p.Nama as Prodi,\r\n _sta.Nama as STA, _prg.Nama as PRG,\r\n format(p.TotalBiaya, 0) as _TotalBiaya,\r\n format(p.TotalBayar, 0) as _TotalBayar,\r\n if (p.LulusUjian = 'Y', \r\n if (p.MhswID is NULL or p.MhswID = '',\r\n concat('<a href=\\'?mnux={$_SESSION['mnux']}&gos=MhswBaruEdt&PMBID=', p.PMBID, '\\'>\r\n <img src=\\'img/edit.jpg\\' width=30 title=\\'Pembayaran dan pemrosesan Cama\\' /></a>'),\r\n '<img src=\\'img/lock.jpg\\' width=30 title=\\'Sudah diproses menjadi mahasiswa\\' />'), '×') as EDT,\r\n\t if (p.LulusUjian = 'Y',\r\n\t concat('<a href=\\'#\\' onClick=\"javascript:CetakKartu(\\'', p.PMBID, '\\',\\'', m.NIMSementara, '\\')\" /><img src=\\'img/printer2.gif\\' /></a>'),\r\n\t ' ') as _ktm";
$lst->page = $_SESSION['_pmbPage'] + 0;
$lst->maxrow = $_maxbaris;
$lst->pages = $pagefmt;
$lst->pageactive = $pageoff;
$lst->headerfmt = "<p><table class=box cellspacing=1 align=center width=1000>\r\n \r\n <tr>\r\n <th class=ttl colspan=2>#</th>\r\n <th class=ttl>\r\n PMB #\r\n <hr size=1 color=silver />\r\n NIM\r\n </th>\r\n <th class=ttl colspan=2>Nama</th>\r\n <th class=ttl>\r\n Status\r\n <hr size=1 color=silver />\r\n Kelulusan\r\n </th>\r\n <th class=ttl>Formulir<hr size=1 color=silver />Program</th>\r\n <th class=ttl>Prodi</th>\r\n <th class=ttl width=100>BIPOT\r\n <a href='#' onClick=\"alert('Jumlah Biaya yg harus dibayarkan oleh Cama pada tahap 1 pembayaran')\"><img src='img/info.gif' /></a>\r\n <hr size=1 color=silver />\r\n Bayar</th>\r\n <th class=ttl> </th>\r\n </tr>";
$lst->detailfmt = "<tr>\r\n <td class=inp width=10>=NOMER=</td>\r\n <td class=ul1 width=10 align=center>\r\n =EDT=\r\n </td>\r\n <td class=ul width=80 align=center>\r\n =PMBID= \r\n <hr size=1 color=silver />\r\n <sub>=MhswID=</sub>\r\n </td>\r\n <td class=cnn=LulusUjian=>=Nama=</td>\r\n <td class=cnn=LulusUjian= width=10 align=center><img src='img/=Kelamin=.bmp' /></td>\r\n <td class=cnn=LulusUjian= width=70 align=center>\r\n =STA=\r\n <hr size=1 color=silver />\r\n <img src='img/=LulusUjian=.gif' />\r\n </td>\r\n <td class=cnn=LulusUjian= width=120>\r\n =FRM= \r\n <hr size=1 color=silver />\r\n =PRG= \r\n </td>\r\n <td class=cnn=LulusUjian= width=200>\r\n =ProdiID=\r\n <hr size=1 color=silver />\r\n =Prodi= </td>\r\n <td class=cnn=LulusUjian= align=right>\r\n =_TotalBiaya=\r\n <hr size=1 color=silver />\r\n =_TotalBayar=\r\n </td>\r\n <td class=ul1 width=10 align=center>\r\n =_ktm=\r\n </td>\r\n </tr>" . $gantibrs;
$lst->footerfmt = "</table>\r\n\t<script>\r\n\t\tfunction CetakKartu(pmbid,ob)\r\n\t\t{\t\r\n\t\t\tif (ob == 'Y'){\r\n\t\t\t\talert ('Mahasiswa ini masih memiliki NIM Sementara. \\n Lakukan Konversi NIM terlebih dahulu');\r\n\t\t\t} else {\r\n\t\t\t\tlnk = \"{$_SESSION['mnux']}.ktm.php?pmbid=\"+pmbid;\r\n\t\t\t\t win2 = window.open(lnk, \"\", \"width=600, height=400, scrollbars, resizable, status\");\r\n\t\t\t\t if (win2.opener == null) childWindow.opener = self;\r\n\t\t\t }\r\n\t\t}\r\n\t</script>";
$hal = $lst->TampilkanHalaman();
$ttl = $lst->MaxRowCount;
echo $lst->TampilkanData();
echo "<p align=center>Hal: {$hal} <br />(Tot: {$ttl})</p>";
}
function DaftarMhswBipot($mnux = 'mhswmasterbipot', $lnk = '')
{
include_once "class/dwolister.class.php";
$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;
$lst = new dwolister();
$lst->tables = "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 left outer join bipot bpt on m.BIPOTID=bpt.BIPOTID\r\n {$whr}\r\n order by m.MhswID";
$lst->fields = "m.MhswID, m.Nama, m.ProgramID, m.ProdiID, m.BIPOTID,\r\n bpt.Nama as BPT,\r\n prg.Nama as PRG, prd.Nama as PRD, sm.Nama as SM";
$lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4>\r\n <tr><th class=ttl>#</th>\r\n <th class=ttl>No Mhsw</th>\r\n <th class=ttl>Nama Mhsw</th>\r\n <th class=ttl>Master BIPOT</th>\r\n <th class=ttl>Program</th>\r\n <th class=ttl>Program Studi</th>\r\n <th class=ttl>Status</th>\r\n </tr>";
$lst->footerfmt = "</table></p>";
$lst->detailfmt = "<tr><td class=inp1>=NOMER=</td>\r\n <td class=ul>=MhswID=</td>\r\n <td class=ul>=Nama=</td>\r\n <td class=ul><a href='?mnux=mhswmasterbipot&gos=BPTEDT&mhswid==MhswID='><img src='img/edit.png'>\r\n =BPT=</a></td>\r\n <td class=ul>=ProgramID=-=PRG=</td>\r\n <td class=ul>=ProdiID=-=PRD=</td>\r\n <td class=ul>=SM=</td>\r\n </tr>";
echo $lst->TampilkanData();
echo "Hal. : " . $lst->TampilkanHalaman();
}
function wPeriodeDftr()
{
echo "<p><a href='?mnux=wisuda&token=wPeriodeEdt&md=1'>Tambah Periode Wisuda</a></p>";
// Tampilkan
include_once "class/dwolister.class.php";
$lst = new dwolister();
$lst->maxrow = 20;
$lst->page = $_SESSION['wsdpage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux=wisuda&wsdpage==PAGE='>=PAGE=</a>";
$lst->tables = "wisuda w\r\n where w.KodeID='{$_SESSION['KodeID']}'\r\n order by w.WisudaID desc";
$lst->fields = "*,\r\n date_format(TglMulai, '%d/%m/%Y') as TM,\r\n date_format(TglSelesai, '%d/%m/%Y') as TS,\r\n date_format(TglWisuda, '%d/%m/%Y') as TW";
$lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4>\r\n <tr><th class=ttl>No.</th>\r\n <th class=ttl>Nama</th>\r\n <th class=ttl colspan=2>Pendaftaran</th>\r\n <th class=ttl>Wisuda</th>\r\n <th class=ttl>Aktif</th>\r\n </tr>";
$lst->footerfmt = "</table></p>";
$lst->detailfmt = "<tr>\r\n <td class=ul><a href='?mnux=wisuda&token=wPeriodeEdt&md=0&WisudaID==WisudaID='><img src='img/edit.png'>\r\n =WisudaID=</a></td>\r\n <td class=cna=NA=>=Nama=</td>\r\n <td class=cna=NA=>=TM=</td>\r\n <td class=cna=NA=>=TS=</td>\r\n <td class=cna=NA=>=TW=</td>\r\n <td class=ul align=center><img src='img/book=NA=.gif'></td>\r\n </tr>";
echo $lst->TampilkanData();
echo "<p>Hal.: " . $lst->TampilkanHalaman() . "</p>";
}
function daftar()
{
include_once "class/dwolister.class.php";
$lst = new dwolister();
$lst->maxrow = 20;
$lst->page = $_SESSION['mhswpage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux=inq.mhswbaru.mundur&mhswpage==PAGE='>=PAGE=</a>";
$lst->tables = "pmbmundur \r\n left outer join pmb on pmbmundur.PMBID = pmb.PMBID\r\n left outer join prodi p on pmb.ProdiID = p.ProdiID\r\n left outer join StatusAwal sa on pmb.StatusAwalID = sa.StatusAwalID\r\n where pmb.PMBPeriodID = '{$_SESSION['periode']}' and \r\n pmb.{$_SESSION['Cari']} like '%{$_SESSION['pmbid']}%'\r\n order by pmb.{$_SESSION['Cari']}";
$lst->fields = "pmbmundur.*, pmb.Nama as MHSW, p.Nama as PRD, sa.Nama as SA";
$lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4>\r\n <tr><th class=ttl>No.</th>\r\n <th class=ttl>PMBID</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>No. Surat</th>\r\n <th class=ttl>Tanggal Proses</th>\r\n </tr>";
$lst->footerfmt = "</table></p>";
$lst->detailfmt = "<tr>\r\n <td class=inp1>=NOMER=</td>\r\n <td class=ul><a href='javascript:DetailPMB(=PMBID=)'>=PMBID=</a></td>\r\n <td class=ul nowrap>=MHSW=</td>\r\n <td class=ul>=PRD=</td>\r\n <td class=ul>=SA=</td>\r\n <td class=ul>=NoSurat=</td>\r\n <td class=ul>=TglProses=</td>\r\n </tr>";
echo $lst->TampilkanData();
echo $ttl;
echo "<p>Hal.: " . $lst->TampilkanHalaman() . "<br />" . "Total: " . number_format($lst->MaxRowCount) . "</p>";
echo "<SCRIPT LANGUAGE='JavaScript1.2'>\r\n <!--\r\n function DetailPMB(PMBID){\r\n lnk = \"pmb.inq.det.php?PMBID=\"+PMBID;\r\n win2 = window.open(lnk, '', 'width=600, height=600, scrollbars, status');\r\n win2.creator = self;\r\n }\r\n -->\r\n </script>\r\n ";
}
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 DftrPMB()
{
include_once "class/dwolister.class.php";
TampilkanDetailPMB();
$whr = array();
//if (!empty($_SESSION['inqTahun'])) $whr[] = " p.PMBID like '$_SESSION[pmbaktif]%'";
if (!empty($_SESSION['inqPMBID'])) {
$whr[] = " p.PMBID like '{$_SESSION['inqPMBID']}%' ";
}
if (!empty($_SESSION['inqNama'])) {
$whr[] = " p.Nama like '%{$_SESSION['inqNama']}%' ";
}
if (!empty($_SESSION['inqBuktiSetoran'])) {
$whr[] = "p.PMBFormJualID like '%{$_SESSION['inqBuktiSetoran']}%' ";
}
if (!empty($_SESSION['inqKelamin'])) {
$whr[] = " p.Kelamin='{$_SESSION['inqKelamin']}' ";
}
if (!empty($_SESSION['inqJenisSekolahID'])) {
$whr[] = " p.JenisSekolahID='{$_SESSION['inqJenisSekolahID']}' ";
}
if (!empty($_SESSION['inqAgama'])) {
$whr[] = " p.Agama='{$_SESSION['inqAgama']}' ";
}
if (!empty($_SESSION['inqpmbfid'])) {
$whr[] = " PMBFormulirID='{$_SESSION['inqpmbfid']}'";
}
$strwhr = empty($whr) ? '' : "where " . implode(" and ", $whr);
//echo $strwhr;
$lst = new dwolister();
$lst->tables = "pmb p\r\n left outer join program prg on p.ProgramID=prg.ProgramID\r\n left outer join prodi prd on p.ProdiID=prd.ProdiID\r\n {$strwhr}\r\n order by p.PMBID";
$lst->fields = "p.*,\r\n prg.Nama as PRG, prd.Nama as PRD";
$lst->page = $_SESSION['inqPMBPage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux=pmb.inq&gos=DftrPMB&inqPMBPage==PAGE='>=PAGE=</a>";
$lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4>\r\n <tr><th class=ttl>#</th>\r\n <th class=ttl>No PMB</th>\r\n\t<th class=ttl>NPM</th>\r\n <th class=ttl>Nama Mhsw</th>\r\n <th class=ttl>Program</th>\r\n <th class=ttl>Program Studi</th>\r\n <th class=ttl>No Kwitansi</th>\r\n <th class=ttl>Sex</th>\r\n <th class=ttl>Alamat</th>\r\n <th class=ttl>Kota</th>\r\n <th class=ttl>Telepon</th>\r\n <th class=ttl>Handphone</th>\r\n </tr>";
$lst->footerfmt = "</table></p>";
//http://localhost/semarang/?mnux=pmbform&gos=PMBEdt0&md=0&pmbid=200620001
//<a href='?mnux=pmbform&gos=PMBEdt0&pmbid==PMBID=&md=0'>
$lst->detailfmt = "<tr><td class=inp1>=NOMER=</td>\r\n <td class=ul nowrap><a href='javascript:DetailPMB(=PMBID=)'><img src='img/edit.png'>\r\n =PMBID=</a></td>\r\n\t<td class=ul>=NIM= </td>\r\n <td class=ul>=Nama=</td>\r\n <td class=ul>=ProgramID=-=PRG=</td>\r\n <td class=ul>=ProdiID=-=PRD=</td>\r\n <td class=ul>=PMBFormJualID= </td>\r\n <td class=ul>=Kelamin= </td>\r\n <td class=ul>=Alamat= </td>\r\n <td class=ul>=Kota= =KodePos=</td>\r\n <td class=ul>=Telepon= </td>\r\n <td class=ul>=Handphone= </td>\r\n </tr>";
echo $lst->TampilkanData();
echo "Halaman : " . $lst->TampilkanHalaman();
}
function InqPresPerMK()
{
include_once "class/dwolister.class.php";
$lst = new dwolister();
$lst->maxrow = 20;
$lst->page = $_SESSION['mhswpage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux=mhsw&mhswpage==PAGE='>=PAGE=</a>";
$lst->tables = "jadwal j left outer join dosen d on d.Login = j.DosenID \r\n\t\t\t\t\t\t\t\t\twhere j.TahunID = '{$_SESSION['tahun']}'\r\n\t\t\t\t\t\t\t\t\tand j.NameKelas <> 'KLINIK'\r\n\t\t\t\t\t\t\t\t\tOrder by j.MKKode, j.NamaKelas";
$lst->fields = "j.*, d.Nama as Dosen";
$lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4>\r\n <tr><th class=ttl>No.</th>\r\n <th class=ttl>Kode</th>\r\n <th class=ttl>Mata Kuliah</th>\r\n <th class=ttl>Kelas</th>\r\n <th class=ttl>Jenis</th>\r\n <th class=ttl>Dosen</th>\r\n <th class=ttl>Persen</th>\r\n </tr>";
$lst->footerfmt = "</table></p>";
$lst->detailfmt = "<tr>\r\n <td class=inp1>=NOMER=</td>\r\n <td class=cna>=MKKode=</td>\r\n <td class=cna>=Nama=</td>\r\n <td class=cna>=NamaKelas=</td>\r\n <td class=cna>=SM=</td>\r\n <td class=cna>=Telepon=/=Handphone=</td>\r\n <td class=cna>=Alamat=, =Kota=</td>\r\n </tr>";
echo $lst->TampilkanData();
echo $ttl;
echo "<p>Hal.: " . $lst->TampilkanHalaman() . "<br />" . "Total: " . number_format($lst->MaxRowCount) . "</p>";
$s = "select j.*, LEFT(j.Nama, 30) as NM\r\n from jadwal j\r\n where j.TahunID='{$tahun}'\r\n and INSTR(j.ProgramID, '.{$prid}.')>0\r\n and INSTR(j.ProdiID, '.{$prodi}.')>0\r\n and j.NamaKelas <> 'KLINIK'\r\n order by j.MKKode, j.NamaKelas";
$r = _query($s);
}
function DftrPerusahaan()
{
$order = empty($_SESSION['_datakey']) ? 'MhswID' : $_SESSION['_datakey'] == 'NPM' ? 'MhswID' : $_SESSION['_datakey'];
$_whr = empty($_SESSION['_dataval']) ? '' : "and m.{$order} like '%{$_SESSION['_dataval']}%' ";
// tampilkan
include_once "class/dwolister.class.php";
$lst = new dwolister();
$lst->maxrow = 20;
$lst->page = $_SESSION['_datapage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux=bn.carrer&_datapage==PAGE='>=PAGE=</a>";
$lst->tables = "perusahaan p\r\n {$_whr}\r\n order by p.{$order}";
$lst->fields = "p.PerusahaanID, p.Nama, p.Alamat, \r\n p.Telepon, p.Handphone, p.Email, p.Kota";
$lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4>\r\n <tr><th class=ttl>No.</th>\r\n <th class=ttl>Perusahaan ID</th>\r\n <th class=ttl>Nama</th>\r\n <th class=ttl>Alamat</th>\r\n <th class=ttl>Kota</th>\r\n <th class=ttl>Telp, HP</th>\r\n <th class=ttl>Email</th>\r\n </tr>";
$lst->footerfmt = "</table></p>";
$lst->detailfmt = "<tr>\r\n <td class=inp1>=NOMER=</td>\r\n <td class=ul><a href='?mnux=bn.carrer.det&PerusahaanID==PerusahaanID='><img src='img/edit.png'>\r\n =PerusahaanID=</a></td>\r\n <td class=ul nowrap>=Nama=</td>\r\n <td class=ul>=Alamat=</td>\r\n <td class=ul>=Kota=</td>\r\n <td class=ul>=Telepon=, =Handphone=</td>\r\n <td class=ul>=Email=</td>\r\n </tr>";
echo $lst->TampilkanData();
echo $ttl;
echo "<p>Hal.: " . $lst->TampilkanHalaman() . "<br />" . "Total: " . number_format($lst->MaxRowCount) . "</p>";
}
function DftrAlumni()
{
$order = empty($_SESSION['_alumnikey']) ? 'MhswID' : $_SESSION['_alumnikey'] == 'NPM' ? 'MhswID' : $_SESSION['_alumnikey'];
$_whr = empty($_SESSION['_alumnival']) ? '' : "and m.{$order} like '%{$_SESSION['_alumnival']}%' ";
// tampilkan
include_once "class/dwolister.class.php";
$lst = new dwolister();
$lst->maxrow = 20;
$lst->page = $_SESSION['_alumnipage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux=alumni&_alumnipage==PAGE='>=PAGE=</a>";
$lst->tables = "mhsw m\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 m.StatusMhswID='L'\r\n {$_whr}\r\n order by m.{$order}";
$lst->fields = "m.MhswID, m.Nama, m.StatusAwalID, m.StatusMhswID,\r\n m.Telepon, m.Handphone, m.Email,\r\n m.ProgramID, m.ProdiID, m.Alamat, m.Kota,\r\n m.TahunKeluar, prd.Nama as PRD";
$lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4>\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>Tahun<br />Lulus</th>\r\n <th class=ttl>Program<br />Studi</th>\r\n <th class=ttl>Telp, HP</th>\r\n <th class=ttl>Alamat</th>\r\n </tr>";
$lst->footerfmt = "</table></p>";
$lst->detailfmt = "<tr>\r\n <td class=inp1>=NOMER=</td>\r\n <td class=ul><a href='?mnux=alumni.det&AlumniID==MhswID='><img src='img/edit.png'>\r\n =MhswID=</a></td>\r\n <td class=ul nowrap>=Nama=</td>\r\n <td class=ul>=TahunKeluar= </td>\r\n <td class=ul>=ProgramID= - =ProdiID=</td>\r\n <td class=ul>=Telepon=, =Handphone=</td>\r\n <td class=ul>=Alamat=, =Kota=</td>\r\n </tr>";
echo $lst->TampilkanData();
echo $ttl;
echo "<p>Hal.: " . $lst->TampilkanHalaman() . "<br />" . "Total: " . number_format($lst->MaxRowCount) . "</p>";
}
function DaftarDosen($mnux = '', $lnk = '', $fields = '')
{
global $_defmaxrow, $_FKartuUSM;
include_once "class/dwolister.class.php";
//$lnk = "gos=DsnEdt&md=0&dsnid==Login="******"<th class=ttl>" . $_f[$i] . "</th>";
$brs .= "<td class=cna=NA=>=" . $_f[$i] . "= </td>";
}
$whr = array();
if (!empty($_SESSION['dsnkeycr']) && !empty($_SESSION['dsncr'])) {
if ($_SESSION['dsnkeycr'] == 'Login') {
$whr[] = "{$_SESSION['dsnkeycr']} like '{$_SESSION['dsncr']}%'";
} else {
$whr[] = "{$_SESSION['dsnkeycr']} like '%{$_SESSION['dsncr']}%'";
}
}
$where = implode(' and ', $whr);
$where = empty($where) ? '' : "and {$where}";
$hom = empty($_SESSION['prodi']) ? '' : "and Homebase = '{$_SESSION['prodi']}'";
$lst = new dwolister();
$lst->maxrow = 20;
$lst->page = $_SESSION['dsnpage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux={$mnux}&gos=&dsnpage==PAGE='>=PAGE=</a>";
$lst->tables = "dosen\r\n where KodeID='{$_SESSION['KodeID']}' {$where} {$hom}\r\n order by {$_SESSION['dsnurt']}";
$lst->fields = "* ";
$lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4>\r\n <tr>\r\n\t <th class=ttl>#</th>\r\n\t <th class=ttl>Login/NIP</th>\r\n {$hdr}\r\n\t <th class=ttl>NA</th>\r\n </tr>";
$lst->detailfmt = "<tr>\r\n\t <td class=inp1 width=18 align=right>=NOMER=</td>\r\n <td class=cna=NA=><a href=\"?mnux={$mnux}&{$lnk}\"><img src='img/edit.png' border=0>\r\n =Login=</a></td>\r\n {$brs}\r\n\t <td class=cna=NA= align=center><img src='img/book=NA=.gif'></td>\r\n\t </tr>";
$lst->footerfmt = "</table></p>";
echo $lst->TampilkanData();
$halaman = $lst->TampilkanHalaman();
$total = $lst->MaxRowCount;
$total = number_format($total);
echo "<p>Halaman : " . $halaman . "<br />" . "Total: " . $total . "</p>";
}
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 StatusMhsw()
{
TampilkanHeader();
global $arrUrutMhsw;
$_maxbaris = 10;
include_once "class/dwolister.class.php";
// Urutan
if ($_SESSION['_LevelID'] == 1) {
$edit = "<a href='#' onClick=\"location='?mnux={$_SESSION['mnux']}&gos=StatusMhswEdt&md=0&id==ProsesStatusMhswID='\" />\n <img src='img/edit.png' /></a>";
}
$_urut = $arrUrutMhsw[$_SESSION['_statusmhswUrut']];
$__urut = explode('~', $_urut);
$urut = "order by " . $__urut[1];
// Filter formulir
$whr = array();
if (!empty($_SESSION['_statusmhswNomer'])) {
$whr[] = "psm.MhswID like '%{$_SESSION['_statusmhswNomer']}%'";
}
if (!empty($_SESSION['_statusmhswProdi'])) {
$whr[] = "m.ProdiID = '{$_SESSION['_statusmhswProdi']}' ";
}
if (!empty($_SESSION['_statusmhswPrg'])) {
$whr[] = "m.ProgramID = '{$_SESSION['_statusmhswPrg']}' ";
}
if (!empty($_SESSION['_statusmhswNama'])) {
$whr[] = "m.Nama like '%{$_SESSION['_statusmhswNama']}%'";
}
if (!empty($_SESSION['_statusmhswID'])) {
$whr[] = "psm.StatusMhswID = '{$_SESSION['_statusmhswID']}'";
}
$_whr = implode(' and ', $whr);
$_whr = empty($_whr) ? '' : 'and ' . $_whr;
$pagefmt = "<a href='?mnux={$_SESSION['mnux']}&gos=&_statusmhswPage==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 = "prosesstatusmhsw psm\n\tleft outer join mhsw m on psm.MhswID = m.MhswID\n left outer join prodi _prd on m.ProdiID = _prd.ProdiID\n\tleft outer join program _prg on m.ProgramID = _prg.ProgramID\n left outer join statusmhsw _stm on psm.StatusMhswLama = _stm.StatusMhswID\n\tleft outer join statusmhsw _stm2 on psm.StatusMhswID = _stm2.StatusMhswID\n where psm.KodeID = '" . KodeID . "' \n {$_whr}\n {$urut}";
$lst->fields = "DISTINCT(psm.ProsesStatusMhswID), psm.MhswID, m.Nama, m.Kelamin, m.ProgramID, m.ProdiID, psm.StatusMhswLama, psm.StatusMhswID, psm.NA,\n\t\t\t\t\t_prg.Nama as _PRG, \n\t\t\t\t\t_stm.Nama as NamaStatusLama, _stm2.Nama as NamaStatusBaru";
//$lst->startrow = $_SESSION['_statusmhswPage']+0;
$lst->maxrow = $_maxbaris;
$lst->pages = $pagefmt;
$lst->pageactive = $pageoff;
$lst->page = $_SESSION['_statusmhswPage'] + 0;
$lst->headerfmt = "<p><table class=box cellspacing=1 align=center width=600>\n \n <tr>\n <th class=ttl colspan=2>#</th>\n <th class=ttl>NIM</th>\n <th class=ttl colspan=2>Nama</th>\n <th class=ttl>Prodi<hr size=1 color=silver />Program</th>\n\t<th class=ttl>Status Baru<hr size=1 color=silver />Status Lama</th>\n <th class=ttl> </th>\n </tr>";
$lst->detailfmt = "<tr>\n <td class=inp width=10>=NOMER=</td>\n <td class=ul1 width=10>\n {$edit}\n </td>\n <td class=ul1 width=80>=MhswID=</td>\n <td class=cna=NA=>=Nama=</td>\n <td class=cna=NA= width=10 align=center><img src='img/=Kelamin=.bmp' /></td>\n <td class=cna=NA= width=120 align=center>\n =ProdiID= \n <hr size=1 color=silver />\n =_PRG= \n </td>\n\t<td class=cna=NA= width=120 align=center>\n\t =NamaStatusBaru= \n\t <hr size=1 color=silver />\n\t <font color=silver>=NamaStatusLama=</font> </td>\n\t<td class=cna=NA= width=15 align=center><a href='#' onClick=\"PrintSurat(=ProsesStatusMhswID=)\"><img title='Surat Keterangan' src='img/printer2.gif'></a>\n\t </td>\n </tr>" . $gantibrs;
$lst->footerfmt = "</table>\n <script>\n\t\tfunction PrintSurat(id)\n\t\t{\tlnk = '{$_SESSION['mnux']}.keterangan.php?_psmid='+id;\n\t\t\twin2 = window.open(lnk, '', 'width=600, height=500, scrollbars, status');\n\t\t\tif (win2.opener == null) childWindow.opener = self;\n\t\t}\n\t</script>";
$hal = $lst->TampilkanHalaman($pagefmt, $pageoff);
$ttl = $lst->MaxRowCount;
echo $lst->TampilkanData();
echo "<p align=center>Hal: {$hal} <br />(Tot: {$ttl})</p>";
}
function DftrPMB($gels, $gel)
{
TampilkanHeader($gels, $gel);
global $_maxbaris, $arrUrut;
include_once "class/dwolister.class.php";
$hr = "<hr size=1 color=silver />";
$rs = "rowspan=3";
$rsm = "rowspan=2";
// Urutan
$_urut = $arrUrut[$_SESSION['_pmbUrut']];
$__urut = explode('~', $_urut);
$urut = "order by " . $__urut[1];
// Filter formulir
$whr = array();
if (!empty($_SESSION['_pmbFrmID'])) {
$whr[] = "p.PMBFormulirID='{$_SESSION['_pmbFrmID']}'";
}
if (!empty($_SESSION['_pmbPrg'])) {
$whr[] = "p.ProgramID = '{$_SESSION['_pmbPrg']}' ";
}
if (!empty($_SESSION['_pmbNama'])) {
$whr[] = "p.Nama like '%{$_SESSION['_pmbNama']}%'";
}
if (!empty($_SESSION['_pmbNomer'])) {
$whr[] = "p.PMBID like '%{$_SESSION['_pmbNomer']}%'";
}
if ($_SESSION[_LevelID] == 50) {
$whr[] = "p.StatusAwalID = 'PM'";
} else {
$whr[] = " p.StatusAwalID != 'PM'";
}
$_whr = implode(' and ', $whr);
$_whr = empty($_whr) ? '' : 'and ' . $_whr;
$pagefmt = "<a href='?mnux={$_SESSION['mnux']}&gos=&_pmbPage==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 = "pmb p \r\n left outer join pmbformulir f on p.PMBFormulirID = f.PMBFormulirID\r\n left outer join program _prg on p.ProgramID = _prg.ProgramID\r\n left outer join prodi _p1 on p.Pilihan1 = _p1.ProdiID\r\n left outer join prodi _p2 on p.Pilihan2 = _p2.ProdiID\r\n left outer join prodi _p3 on p.Pilihan3 = _p3.ProdiID\r\n left outer join statusawal _sta on p.StatusAwalID = _sta.StatusAwalID\r\n left outer join wawancara w on p.PMBID = w.PMBID and w.Tanggal = (select max(Tanggal) from wawancara where PMBID=p.PMBID group by PMBID)\r\n\tleft outer join asalsekolah a on p.AsalSekolah = a.SekolahID\r\n\tleft outer join perguruantinggi pt on p.AsalSekolah = pt.PerguruanTinggiID\r\n\twhere p.KodeID = '" . KodeID . "' \r\n and p.PMBPeriodID='{$gel}'\r\n {$_whr}\r\n {$urut}";
$lst->fields = "p.PMBID, p.Nama, p.Kelamin, p.ProdiID, p.Pilihan1, p.Pilihan2, p.Pilihan3, \r\n p.DetailNilai, p.NilaiUjian, p.GradeNilai, p.LulusUjian as LU, p.NA, p.NilaiSekolah, \r\n p.AsalSekolah, _prg.Nama as PRG, w.WawancaraID,\r\n if(a.Nama like '_%', a.Nama, \r\n\t\tif(pt.Nama like '_%', pt.Nama, p.AsalSekolah)) as _NamaSekolah,\r\n\tconcat('• ', replace(p.PrestasiTambahan, '~', '<br />• ')) as PT,\r\n f.Nama as FRM, _p1.Nama as P1, _p2.Nama as P2, _p3.Nama as P3,\r\n _sta.Nama as STA,\r\n if (p.ProdiID = p.Pilihan1, 'wrn', concat('cna', p.LulusUjian)) as _selP1,\r\n if (p.ProdiID = p.Pilihan2, 'wrn', concat('cna', p.LulusUjian)) as _selP2,\r\n if (p.ProdiID = p.Pilihan3, 'wrn', concat('cna', p.LulusUjian)) as _selP3,\r\n if (p.NilaiUjian+0 = 0, 'Belum Dihitung', concat(p.NilaiUjian, ' ( ', p.GradeNilai, ' ) ')) as _NilaiUjian,\r\n if (p.MhswID is NULL or p.MhswID = '', '', \"<img src='img/lock.jpg' width=26 title='Sudah menjadi Mahasiswa' />\") as KUNCI,\r\n\tif (p.LulusUjian='Y', \"<img src='img/printer2.gif' />\" , '') as PRINT\r\n ";
$lst->page = $_SESSION['_pmbPage'] + 0;
$lst->pages = $pagefmt;
$lst->pageactive = $pageoff;
$lst->maxrow = $_maxbaris;
$lst->headerfmt = "<p><table class=box cellspacing=1 align=center width=1000>\r\n \r\n <tr>\r\n <th class=ttl>#</th>\r\n <th class=ttl>PMB #</th>\r\n <th class=ttl>\r\n Nama\r\n {$hr}\r\n Asal Sekolah\r\n </th>\r\n <th class=ttl>\r\n Formulir\r\n {$hr}\r\n Program\r\n {$hr}\r\n Status\r\n </th>\r\n <th class=ttl colspan=2>\r\n Pilihan\r\n <hr size=1 color=silver />\r\n (Pilihan akhir ditandai<br />dengan warna biru)\r\n </th>\r\n <th class=ttl>Prestasi Tambahan</th>\r\n <th class=ttl>Nilai Ujian\r\n\t <hr size=1 color=silver />\r\n\t Nilai Sekolah\r\n <hr size=1 color=silver />\r\n Grade\r\n </th>\r\n </tr>";
$lst->detailfmt = "<tr>\r\n <td class=inp width=10 {$rs}>=NOMER=</td>\r\n <td class=ul1 width=84 {$rs} align=center><b>=PMBID=<br />=KUNCI=</b></td>\r\n <td class=cna=LU=><b>=Nama=</b></td>\r\n <td class=cna=LU= width=100>=FRM=</td>\r\n <td class==_selP1= width=30>=Pilihan1= \r\n </td>\r\n <td class==_selP1= width=170>=P1= \r\n </td>\r\n <td class=cna=LU= width=200 {$rs}>\r\n =PT= \r\n </td>\r\n <td class=cna=LU= width=70 align=right><b>=_NilaiUjian=</b></td>\r\n </tr>\r\n \r\n <tr>\r\n <td class=cna=LU=>» =_NamaSekolah=</td>\r\n <td class=cna=LU=>=PRG= </td>\r\n <td class==_selP2=>=Pilihan2= </td>\r\n <td class==_selP2=>=P2= </td>\r\n <td class=cna=LU= align=right> <b>=NilaiSekolah=</b></td>\r\n </tr>\r\n\t\r\n <tr>\r\n <td class=cna=LU= align=right><img src='img/=Kelamin=.bmp' /></td>\r\n <td class=cna=LU=>=STA=</td>\r\n <td class==_selP3=>=Pilihan3= </td>\r\n <td class==_selP3=>=P3= </td>\r\n <td class=ul1 align=right>\r\n Lulus: <a href='#' onClick=\"javascript:EditNilai('=PMBID=')\" /><img src='img/=LU=.gif' /></a>\r\n\t\t\t <a href='#' onClick=\"javascript:CetakSuratKelulusan('=PMBID=', '=WawancaraID=')\" />=PRINT=</a>\r\n\t </td>\r\n </tr>\r\n " . $gantibrs;
$lst->footerfmt = "</table>";
$hal = $lst->TampilkanHalaman();
$ttl = $lst->MaxRowCount;
echo $lst->TampilkanData();
echo "<p align=center>Hal: {$hal} <br />(Tot: {$ttl})</p>";
}
function DaftarBugs()
{
$opt = GetOption2('bugsstatus', "concat(ID, ' - ', Nama)", 'ID', $_SESSION['FilterStatus'], '', 'ID');
echo "<p><form action='?'>Filter Status: <select name='FilterStatus' onChange='this.form.submit()'>{$opt}</select>\r\n <a href='?mnux=bugserror&gos=BugsEdt&md=1'>Tambah Catatan Bugs & Error</a></form></p>";
$edt = strpos('.1.2.', ".{$_SESSION['_LevelID']}.") === false ? ' ' : "<a href='?mnux=bugserror&bid==ID=&gos=BugsEdt&md=0'><img src='img/edit.png'></a>";
// filter
$whr = empty($_SESSION['FilterStatus']) ? '' : "where StatusID='{$_SESSION['FilterStatus']}'";
// tampilkan
$lst = new dwolister();
$lst->maxrow = 20;
$lst->page = $_SESSION['_bugserror'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux=bugserror&_bugserror==PAGE='>=PAGE=</a>";
$lst->tables = "bugserror be\r\n left outer join bugsstatus bs on be.StatusID=bs.ID\r\n left outer join bugsprioritas bp on be.Prioritas=bp.ID\r\n {$whr}\r\n order by be.TanggalBuat desc";
$lst->fields = "be.*, bs.Nama as STATUS, bp.Nama as PRIO,\r\n date_format(be.TanggalBuat, '%d-%m-%Y<br />%H:%i') as TB,\r\n date_format(be.TanggalEdit, '%d-%m-%Y<br />%H:%i') as TE";
$lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4>\r\n <tr><th class=ttl>ID</th>\r\n <th class=ttl title='Edit'>Ed</th>\r\n <th class=ttl>Status</th>\r\n <th class=ttl>Prioritas</th>\r\n <th class=ttl>Judul Bugs/Error</th>\r\n <th class=ttl>Pelapor</th>\r\n <th class=ttl>Tgl<br />Buat</th>\r\n <th class=ttl>Pekerja</th>\r\n <th class=ttl>Tgl<br />Dikerjakan</th>\r\n <th class=ttl>Keterangan</th>\r\n </tr>";
$lst->footerfmt = "</table></p>";
$lst->detailfmt = "<tr>\r\n <td class=inp1>=ID=</td>\r\n <td class=cna=NA=>{$edt}</td>\r\n <td class=cna=NA=>=STATUS=</td>\r\n <td class=cna=NA=>=PRIO=</td>\r\n <td class=cna=NA= nowrap>=Judul=</td>\r\n <td class=cna=NA=>=LoginBuat=</td>\r\n <td class=cna=NA=>=TB=</td>\r\n <td class=cna=NA=>=LoginEdit= </td>\r\n <td class=cna=NA=>=TE= </td>\r\n <td class=cna=NA= wrap>=Keterangan= </td>\r\n </tr>";
echo $lst->TampilkanData();
echo $ttl;
echo "<p>Hal.: " . $lst->TampilkanHalaman() . "<br />" . "Total: " . number_format($lst->MaxRowCount) . "</p>";
}
function DftrLoginList($gel)
{
$a = TampilkanHeader($gel);
global $arrUrut;
$_maxbaris = 10;
include_once "class/dwolister.class.php";
// Urutan
$_urut = $arrUrut[$_SESSION['_pmbLoginUrut']];
$__urut = explode('~', $_urut);
$urut = "order by " . $__urut[1];
// Filter formulir
$whr = array();
if (!empty($_SESSION['_pmbLoginNama'])) {
$whr[] = "a.Nama like '%{$_SESSION['_pmbLoginNama']}%'";
}
$_whr = implode(' and ', $whr);
$_whr = empty($_whr) ? '' : 'and ' . $_whr;
$pagefmt = "<a href='?mnux={$_SESSION['mnux']}&gos=&_pmbLoginPage==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 = "aplikan a \n where a.KodeID = '" . KodeID . "' \n and a.PMBPeriodID='{$gel}'\n {$_whr}\n {$urut}";
$lst->fields = "a.AplikanID, a.Nama, a.JmlReset, if(a.PasswordBaru='Y', '<font color=red>Default</font>', '<font color=blue>Set</font>') as PASSSTATUS, a.NA, if(a.AplikanID='{$_SESSION['_pmbLoginAplikanID']}', 'inp1', 'ul1') as CLASS";
//$lst->startrow = $_SESSION['_pmbPage']+0;
$lst->maxrow = $_maxbaris;
$lst->pages = $pagefmt;
$lst->pageactive = $pageoff;
$lst->page = $_SESSION['_pmbLoginPage'] + 0;
$lst->headerfmt = "<table class=box cellspacing=1 width=100%>\n \n <tr>\n <th class=ttl>#</th>\n <th class=ttl>PMB #</th>\n <th class=ttl>Nama</th>\n <th class=ttl>Status</th>\n <th class=ttl>Reset</th>\n </tr>";
$lst->detailfmt = "<tr>\n <td class=inp width=10>=NOMER=</td>\n <td class==CLASS= width=80>=AplikanID=</td>\n <td class==CLASS=><a href='?mnux={$_SESSION['mnux']}&gos=&_pmbLoginAplikanID==AplikanID='>=Nama=</td>\n <td class==CLASS= width=50 align=center>=PASSSTATUS=</td>\n\t<td class==CLASS= width=50 align=center>=JmlReset=x</td>\n </tr>" . $gantibrs;
$lst->footerfmt = "</table>";
$hal = $lst->TampilkanHalaman($pagefmt, $pageoff);
$ttl = $lst->MaxRowCount;
$a .= $lst->TampilkanData();
$a .= "<p align=left>Hal: {$hal} <br />(Tot: {$ttl})</p>";
return $a;
}
function DftrForm($gel)
{
TampilkanHeader($gel);
global $arrUrut;
$_maxbaris = 10;
include_once "class/dwolister.class.php";
// Urutan
if ($_SESSION['_LevelID'] != 33) {
$_urut = $arrUrut[$_SESSION['_pmbwebUrut']];
$__urut = explode('~', $_urut);
$urut = "order by " . $__urut[1];
// Filter formulir
$whr = array();
if (!empty($_SESSION['_pmbwebFrmID'])) {
$whr[] = "p.PMBFormulirID='{$_SESSION['_pmbwebFrmID']}'";
}
if (!empty($_SESSION['_pmbwebPrg'])) {
$whr[] = "p.ProgramID = '{$_SESSION['_pmbwebPrg']}' ";
}
if (!empty($_SESSION['_pmbwebNama'])) {
$whr[] = "p.Nama like '%{$_SESSION['_pmbwebNama']}%'";
}
if (!empty($_SESSION['_pmbwebNomer'])) {
$whr[] = "p.PMBWebID like '%{$_SESSION['_pmbwebNomer']}%'";
}
$_whr = implode(' and ', $whr);
$_whr = empty($_whr) ? '' : 'and ' . $_whr;
} else {
$_whr = "and p.PMBWebID = {$_SESSION['_Login']}";
}
$pagefmt = "<a href='?mnux={$_SESSION['mnux']}&gos=&_pmbwebPage==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 = "pmbweb p \r\n left outer join pmbformulir f on p.PMBFormulirID = f.PMBFormulirID\r\n left outer join prodi _p1 on p.Pilihan1 = _p1.ProdiID\r\n left outer join prodi _p2 on p.Pilihan2 = _p2.ProdiID\r\n left outer join prodi _p3 on p.Pilihan3 = _p3.ProdiID\r\n left outer join program _prg on p.ProgramID = _prg.ProgramID\r\n left outer join statusawal _sta on p.StatusAwalID = _sta.StatusAwalID\r\n where p.KodeID = '" . KodeID . "' \r\n {$_whr}\r\n\t and p.Diproses = 'N'\r\n {$urut}";
$lst->fields = "p.PMBWebID, p.Nama, p.Kelamin, p.ProdiID, p.Pilihan1, p.Pilihan2, p.Pilihan3,\r\n f.Nama as FRM, _p1.Nama as P1, \r\n\tif(f.JumlahPilihan <= 2, concat('<br>', _p2.Nama), '') as P2, \r\n\tif(f.JumlahPilihan <= 3, concat('<br>', _p3.Nama), '') as P3,\r\n\tif(p.StatusAwalID='S', concat('<font color=blue>',_sta.Nama,'<font>') , _sta.Nama) as STA,\r\n _prg.Nama as PRG, p.NA, p.NilaiSekolah";
//$lst->startrow = $_SESSION['_pmbwebPage']+0;
$lst->maxrow = $_maxbaris;
$lst->pages = $pagefmt;
$lst->pageactive = $pageoff;
$lst->page = $_SESSION['_pmbwebPage'] + 0;
$lst->headerfmt = "<p><table class=box cellspacing=1 align=center width=1000>\r\n \r\n <tr>\r\n <th class=ttl>#</th>\r\n <th class=ttl>PMB Web ID</th>\r\n <th class=ttl colspan=2>Nama</th>\r\n <th class=ttl>Status</th>\r\n\t<th class=ttl>Program</th>\r\n <th class=ttl>Pilihan</th>\r\n\t<th class=ttl>Nilai</br>Sekolah</th>\r\n\t<th class=ttl>Proses?</th>\r\n </tr>";
$lst->detailfmt = "<tr>\r\n <td class=inp width=10>=NOMER=</td>\r\n <td class=ul1 width=80>=PMBWebID=</td>\r\n <td class=cna=NA=>=Nama=</td>\r\n <td class=cna=NA= width=10 align=center><img src='img/=Kelamin=.bmp' /></td>\r\n <td class=cna=NA= width=70 align=center>=STA=</td>\r\n <td class=cna=NA= width=120 align=center>=PRG=</td>\r\n <td class=cna=NA= width=140 align=center>=P1==P2==P3=</td>\r\n <td class=cna=NA= width=100 align=center>=NilaiSekolah=</td>\r\n\t <td class=cna=NA= width=70 align=center><input type=button name='Proses' value='Proses' onClick=\"location='?mnux={$_SESSION['mnux']}&gos=Proses&pmbwebid==PMBWebID='\"></td>\r\n\t </tr>" . $gantibrs;
$lst->footerfmt = "</table>";
$hal = $lst->TampilkanHalaman($pagefmt, $pageoff);
$ttl = $lst->MaxRowCount;
echo $lst->TampilkanData();
echo "<p align=center>Hal: {$hal} <br />(Tot: {$ttl})</p>";
}
function DaftarMhsw()
{
// 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);
}
$strwhr = str_replace('NPM', "MhswID", $strwhr);
$ord = str_replace('NPM', "MhswID", $ord);
// Tampilkan
include_once "class/dwolister.class.php";
$lst = new dwolister();
$lst->maxrow = 20;
$lst->page = $_SESSION['mhswpage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux=mhsw&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.Telepon, m.Handphone, m.Email, m.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>\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 <th class=ttl>Alamat</th>\r\n </tr>";
$lst->footerfmt = "</table></p>";
$lst->detailfmt = "<tr>\r\n <td class=inp1>=NOMER=</td>\r\n <td class=cna=Keluar=><a href='?mnux=mhsw.edt&gos=MhswEdt&mhswid==MhswID='><img src='img/edit.png'>\r\n =MhswID=</a></td>\r\n <td class=cna=Keluar= nowrap><a id='=MhswID=' class='jTip' name='Foto Mahasiswa' href='cetak/foto.pop.php?width=156&mhswid==MhswID=&foto==Foto='>=Nama=</a></td>\r\n <td class=cna=Keluar=>=ProgramID= - =PRD=</td>\r\n <td class=cna=Keluar=>=SM=</td>\r\n <td class=cna=Keluar=>=Telepon=/=Handphone=</td>\r\n <td class=cna=Keluar=>=Alamat=, =Kota=</td>\r\n </tr>";
echo $lst->TampilkanData();
echo $ttl;
echo "<p>Hal.: " . $lst->TampilkanHalaman() . "<br />" . "Total: " . number_format($lst->MaxRowCount) . "</p>";
}
function fn_1($mhsw, $alumni, $tab)
{
// *** Data pekerjaan ***
include_once "class/dwolister.class.php";
$lst = new dwolister();
$lst->maxrow = 10;
$lst->page = $_SESSION['alumnikerjapage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux={$_SESSION['mnux']}&alumnikerjapage==PAGE='>=PAGE=</a>";
$lst->tables = "alumnikerja\r\n where KodeID = '" . KodeID . "'\r\n order by MulaiKerja Desc";
$lst->fields = "*,\r\n date_format(MulaiKerja, '%d-%m-%Y') as _MulaiKerja";
$lst->headerfmt = "<table class=box cellspacing=1 cellpadding=4 width=600>\r\n <tr><td class=ul colspan=6>\r\n <input type=button name='btnTambah' value='+ Tambah'\r\n onClick=\"javascript:editPekerjaan('{$mhsw['MhswID']}', 1, 0)\" />\r\n </td></tr>\r\n <tr><th class=ttl width=20>No.</th>\r\n <th class=ttl width=90>Mulai Kerja</th>\r\n <th class=ttl>Perusahaan</th>\r\n <th class=ttl width=100>Jabatan</th>\r\n <th class=ttl width=100>Kota</th>\r\n </tr>";
$lst->footerfmt = "</table></p>";
$lst->detailfmt = "<tr>\r\n <td class=inp width=20>=NOMER=</td>\r\n <td class=ul align=center>\r\n <a href='#' onClick=\"javascript:editPekerjaan('{$mhsw['MhswID']}', 0, =AlumniKerjaID=)\"><img src='img/edit.png' /></a>\r\n =_MulaiKerja=\r\n </td>\r\n <td class=ul>=Nama=</td>\r\n <td class=ul>=Jabatan=</td>\r\n <td class=ul>=Kota=</td>\r\n </tr>\r\n <tr>";
echo $lst->TampilkanData();
echo $ttl;
echo "<p>Hal.: " . $lst->TampilkanHalaman() . "<br />" . "Total: " . number_format($lst->MaxRowCount) . "</p>";
RandomStringScript();
echo <<<ESD
<div class='box0' id='divPekerjaan' align=center>
<!--<a href="#" onClick="javascript:toggleBox('divPekerjaan', 0)"><img src='img/kali.png' align=right /></a>-->
<iframe name='framePekerjaan' id="framePekerjaan" src="" width=100% height=90% frameborder=0>
</iframe>
</div>
<script>
function editPekerjaan(MhswID, md, akid) {
toggleBox('divPekerjaan', 1);
_rnd = randomString();
lnk = "{$_SESSION['mnux']}.pekerjaan.php?mhswid="+MhswID+"&md="+md+"&akid="+akid+"&_rnd="+_rnd;
document.getElementById('framePekerjaan').src = lnk;
//alert(lnk);
}
</script>
ESD;
}
function DsnEdtPengajaran()
{
$dsnajarpage = GetSetVar('dsnajarpage', 1);
$fmtTgl = '%d-%m-%Y';
$lst = new dwolister();
$lst->maxrow = 20;
$lst->page = $_SESSION['dsnajarpage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux={$_SESSION['mnux']}&gos=DsnEdt&dsnajarpage==PAGE='>=PAGE=</a>";
$lst->tables = "jadwal j\r\n left outer join hari h on j.HariID=h.HariID\r\n left outer join jadwaldosen jd on jd.JadwalID = j.JadwalID\r\n where j.DosenID='{$_SESSION['dsnid']}' or (jd.DosenID = '{$_SESSION['dsnid']}')\r\n order by j.TahunID, j.HariID, j.JamMulai desc";
//$NamaPT = GetaField('perguruantinggi','PerguruanTinggiID','=PerguruanTinggiID=','Nama');
$lst->fields = "j.TahunID, j.MKKode, j.MKID, j.Nama, j.NamaKelas, j.JenisJadwalID, date_format(j.TglMulai, '{$fmtTgl}') as Tanggal, h.Nama as HR,\r\n j.JamMulai, j.JamSelesai,if(jd.DosenID = '08.0211.037','Team Teaching','Dosen Pengampu') as Status ";
$lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4>\r\n <tr><th class=ttl>#</th>\r\n <th class=ttl>Tahun</th>\r\n <th class=ttl>Kode</th>\r\n <th class=ttl>Matakuliah</th>\r\n <th class=ttl>Kelas</th>\r\n <th class=ttl>Jenis</th>\r\n <th class=ttl>Hari</th>\r\n <th class=ttl>Tanggal</th>\t\r\n <th class=ttl>Jam</th>\r\n <th class=ttl>Status</th>\r\n </tr>";
$lst->detailfmt = "<tr>\r\n\t <td class=inp1 width=18 align=right>=NOMER=</td>\r\n\t <td class=ul>=TahunID=</td>\r\n\t <td class=ul>=MKKode=</td>\r\n\t <td class=ul>=Nama=</td>\r\n\t <td class=ul>=NamaKelas=</td>\r\n\t <td class=ul>=JenisJadwalID=</td>\r\n\t <td class=ul>=HR=</td>\r\n\t <td class=ul>=Tanggal=</td>\r\n\t <td class=ul>=JamMulai= ~ =JamSelesai=</td>\r\n <td class=ul>=Status=</td>\r\n\t </tr>";
$lst->footerfmt = "</table></p>";
echo $lst->TampilkanData();
$halaman = $lst->TampilkanHalaman();
$total = $lst->MaxRowCount;
$total = number_format($total);
echo "<p>Halaman : " . $halaman . "<br />" . "Total: " . $total . "</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>";
}
function DaftarIkatan($mnux = '', $lnk = '', $fields = '')
{
global $_defmaxrow, $_FKartuUSM;
include_once "class/dwolister.class.php";
if (empty($mnux)) {
$mnux = $_SESSION['mnux'];
}
//$lnk = "gos=DsnEdt&md=0&dsnid==Login="******"<th class=ttl>" . $_f[$i] . "</th>";
$brs .= "<td class=cna=NA=>=" . $_f[$i] . "= </td>";
}
$lst = new dwolister();
$lst->maxrow = 10;
$lst->page = $_SESSION['iktpage'] + 0;
$lst->pageactive = "=PAGE=";
$lst->pages = "<a href='?mnux={$mnux}&gos=DsnEdt&md=1&iktpage==PAGE='>=PAGE=</a>";
$lst->tables = "ikatan\r\n order by IkatanID";
$lst->fields = "*";
$lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4 width=800>\r\n <tr>\r\n\t <th class=ttl colspan=2>#</th>\r\n\t <th class=ttl>Kode Ikatan</th>\r\n {$hdr}\r\n\t <th class=ttl>NA</th>\r\n </tr>";
$lst->detailfmt = "<tr>\r\n <td class=inp1 width=18 align=right>=NOMER=</td>\r\n <td class=ul1 width=10><a href=\"?mnux={$mnux}&{$lnk}\"><img src='img/edit.png' border=0></a></td>\r\n <td class=cna=NA=>=IkatanID=</td>\r\n {$brs}\r\n <td class=cna=NA= align=center><img src='img/book=NA=.gif'></td>\r\n </tr>";
$lst->footerfmt = "</table></p>";
echo $lst->TampilkanData();
$halaman = $lst->TampilkanHalaman();
$total = $lst->MaxRowCount;
$total = number_format($total);
echo "<p>Halaman : " . $halaman . "<br />" . "Total: " . $total . "</p>";
}
function TampilkanDaftarnya($gel, $gel0)
{
$_maxbaris = 10;
include_once "../class/dwolister.class.php";
// Filter formulir
$whr = array();
if (!empty($_SESSION['_pmbNama'])) {
$whr[] = "p.Nama like '%{$_SESSION['_pmbNama']}%'";
}
if (!empty($_SESSION['_pmbNomer'])) {
$whr[] = "p.PMBID like '%{$_SESSION['_pmbNomer']}%'";
}
if (!empty($gel0)) {
$whr[] = "p.PMBPeriodID = '{$gel0}' ";
}
$_whr = implode(' and ', $whr);
$_whr = empty($_whr) ? '' : 'and ' . $_whr;
$pagefmt = "<a href='?mnux={$_SESSION['mnux']}&gos=&_pmbPage==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 = "pmb p \r\n left outer join pmbformulir f on p.PMBFormulirID = f.PMBFormulirID\r\n left outer join prodi _p1 on p.Pilihan1 = _p1.ProdiID\r\n left outer join prodi _p2 on p.Pilihan2 = _p2.ProdiID\r\n left outer join prodi _p3 on p.Pilihan3 = _p3.ProdiID\r\n left outer join program _prg on p.ProgramID = _prg.ProgramID\r\n left outer join statusawal _sta on p.StatusAwalID = _sta.StatusAwalID\r\n where p.KodeID = '" . KodeID . "' \r\n and p.PMBPeriodID < '{$gel}'\r\n and p.NA = 'N'\r\n {$_whr}\r\n order by p.Nama";
$lst->fields = "p.PMBID, p.Nama, p.Kelamin, p.ProdiID, p.Pilihan1, p.Pilihan2, p.Pilihan3,\r\n f.Nama as FRM, _p1.Nama as P1, _p2.Nama as P2, _p3.Nama as P3,\r\n _sta.Nama as STA, _prg.Nama as PRG";
//$lst->startrow = $_SESSION['_pmbPage']+0;
$lst->maxrow = $_maxbaris;
$lst->pages = $pagefmt;
$lst->pageactive = $pageoff;
$lst->page = $_SESSION['_pmbPage'] + 0;
$lst->headerfmt = "<table class=box cellspacing=1 align=center width=100%>\r\n \r\n <tr>\r\n <th class=ttl>#</th>\r\n <th class=ttl>PMB #</th>\r\n <th class=ttl colspan=2>Nama</th>\r\n <th class=ttl>Status</th>\r\n <th class=ttl>Formulir<hr size=1 color=silver />Program</th>\r\n <th class=ttl>Pilihan1</th>\r\n </tr>";
$lst->detailfmt = "<tr>\r\n <td class=inp width=10>=NOMER=</td>\r\n <td class=ul1 width=80>\r\n <b>=PMBID=</b><br />\r\n <input type=button name='Ambil' value='Ambil'\r\n onClick=\"location='../{$_SESSION['mnux']}.lalu.php?gos=AmbilSaja&id==PMBID='\" />\r\n </td>\r\n <td class=cna=NA=>=Nama=</td>\r\n <td class=cna=NA= width=10 align=center><img src='../img/=Kelamin=.bmp' /></td>\r\n <td class=cna=NA= width=70>=STA=</td>\r\n <td class=cna=NA= width=120>\r\n =FRM= \r\n <hr size=1 color=silver />\r\n =PRG= \r\n </td>\r\n <td class=cna=NA= width=180>\r\n =P1= \r\n <hr size=1 color=silver />\r\n =P2= \r\n <hr size=1 color=silver />\r\n =P3= </td>\r\n </tr>" . $gantibrs;
$lst->footerfmt = "</table>";
$hal = $lst->TampilkanHalaman($pagefmt, $pageoff);
$ttl = $lst->MaxRowCount;
echo $lst->TampilkanData();
echo "<p align=center>Hal: {$hal} <br />(Tot: {$ttl})</p>";
}