function JdwlEdt()
{
$md = $_REQUEST['md'] + 0;
if ($md == 0) {
$w = GetFields('jadwal', "JadwalID", $_REQUEST['JadwalID'], '*');
$jdl = "Edit Jadwal Klinik";
} else {
$w = array();
$w['JadwalID'] = 0;
$w['MKID'] = 0;
$w['KodeID'] = $_SESSION['KodeID'];
$w['ProgramID'] = $_SESSION['prid'];
$w['ProdiID'] = $_SESSION['prodi'];
$w['DosenID'] = '';
$w['RuangID'] = '';
$w['TglMulai'] = date('Y-m-d');
$w['TglSelesai'] = date('Y-m-d');
$w['RencanaKehadiran'] = 4;
$w['SKS'] = 0;
$w['SKSAsli'] = 0;
$w['Harga'] = 0;
$w['Kapasitas'] = 0;
$w['NA'] = 'N';
$jdl = "Tambah Jadwal Klinik";
}
$optrs = GetOption2('rumahsakit', "concat(RSID, ' - ', Nama)", 'RSID', $w['RuangID'], '', 'RSID');
$optmk = GetOption2('mk', "concat(MKKode, ' - ', Nama, ' (', SKS, ' SKS)')", "MKKode", $w['MKID'], "KodeID='{$_SESSION['KodeID']}' and ProdiID='{$_SESSION['prodi']}'", 'MKID');
$optdsn = GetOption2('dosen', "concat(Nama, ', ', Gelar)", "Nama", $w['DosenID'], "Homebase in ('10', '11')", 'Login');
$TglMulai = GetDateOption($w['TglMulai'], 'TglMulai');
$TglSelesai = GetDateOption($w['TglSelesai'], 'TglSelesai');
$NA = $w['NA'] == 'Y' ? 'checked' : '';
// Tampilkan
echo "<p><table class=box cellspacing=1 cellpadding=4>\r\n <form action='?' name='frmJadwal' method=POST>\r\n <input type=hidden name='mnux' value='jadwal.klinik'>\r\n <input type=hidden name='tahun' value='{$_SESSION['tahun']}'>\r\n <input type=hidden name='ProdiID' value='{$w['ProdiID']}'>\r\n <input type=hidden name='ProgramID' value='{$w['ProgramID']}'>\r\n <input type=hidden name='JadwalID' value='{$w['JadwalID']}'>\r\n <input type=hidden name='slnt' value='jadwal.klinik.sav'>\r\n <input type=hidden name='slntx' value='JdwlSav'>\r\n <input type=hidden name='md' value='{$md}'>\r\n \r\n <tr><th class=ttl colspan=2>{$jdl}</th></tr>\r\n <tr><td class=inp>Matakuliah</td><td class=ul><select name='MKID'>{$optmk}</select></td></tr>\r\n <tr><td class=inp>Dosen Penanggung jawab</td><td class=ul><select name='DosenID'>{$optdsn}</select></td></tr>\r\n <tr><td class=inp>Rumah Sakit</td><td class=ul><select name='RSID'>{$optrs}</select></td></tr>\r\n <tr><td class=inp>Biaya</td><td class=ul><input type=text name='Harga' value='{$w['Harga']}' size=20 maxlength=20></td></tr>\r\n <tr><td class=inp>Kapasitas</td><td class=ul><input type=text name='Kapasitas' value='{$w['Kapasitas']}' size=4 maxlength=3></td></tr>\r\n \r\n <tr><td class=ul colspan=2><b>Periode</b></td></tr>\r\n <tr><td class=inp>Mulai</td><td class=ul>{$TglMulai}</td></tr>\r\n <tr><td class=inp>Durasi</td>\r\n <td class=ul><input type=text name='RencanaKehadiran' value='{$w['RencanaKehadiran']}' size=4 maxlength=4>\r\n <input type=hidden name='_RencanaKehadiran' value='{$w['RencanaKehadiran']}'> minggu</td></tr>\r\n <tr><td class=inp>Selesai</td><td class=ul>{$TglSelesai}</td></tr>\r\n \r\n <tr><td class=ul colspan=2><input type=submit name='Simpan' value='Simpan'>\r\n <input type=reset name='Reset' value='Reset'>\r\n <input type=button name='Batal' value='Batal' onClick=\"location='?mnux=jadwal.klinik'\"></td></tr>\r\n </table></p>";
}
function TampilkanHeader($gels, $gel)
{
$optfrm = GetOption2('pmbformulir', 'Nama', 'Nama', $_SESSION['_pmbFrmID'], "KodeID='" . KodeID . "'", 'PMBFormulirID');
$optprg = GetOption2('program', "concat(ProgramID, ' - ', Nama)", 'ProgramID', $_SESSION['_pmbPrg'], "KodeID='" . KodeID . "'", 'ProgramID');
$opturut = GetUrutanPMB();
echo "<table class=box cellspacing=1 align=center>\r\n <form action='?' method=POST>\r\n <input type=hidden name='mnux' value='{$_SESSION['mnux']}' />\r\n <input type=hidden name='gos' value='' />\r\n <input type=hidden name='_pmbPage' value='0' />\r\n \r\n <tr>\r\n <td class=inp>Cari Nama:</td>\r\n <td class=ul1><input type=text name='_pmbNama' value='{$_SESSION['_pmbNama']}' size=20 maxlength=30 /></td>\r\n <td class=inp width=100>Filter Formulir:</td>\r\n <td class=ul1>\r\n <select name='_pmbFrmID'>{$optfrm}</select>\r\n </td>\r\n </tr>\r\n <tr>\r\n <td class=inp>Cari No. PMB:</td>\r\n <td class=ul1><input type=text name='_pmbNomer' value='{$_SESSION['_pmbNomer']}' size=20 maxlength=30 /></td>\r\n <td class=inp>Urutkan:</td>\r\n <td class=ul1><select name='_pmbUrut'>{$opturut}</select></td>\r\n </tr>\r\n <tr>\r\n <td class=inp>Program:</td>\r\n <td class=ul1><select name='_pmbPrg'>{$optprg}</select></td>\r\n <td class=ul1 colspan=2 align=center>\r\n <input type=submit name='Submit' value='Submit' />\r\n <input type=button name='Reset' value='Reset'\r\n onClick=\"location='?mnux={$_SESSION['mnux']}&gos=&_pmbPage=0&_pmbNama=&_pmbNomer='\" />\r\n </td>\r\n </form>\r\n </table>";
}
function EditKelas()
{
$md = $_REQUEST['md'] + 0;
$kid = $_REQUEST['kid'];
if ($md == 0) {
$jdl = 'Edit Kelas';
$w = GetFields('kelas', 'KelasID', $kid, '*');
$strkid = "\r\n\t\t\t<tr>\r\n\t\t\t\t<td class=inp>Kelas ID: </td>\r\n\t\t\t\t<td class=ul1><input type=text name='dkid' value='{$kid}' size=2 disabled>\r\n\t\t\t\t\t\t\t<input type=hidden name='kid' value='{$kid}'></td>\t\t\t\t\r\n\t\t\t</tr>";
} else {
if ($md == 1) {
$jdl = 'Tambah Kelas';
$w = array();
$strkid = "";
} else {
die(ErrorMsg('Error', "Mode edit tidak dikenali. Hubungi Sysadmin untuk informasi lebih lanjut."));
}
}
TampilkanJudul($jdl);
echo "<br>";
$optprodi = GetOption2('prodi', "concat(ProdiID, ' - ', Nama)", 'ProdiID', $w['ProdiID'], "KodeID='" . KodeID . "'", 'ProdiID');
$optprogram = GetOption2('program', "concat(ProgramID, ' - ', Nama)", 'ProgramID', $w['ProgramID'], "KodeID='" . KodeID . "'", 'ProgramID');
$opttahun = GetOption2('tahun', "concat(TahunID, ' (', ProdiID, if(ProdiID='','','-'), ProgramID, ')')", 'TahunID', $w['TahunID'], "NA='N'", 'TahunID');
CheckFormScript("InputNama,InputTahun,InputProdi,InputProgram,InputKapMax");
echo "<table class=box cellspacing=1 align=center>\r\n\t\t\t\t<form action='?' method=POST onSubmit=\"return CheckForm(this)\">\r\n\t\t\t\t\t<input type=hidden name='mnux' value='{$_SESSION['mnux']}' />\r\n\t\t\t\t\t<input type=hidden name='gos' value='SavKelas' />\r\n\t\t\t\t\t<input type=hidden name='md' value='{$md}'/>\r\n\t\t\t\t\t<input type=hidden name='kid' value='{$kid}' />\r\n\t\t\t\t\t\r\n\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t<td class=inp>Nama Kelas:</td>\r\n\t\t\t\t\t\t<td class=ul1><input type=text name='InputNama' value='{$w['Nama']}'></td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t<td class=inp>Tahun Akademik:</td>\r\n\t\t\t\t\t\t<td class=ul1><input type=text name='InputTahun' value='{$_SESSION['opk_tahun']}' size=3 maxlength=10></td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t<td class=inp>Program Studi:</td>\r\n\t\t\t\t\t\t<td class=ul1><select name='InputProdi'>{$optprodi}</select></td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t<td class=inp>Program:</td>\r\n\t\t\t\t\t\t<td class=ul1><select name='InputProgram'>{$optprogram}</select></td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t<td class=inp>Kapasitas Maksimum Kelas: </td>\r\n\t\t\t\t\t\t<td class=ul1><input type=text name='InputKapMax' value='{$w['KapasitasMaksimum']}' size=2 maxlength=4></td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t\t<tr>\r\n\t\t\t\t\t\t<td class=ul1 colspan=2 align=center>\r\n\t\t\t\t\t\t\t<input type=submit name='SimpanKelas' value='Simpan Kelas' />\r\n\t\t\t\t\t\t\t<input type=reset name='Reset' value='Reset' />\r\n\t\t\t\t\t\t\t<input type=button name='Batal' value='Batal'\r\n\t\t\t\t\t\t\t\tonClick=\"self.close();\" /></td>\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t</table>\r\n\t\t\t</form>";
}
function BugsEdt()
{
global $arrPrioritas, $arrStatus;
$md = $_REQUEST['md'] + 0;
if ($md == 0) {
$bid = $_REQUEST['bid'];
$be = GetFields('bugserror', 'ID', $bid, '*');
$judul = "Edit Catatan Bugs & Error";
} else {
$be = array();
$be['ID'] = 0;
$be['Judul'] = '';
$be['Bugs'] = '';
$be['Prioritas'] = 1;
$be['StatusID'] = 1;
$be['Keterangan'] = '';
$be['NA'] = 'N';
$judul = "Tambah Catatan Bugs & Error";
}
$_na = $be['NA'] == 'Y' ? 'checked' : '';
//$optprio = BuatOpsi("Prioritas", $arrPrioritas, $be['Prioritas']);
//$optstat = BuatOpsi("StatusID", $arrStatus, $be['StatusID']);
CheckFormScript('Judul,Bugs');
if (strpos('.1.2.', ".{$_SESSION['_LevelID']}.") === false) {
$prio = GetaField('bugsprioritas', 'ID', $be['Prioritas'], 'Nama');
$stat = GetaField('bugsstatus', 'ID', $be['StatusID'], 'Nama');
$str = "<tr><td class=inp>Prioritas</td><td class=ul>{$prio} <input type=hidden name='Prioritas' value='{$be['Prioritas']}'></td></tr>\r\n <tr><td class=inp>Status</td><td class=ul>{$stat} <input type=hidden name='StatusID' value='{$be['StatusID']}'></td></tr>";
} else {
$optprio = GetOption2('bugsprioritas', "concat(ID, ' - ', Nama)", "ID", $be['Prioritas'], '', "ID");
$optstat = GetOption2('bugsstatus', "concat(ID, ' - ', Nama)", 'ID', $be['StatusID'], '', 'ID');
$str = "<tr><td class=inp>Prioritas</td><td class=ul><select name='Prioritas'>{$optprio}</select></td></tr>\r\n <tr><td class=inp>Status</td><td class=ul><select name='StatusID'>{$optstat}</select></td></tr>\r\n <tr><td class=ul colspan=2>Keterangan Developer:<br />\r\n <textarea name='Keterangan' cols=100 rows=10>{$be['Keterangan']}</textarea></td></tr>";
}
echo "<p><table class=box cellspacing=1 cellpadding=4>\r\n <form action='?' method=POST name='BugsErrorRec' onSubmit='return CheckForm(this)'>\r\n <input type=hidden name='mnux' value='bugserror'>\r\n <input type=hidden name='gos' value='BugsSav'>\r\n <input type=hidden name='bid' value='{$be['ID']}'>\r\n <input type=hidden name='md' value='{$md}'>\r\n <input type=hidden name='BypassMenu' value='1'>\r\n <tr><td class=ul colspan=2><font size=+1>{$judul}</font></td></tr>\r\n <tr><td class=inp>Judul Catatan</td><td class=ul><input type=text name='Judul' value='{$be['Judul']}' size=40 maxlength=50></td></tr>\r\n <tr><td class=inp>Bugs/Error</td><td class=ul><textarea name='Bugs' cols=40 rows=6>{$be['Bugs']}</textarea></td></tr>\r\n {$str}\r\n <tr><td class=ul colspan=2><input type=submit name='Simpan' value='Simpan'>\r\n <input type=reset name='Reset' value='Reset'>\r\n <input type=button name='Batal' value='Batal' onClick=\"location='?mnux=bugserror'\"></td></tr>\r\n </form></table></p>";
}
function Edit($MhswID, $KHSID, $md, $BayarID)
{
$mhsw = GetFields('mhsw', "KodeID='" . KodeID . "' and MhswID", $MhswID, '*');
$khs = GetFields('khs', 'KHSID', $KHSID, '*');
if ($md == 0) {
$jdl = "Edit Pembayaran";
$w = GetFields('bayarmhsw', 'BayarMhswID', $BayarID, '*');
} elseif ($md == 1) {
$jdl = "Tambah Penarikan";
$w = array();
$rekening_def = GetaField('rekening', "Def = 'Y' and NA", 'N', 'RekeningID');
$w['RekeningID'] = $rekening_def;
$w['Tanggal'] = date('Y-m-d');
} else {
die(ErrorMsg('Error', "Mode edit <b>{$md}</b> tidak dikenali.<br />\r\n Hubungi Sysadmin untuk informasi lebih lanjut.\r\n <hr size=1 color=silver />\r\n <input type=button name='Tutup' value='Tutup' onClick=\"window.close()\" />"));
}
// Tampilkan
BayarScript();
CheckFormScript('RekeningID,Bank');
$optrek = GetOption2('rekening', "concat(RekeningID, ' - ', Nama)", 'RekeningID', $w['RekeningID'], "KodeID='" . KodeID . "'", 'RekeningID');
$optTanggal = GetDateOption($w['Tanggal'], 'Tanggal');
TampilkanJudul($jdl);
echo "\r\n <table class=box cellspacing=1 width=100%>\r\n <form name='frmBayar' action='../{$_SESSION['mnux']}.tarik.php' method=POST onSubmit=\"return CheckForm(this)\">\r\n <input type=hidden name='gos' value='Simpan' />\r\n <input type=hidden name='MhswID' value='{$MhswID}' />\r\n <input type=hidden name='KHSID' value='{$KHSID}' />\r\n <input type=hidden name='md' value='{$md}' />\r\n <input type=hidden name='BayarID' value='{$BayarID}' />\r\n \r\n <tr><td class=inp>Ditarik oleh:</td>\r\n <td class=ul1 colspan=3>\r\n <font size=+1>{$mhsw['Nama']}</font> <sup>(NIM: {$MhswID})</sup>\r\n </td>\r\n </tr>\r\n <tr><td class=inp>Dari Rekening:</td>\r\n <td class=ul1><select name='RekeningID'>{$optrek}</select></td>\r\n <td class=inp>Tgl Setor:</td>\r\n <td class=ul1>{$optTanggal}</td>\r\n </tr>\r\n <tr><td class=inp>Ditarik Dari:</td>\r\n <td class=ul1><input type=text name='Bank' value='{$w['Bank']}' size=30 maxlength=50 /> <a href='#' onClick=\"javascript:SetCash()\">Set CASH</a><br />\r\n <sup>Isi dengan `CASH` bila dibayarkan dengan Tunai</sup>\r\n </td>\r\n <td class=inp>No. Bukti Tarik:</td>\r\n <td class=ul1><input type=text name='BuktiSetoran' value='{$w['BuktiSetoran']}'\r\n size=30 maxlength=50 /><br />\r\n <sup>Kosongkan jika pembayaran cash</sup>\r\n </td>\r\n </tr>\r\n <tr><td class=inp>Catatan:</td>\r\n <td class=ul1 colspan=3><input type=text name='Keterangan' value='{$w['Keterangan']}'\r\n size=90 maxlength=50 />\r\n </td>\r\n </tr>\r\n </table>";
TampilkanDetailBiaya($MhswID, $mhsw, $khs, $md);
}
function KampEdt()
{
global $_Identitas;
$md = $_REQUEST['md'] + 0;
if ($md == 0) {
$w = GetFields('kampus', 'KampusID', $_REQUEST['KampID'], '*');
$jdl = "Edit Kampus";
$strid = "<input type=hidden name='KampusID' value='{$w['KampusID']}'><b>{$w['KampusID']}</b>";
} else {
$w = array();
$w['KampusID'] = '';
$w['Nama'] = '';
$w['Alamat'] = '';
$w['Kota'] = '';
$w['KodeID'] = $_Identitas;
$w['Telepon'] = '';
$w['Fax'] = '';
$w['NA'] = 'N';
$jdl = "Tambah Kampus";
$strid = "<input type=text name='KampusID' size=20 maxlength=20>";
}
$snm = session_name();
$sid = session_id();
$optkodid = GetOption2('identitas', "concat(Kode, ' - ', Nama)", 'Kode', $w['KodeID'], '', 'Kode');
$na = $w['NA'] == 'Y' ? 'checked' : '';
$c1 = 'class=inp1';
$c2 = 'class=ul';
CheckFormScript('KampusID,Nama,KodeID');
// Tampilkan
echo "<p><table class=box cellspacing=1 cellpadding=4>\r\n <form action='?' method=POST onSubmit=\"return CheckForm(this)\">\r\n <input type=hidden name='mnux' value='kampus'>\r\n <input type=hidden name='gos' value='KampSav'>\r\n <input type=hidden name='md' value='{$md}'>\r\n <tr><th colspan=2 class=ttl>{$jdl}</th></tr>\r\n <tr><td {$c1}>Kode Kampus</td><td {$c2}>{$strid}</td></tr>\r\n <tr><td {$c1}>Nama</td><td {$c2}><input type=text name='Nama' value='{$w['Nama']}' size=40 maxlength=50></td></tr>\r\n <tr><td {$c1}>Institusi</td><td {$c2}><select name='KodeID'>{$optkodid}</select></td></tr>\r\n <tr><td {$c1}>Alamat</td><td {$c2}><textarea name='Alamat' cols=30 rows=2>{$w['Alamat']}</textarea></td></tr>\r\n <tr><td {$c1}>Kota</td><td {$c2}><input type=text name='Kota' value='{$w['Kota']}' size=40 maxlength=50></td></tr>\r\n <tr><td {$c1}>Telepon</td><td {$c2}><input type=text name='Telepon' value='{$w['Telepon']}' size=40 maxlength=50></td></tr>\r\n <tr><td {$c1}>Fax</td><td {$c2}><input type=text name='Fax' value='{$w['Fax']}' size=40 maxlength=50></td></tr>\r\n <tr><td {$c1}>NA (tidak aktif)?</td><td {$c2}><input type=checkbox name='NA' value='Y' {$na}></td></tr>\r\n <tr><td colspan=2><input type=submit name='Simpan' value='Simpan'>\r\n <input type=Reset name='Reset' value='Reset'>\r\n <input type=button name='Batal' value='Batal' onClick=\"location='?mnux=kampus&gos=&{$snm}={$sid}'\"></td></tr>\r\n \r\n </form></table></p>";
}
function JenAdd()
{
global $arrID, $mnux, $pref;
$md = $_REQUEST['md'] + 0;
if ($md == 0) {
$w = GetFields('jenismk', "JenisMKID", $_REQUEST['jmkid'], '*');
$jdl = "Edit Jenis Mata Kuliah";
} else {
$w = array();
$w['JenisMKID'] = 0;
$w['KodeID'] = $arrID['Kode'];
$w['Urutan'] = 0;
$w['Singkatan'] = '';
$w['Nama'] = '';
$w['ProdiID'] = $_SESSION['prodi'];
$w['NA'] = 'N';
$jdl = "Tambah Jenis Mata Kuliah";
}
$snm = session_name();
$sid = session_id();
$_NA = $w['NA'] == 'Y' ? 'checked' : '';
$_prd = GetOption2('prodi', "concat(ProdiID, ' - ', Nama)", 'ProdiID', $_SESSION['prodi'], '', 'ProdiID');
// tampilkan formulir
CheckFormScript("Singkatan,Nama,prodi");
echo "<table class=box cellspacing=1 cellpadding=4>\r\n <form action='?' method=POST onSubmit=\"return CheckForm(this)\">\r\n <input type=hidden name='mnux' value='{$mnux}'>\r\n <input type=hidden name='{$pref}' value='{$_SESSION[$pref]}'>\r\n <input type=hidden name='sub' value='JenSav'>\r\n <input type=hidden name='KodeID' value='{$arrID['Kode']}'>\r\n <input type=hidden name='md' value='{$md}'>\r\n <input type=hidden name='JenisMKID' value='{$w['JenisMKID']}'>\n <input type=hidden name='BypassMenu' value='1' />\n \r\n <tr><th class=ttl colspan=2>{$jdl}</th></tr>\r\n <tr><td class=inp>Urutan Tampilan</td><td class=ul><input type=text name='Urutan' value='{$w['Urutan']}' size=5 maxlength=5></td></tr>\r\n <tr><td class=inp>Singkatan</td><td class=ul><input type=text name='Singkatan' value='{$w['Singkatan']}' size=30 maxlength=20></td></tr>\r\n <tr><td class=inp>Jenis Matakuliah</td><td class=ul><input type=text name='Nama' value='{$w['Nama']}' size=30 maxlength=50></td></tr>\r\n <tr><td class=inp>Program Studi</td><td class=ul><select name='prodi'>{$_prd}</select></td></tr>\r\n <tr><td class=inp>Tidak aktif?</td><td class=ul><input type=checkbox name='NA' value='Y' {$_NA}></td></tr>\r\n <tr><td colspan=2 align=center>\n <input type=submit name='Simpan' value='Simpan'>\r\n <input type=reset name='Reset' value='Reset'>\r\n <input type=button name='Batal' value='Batal' onClick=\"location='?mnux={$mnux}&{$pref}={$_SESSION[$pref]}'\"></td></tr>\r\n </form></table>";
}
function TampilkanIPKBatch()
{
$optprg = GetOption2("program", "concat(ProgramID, ' - ', Nama)", "ProgramID", $_SESSION['prid'], '', 'ProgramID');
$optprd = GetOption2("prodi", "concat(ProdiID, ' - ', Nama)", "ProdiID", $_SESSION['prodi'], '', 'ProdiID');
$keu = GetFields("keusetup", "NA", "N", '*');
$optHTGN = GetOption2('bipotnama', "Nama", "Nama", $keu['HutangNext'], '', "BIPOTNamaID");
$optDEPN = GetOption2('bipotnama', "Nama", "Nama", $keu['DepositNext'], '', "BIPOTNamaID");
$optHTGP = GetOption2('bipotnama', "Nama", "Nama", $keu['HutangPrev'], '', "BIPOTNamaID");
$optDEPP = GetOption2('bipotnama', "Nama", "Nama", $keu['DepositPrev'], '', "BIPOTNamaID");
echo <<<END
<p><table class=box cellspacing=1 cellpadding=4>
<form action='cetak/prc.ipk.batch.php' name='Batch' method=POST target=_blank>
<tr><td class=inp1 colspan=2><b>Proses IPK secara Batch</b></td>
<td class=inp1 colspan=2><b>Setup Proses Keuangan</b></td>
<td class=inp>Tahun Akd.</td><td class=ul><input type=text name='tahun' value='{$_SESSION['tahun']}'></td></tr>
<tr><td class=inp>Program</td><td class=ul><select name='prid'>{$optprg}</select></td>
<td class=inp>Transfer Hutang</td><td class=ul><select name='HutangNext'>{$optHTGN}</select></td>
<td class=inp>Hutang Ditransfer</td><td class=ul><select name='HutangPrev'>{$optHTGP}</select></td></tr>
<tr><td class=inp>Program Studi</td><td class=ul><select name='prodi'>{$optprd}</select></td>
<td class=inp>Transfer Deposit</td><td class=ul><select name='DepositNext'>{$optDEPN}</select></td>
<td class=inp>Deposit Ditransfer </td><td class=ul><select name='DepositPrev'>{$optDEPP}</select></td></tr>
<tr><td colspan=2><input type=submit name='Proses' value='ProsesIPK'></td>
<td colspan=4><input type=submit name='Proses' value='Simpan_Setup_Keuangan'>
<input type=submit name='Proses' value='Proses_Tutup_Keuangan'></td></tr>
</form></table></p>
END;
}
function Edit($md, $prd, $id)
{
$gelombang = GetaField('pmbperiod', "KodeID='" . KodeID . "' and NA", 'N', "PMBPeriodID");
if ($md == 0) {
$jdl = "Edit Wawancara USM";
$w = GetFields('wawancarausm', 'WawancaraUSMID', $id, '*');
} elseif ($md == 1) {
$jdl = "Tambah Wawancara";
$w = array();
$w['Tanggal'] = GetaField('pmbperiod', "KodeID='" . KodeID . "' and PMBPeriodID", $gelombang, 'UjianMulai');
$w['JamMulai'] = '09:00';
$w['JamSelesai'] = '09:50';
$w['PanjangWaktu'] = 0;
$w['Kapasitas'] = 0;
} else {
die(ErrorMsg('Error', "Terjadi kesalahan.<br />\r\n Mode edit <b>{$md}</b> tidak dikenali.<br />\r\n Hubungi Sysadmin untuk informasi lebih lanjut.\r\n <hr size=1 color=silver />\r\n <input type=button name='Tutup' value='Tutup' onClick=\"window.close()\" />"));
}
// Tampilkan
TampilkanJudul($jdl);
$s1 = "select r.RuangID, r.KapasitasUjian, k.Nama as NamaKampus \r\n\t\t\tfrom ruang r left outer join kampus k on r.KampusID=k.KampusID\r\n\t\t\twhere r.UntukUSM = 'Y' \r\n\t\t\torder by r.KampusID, r.RuangID";
$r1 = _query($s1);
if (!empty($_SESSION['prodi'])) {
$gelombang = GetaField('pmbperiod', "KodeID='" . KodeID . "' and NA", 'N', "PMBPeriodID");
}
$jml = GetaField('pmb', "PMBPeriodID='{$gelombang}' and Pilihan1", $_SESSION['prodi'], "count(PMBID)");
$ruangopt = GetOption2('ruang', 'RuangID', 'RuangID', $w['RuangID'], "KodeID='" . KodeID . "'", 'RuangID');
$Tanggal = GetDateOption($w['Tanggal'], 'Tanggal');
$JamMulai = GetTimeOption($w['JamMulai'], 'JamMulai');
$JamSelesai = GetTimeOption($w['JamSelesai'], 'JamSelesai');
CheckFormScript('Ruang,Kapasitas,PanjangWaktu');
echo "<p><table class=bsc cellspacing=1 width=100%>\r\n <form name='wawancaraedit' action='../{$_SESSION['mnux']}.wawancarausm.edit.php' method=POST onSubmit='return CheckForm(this)'>\r\n <input type=hidden name='md' value='{$md}' />\r\n <input type=hidden name='prd' value='{$prd}' />\r\n <input type=hidden name='id' value='{$id}' />\r\n <input type=hidden name='gos' value='Simpan' />\r\n \r\n <tr><td class=inp>Mata Uji:</td>\r\n <td class=ul1 colspan=3><input type=text name='xMataUji' value='Wawancara' disabled>\r\n\t\t\t\t\t\t\t <input type=hidden name='MataUji' value='Wawancara'></td>\r\n </tr>\r\n <tr><td class=inp>Tanggal Wawancara:</td>\r\n <td class=ul1 colspan=3>{$Tanggal}</td>\r\n </tr>\r\n <tr><td class=inp>Jam Wawancara:</td>\r\n <td class=ul1 colspan=3>{$JamMulai} s/d {$JamSelesai}</td>\r\n\t </tr>\r\n <tr><td class=inp>Panjang Waktu Wawancara:<br>(Per Cama)</td>\r\n\t <td class=ul1 colspan=3><input type=text name='PanjangWaktu' value='{$w['PanjangWaktu']}' size=2 maxlength=3 > menit \r\n\t\t\t<font color=red>*) Masukkan 0 untuk tidak ada pembatasan waktu</font></td>\r\n\t </tr>\r\n <tr><td class=inp>Kapasitas Cama:</td>\r\n <td class=ul1 colspan=3><input type=text name='Kapasitas' value='{$w['Kapasitas']}' size=2 maxlength=3 > orang \r\n\t\t\t<font color=red>*) Masukkan 0 untuk tidak ada pembatasan kuota</font></td>\r\n\t </tr>\r\n <tr><td class=inp>Ruang Wawancara:</td>\r\n\t <td class=ul1 colspan=3><select name='Ruang'>{$ruangopt}</select></td></tr>\r\n <tr><td class=ul1 colspan=4 align=center>\r\n <input type=submit name='Simpan' value='Simpan' onClick=\"return (CekJam() && CekPanjangWaktu()) \"/>\r\n <input type=button name='Batal' value='Batal' onClick=\"window.close()\" />\r\n </td></tr>\r\n </form>\r\n </table>\r\n <script>\r\n\tfunction CekJam()\r\n\t{\tcek = true;\r\n\t\tjammulai = wawancaraedit.JamMulai_h.value;\r\n\t\tmenitmulai = wawancaraedit.JamMulai_n.value;\r\n\t\tjamselesai = wawancaraedit.JamSelesai_h.value;\r\n\t\tmenitselesai = wawancaraedit.JamSelesai_n.value;\r\n\t\tif(jammulai > jamselesai)\r\n\t\t{\talert('Jam Mulai tidak boleh lebih telat dari atau sama dengan Jam Selesai');\r\n\t\t\tcek = false;\r\n\t\t}\r\n\t\telse if(jammulai == jamselesai)\r\n\t\t{\tif(menitmulai >= menitselesai)\r\n\t\t\t{\talert('Jam Mulai tidak boleh lebih telat dari atau sama dengan Jam Selesai');\r\n\t\t\t\tcek = false;\r\n\t\t\t}\r\n\t\t}\r\n\t\treturn cek;\r\n\t}\r\n\tfunction CekPanjangWaktu()\r\n\t{\tcek = true;\r\n\t\tjammulai = wawancaraedit.JamMulai_h.value;\r\n\t\tmenitmulai = wawancaraedit.JamMulai_n.value;\r\n\t\tjamselesai = wawancaraedit.JamSelesai_h.value;\r\n\t\tmenitselesai = wawancaraedit.JamSelesai_n.value;\r\n\t\tpanjangwaktu = wawancaraedit.PanjangWaktu.value;\r\n\t\t\r\n\t\trentangmenit = ((jamselesai - jammulai)*60)+(menitselesai-menitmulai);\r\n\t\tif(panjangwaktu > rentangmenit)\r\n\t\t{\talert('Panjang Waktu Wawancara tidak boleh lebih kecil dari selisih Jam Selesai dan Jam Mulai');\r\n\t\t\tcek = false;\r\n\t\t}\r\n\t\t\r\n\t\treturn cek;\r\n\t}\r\n </script>";
}
function KonfirmasiAkun()
{
$optakun = GetOption2('bipotnama', "Nama", 'Urutan', $_SESSION['BIPOTNamaID'], "KodeID='" . KodeID . "'", 'BIPOTNamaID');
$skrg = date('Y-m-d H:i');
echo <<<ESD
<h1 align=center>Laporan Pembayaran Per Akun</h1>
<table class=box cellspacing=1 align=center>
<form action='../{$_SESSION['mnux']}.bayarakun.php' method=POST>
<input type=hidden name='gos' value='Cetak' />
<input type=hidden name='TahunID' value='{$_SESSION['TahunID']}' />
<input type=hidden name='ProdiID' value='{$_SESSION['ProdiID']}' />
<input type=hidden name='Sekarang' value='{$skrg}' />
<tr><td class=inp>Akun:</td>
<td class=ul>
<select name='BIPOTNamaID'>{$optakun}</select>
</td>
</tr>
<tr><td class=ul colspan=2 align=center>
<input type=submit name='btnCetak' value='Cetak' />
<input type=button name='btnBatal' value='Batal'
onClick="window.close()" />
</td></tr>
</form>
</table>
ESD;
}
function tampilkancariasset($mnux='asset', $add=1){
global $arrID;
$optkel = GetOption2("kelompokasset", "concat(KelompokID, ' - ', Nama)", "KelompokID", $_SESSION['klp'], '', 'KelompokID');
$ck_nama = ($_SESSION['asturt'] == 'Nama')? 'checked' : '';
$ck_id = ($_SESSION['asturt'] == 'AssetID')? 'checked' : '';
$stradd = ($add == 0)? '' : "<tr><td class=ul>Pilihan:</td>
<td class=ul><a href='?mnux=asset&gos=AssetEdt&md=1'>Tambah Asset</td></tr>";
echo "<p><table class=box cellspacing=1 cellpadding=4>
<form action='?' method=POST>
<input type=hidden name='mnux' value='$mnux'>
<input type=hidden name='astpage' value='1'>
<tr><td class=ul colspan=2><b>$arrID[Nama]</b></td></tr>
<tr><td class=inp>Cari Asset:</td>
<td class=ul><input type=text name='astcr' value='$_SESSION[astcr]' size=18 maxlengh=10>
<input type=submit name='astkeycr' value='Nama'>
<input type=submit name='astkeycr' value='AssetID'>
<input type=submit name='astkeycr' value='Reset'></td></tr>
<tr><td class=inp>Urut berdasarkan:</td><td class=ul>
<input type=radio name='asturt' value='AssetID' $ck_id>ID
<input type=radio name='asturt' value='Nama' $ck_nama> Nama
<input type=submit name='Urutkan' value='Urutkan'></td></tr>
<tr><td class=inp> Kelompok :</td><td class=ul><select name='klp' OnChange='this.form.submit()'>$optkel</select></tr>
$stradd
</form></table></p>";
}
function Edit($tanggal, $md, $id)
{
if ($md == 0) {
$jdl = "Edit Hari Libur";
$w = GetFields('harilibur', "HariLiburID='{$id}' and KodeID", KodeID, '*');
} else {
if ($md == 1) {
$jdl = "Tambah Hari Libur";
$w = array();
$w['Warna'] = '#';
$w['TidakAdaKuliah'] = 'Y';
$w['NA'] = 'N';
$w['TanggalMulai'] = $tanggal;
$w['TanggalSelesai'] = $tanggal;
} else {
die(ErrorMsg("Error", "Mode penyimpanan tidak diketahui"));
}
}
CheckFormScript('Keterangan');
$opttanggalmulai = GetDateOption($w['TanggalMulai'], 'TanggalMulai');
$opttanggalselesai = GetDateOption($w['TanggalSelesai'], 'TanggalSelesai');
$optjenislibur = GetOption2('jenislibur', 'Nama', 'JenisLiburID', $w['JenisLiburID'], "KodeID='" . KodeID . "'", 'JenisLiburID', 0, 1);
$checkadakuliah = $w['TidakAdaKuliah'] == 'Y' ? 'checked' : '';
$NA = $w['NA'] == 'Y' ? 'checked' : '';
echo "<table class=bsc cellspacing=1 width=100%>\r\n\t\t\t<form name='datalibur' id='datalibur' action='?mnux={$_SESSION['mnux']}&gos=SavData' method=POST onSubmit=\"return CheckForm(this)\">\r\n\t\t\t<input type=hidden name='md' value='{$md}'>\r\n\t\t\t<input type=hidden name='id' value='{$id}'>\r\n\t\t\t<tr><td class=inp>Tanggal Mulai:</td>\r\n\t\t\t <td class=ul1>{$opttanggalmulai}</td>\r\n\t\t\t </tr>\r\n\t\t\t<tr><td class=inp>Tanggal Selesai:</td>\r\n\t\t\t <td class=ul1>{$opttanggalselesai}</td>\r\n\t\t\t </tr>\r\n\t\t\t<tr><td class=inp>Keterangan:</td>\r\n\t\t\t <td class=ul1><textarea name='Keterangan' cols=30 row=2>{$w['Keterangan']}</textarea></td>\r\n\t\t\t </tr>\r\n\t\t\t<tr><td class=inp>Jenis Libur:</td>\r\n\t\t\t <td class=ul1><select name='JenisLiburID'>{$optjenislibur}</select></td></tr>\r\n\t\t\t<tr><td class=inp>Tidak ada kuliah/ujian?</td>\r\n\t\t\t <td class=ul1><input type=checkbox name='TidakAdaKuliah' value='Y' {$checkadakuliah}></td>\r\n\t\t\t </tr>\r\n\t\t\t<tr><td class=inp>Tidak Aktif?</td>\r\n\t\t\t <td class=u1l><input type=checkbox name='NA' value='Y' {$NA}></td></tr>\r\n\t\t\t<tr><td colspan=2 align=center><input type=submit name='Simpan' value='Simpan Hari Libur' onClick=\"return CekTanggal(this.form)\">\r\n\t\t\t\t\t\t\t\t\t\t <input type=button name='Batal' value='Batal' onClick=\"window.close()\"></td>\r\n\t\t\t </tr>\r\n\t\t\t </form>\r\n\t\t </table>\r\n\t\t <script>\r\n\t\t\tfunction CekTanggal(frm)\r\n\t\t\t{\tvar mulai = new Date(frm.TanggalMulai_y.value, frm.TanggalMulai_m.value, frm.TanggalMulai_d.value);\r\n\t\t\t\tvar selesai = new Date(frm.TanggalSelesai_y.value, frm.TanggalSelesai_m.value, frm.TanggalSelesai_d.value);\r\n\t\t\t\r\n\t\t\t\tif(selesai < mulai) \r\n\t\t\t\t{\talert('Tanggal Mulai tidak boleh melebihi Tanggal Selesai');\r\n\t\t\t\t\treturn false;\r\n\t\t\t\t}\r\n\t\t\t\t\r\n\t\t\t\treturn true;\r\n\t\t\t}\r\n\t\t </script>\r\n\t\t ";
}
function MKSTREDT($m)
{
$md = $_REQUEST['md'] + 0;
if ($md == 0) {
$w = GetFields('mhswpindahansetara', "KRSID", $_REQUEST['KRSID'], '*');
$jdl = "Edit Matakuliah yg Disetarakan";
} else {
$w = array();
$w['KRSID'] = 0;
$w['MhswPindahanID'] = $_SESSION['MPID'];
$w['TahunID'] = '00000';
$w['MKID'] = 0;
$w['MKKode'] = '';
$w['SKS'] = -1;
$w['GradeNilai'] = '';
$w['SetaraKode'] = '';
$w['SetaraGrade'] = '';
$w['SetaraNama'] = '';
$w['SetaraSKS'] = 0;
$w['NilaiAkhir'] = 0;
$jdl = "Tambah Matakuliah yg Disetarakan";
}
CheckFormScript('SetaraKode,SetaraGrade,SetaraNama');
TampilkanJudul($jdl);
$optn = GetOption2("nilai", "concat(Nama, ' (', Bobot, ')')", "Bobot desc", $w['GradeNilai'], "ProdiID='{$m['ProdiID']}'", 'Nama');
$kurid = GetaField('kurikulum', "NA='N' and ProdiID", $m['ProdiID'], 'KurikulumID');
$optm = GetOption2("mk", "concat(MKKode, ' - ', Nama, ' (', SKS, ')')", 'MKKode', $w['MKID'], "KurikulumID={$kurid}", 'MKID');
echo "<p><table class=box cellspacing=1>\r\n <form action='?' name='data' method=POST onSubmit=\"return CheckForm(this)\">\r\n <input type=hidden name='gos' value='MKSTRSAV'>\r\n <input type=hidden name='md' value={$md}>\r\n <input type=hidden name='MPID' value='{$w['MhswPindahanID']}'>\r\n <input type=hidden name='KRSID' value='{$w['KRSID']}'>\r\n \r\n <tr><th class=ttl colspan=2>Matakuliah Asli</th>\r\n <th class=ul><img src='img/kanan.gif'></th>\r\n <th class=ttl colspan=2>Matakuliah {$_SESSION['KodeID']} (Setara)</th></tr>\r\n <tr><td class=inp>Kode Asli</td>\r\n <td class=ul><input type=text name='SetaraKode' value='{$w['SetaraKode']}' size=20 maxlength=30></td>\r\n <td class=ul><img src='img/kanan.gif'></td>\r\n <td class=inp>Kode MK</td>\r\n <td class=ul><select name='MKID'>{$optm}</select></td>\r\n </tr>\r\n <tr><td class=inp>Nama MK</td>\r\n <td class=ul><input type=text name='SetaraNama' value='{$w['SetaraNama']}' size=30 maxlength=50></td>\r\n <td></td>\r\n <td></td>\r\n <td></td>\r\n </tr>\r\n <tr><td class=inp>SKS Asli</td>\r\n <td class=ul><input type=text name='SetaraSKS' value='{$w['SetaraSKS']}' size=10 maxlength=5>\r\n <td></td>\r\n <td></td>\r\n <td></td>\r\n </tr>\r\n <tr><td class=inp>Nilai Asli</td>\r\n <td class=ul><input type=text name='NilaiAkhir' value='{$w['NilaiAkhir']}' size=10 maxlength=5>\r\n <td></td>\r\n <td></td>\r\n <td></td>\r\n </tr>\r\n <tr><td class=inp>Grade Nilai Asli</td>\r\n <td class=ul><input type=text name='SetaraGrade' value='{$w['SetaraGrade']}' size=10 maxlength=5>\r\n <td class=ul><img src='img/kanan.gif'></td>\r\n <td class=inp>Grade</td>\r\n <td class=ul><select name='GradeNilai'>{$optn}</select></td>\r\n </tr>\r\n <tr><td class=ul colspan=5>\r\n <input type=submit name='Simpan' value='Simpan'>\r\n <input type=reset name='Reset' value='Reset'>\r\n <input type=button name='Batal' value='Batal' onClick=\"location='?mnux=pindahan.setara'\"></td></tr>\r\n </form></table></p>";
}
function BeaEdt()
{
global $pref, $token;
$md = $_REQUEST['md'] + 0;
if ($md == 0) {
$w = GetFields('beasiswa', "BeasiswaID", $_REQUEST['BeasiswaID'], '*');
$BeasiswaID = "<input type=hidden name='BeasiswaID' value='{$w['BeasiswaID']}'><b>{$w['BeasiswaID']}</b>";
$jdl = "Edit Jenis Beasiswa";
} else {
$w = array();
$BeasiswaID = "<input type=text name='BeasiswaID' size=20 maxlength=30>";
$w['BeasiswaID'] = '';
$w['KodeID'] = $_SESSION['KodeID'];
$w['BIPOTNamaID'] = 0;
$w['Nama'] = '';
$w['IPSMin'] = 0;
$w['IPKMin'] = 0;
$w['Prasyarat'] = '';
$w['Keterangan'] = '';
$w['NA'] = 'N';
$jdl = "Tambah Jenis Beasiswa";
}
$na = $w['NA'] == 'Y' ? 'checked' : '';
$optbpt = GetOption2('bipotnama', "Nama", 'Nama', $w['BIPOTNamaID'], "KodeID='{$w['KodeID']}' and TrxID=-1 and BIPOTNamaID", "BIPOTNamaID");
// Tampilan
echo "<p><table class=box cellspacing=1 cellpadding=4>\r\n <form action='?' method=POST name='jenbeasiswa'>\r\n <input type=hidden name='mnux' value='beasiswa'>\r\n <input type=hidden name='md' value='{$md}'>\r\n <input type=hidden name='{$pref}' value='{$token}'>\r\n <input type=hidden name='sub' value='BeaSav'>\r\n \r\n <tr><th class=ttl colspan=2>{$jdl}</th></tr>\r\n <tr><td class=inp>Kode Beasiswa</td><td class=ul>{$BeasiswaID}</td></tr>\r\n <tr><td class=inp>Beasiswa</td><td class=ul><input type=text name='Nama' value='{$w['Nama']}' size=50 maxlength=50></td></tr>\r\n <tr><td class=inp>Akun Potongan</td><td class=ul><select name='BIPOTNamaID'>{$optbpt}</select></td></tr>\r\n <tr><td class=inp>IPS Minimal</td><td class=ul><input type=text name='IPSMin' value='{$w['IPSMin']}' size=5 maxlength=5></td></tr>\r\n <tr><td class=inp>IPK Minimal</td><td class=ul><input type=text name='IPKMin' value='{$w['IPKMin']}' size=5 maxlength=5></td></tr>\r\n <tr><td class=inp>Prasyarat</td><td class=ul><textarea name='Prasyarat' cols=30 rows=8>{$w['Prasyarat']}</textarea></td></tr>\r\n <tr><td class=inp>Keterangan</td><td class=ul><textarea name='Keterangan' cols=30 rows=5>{$w['Keterangan']}</textarea></td></tr>\r\n <tr><td class=inp>Tidak aktif (NA)?</td><td class=ul><input type=checkbox name='NA' value='Y' {$na}></td></tr>\r\n <tr><td class=ul colspan=2><input type=submit name='Simpan' value='Simpan'>\r\n <input type=reset name='Reset' value='Reset'>\r\n <input type=button name='Batal' value='Batal' onClick=\"location='?mnux=beasiswa'\"></td></tr>\r\n </form>\r\n </table></p>";
}
function BuatKoreksi($mhsw)
{
$md = $_REQUEST['md'] + 0;
$krs = GetFields('krs', 'KRSID', $_REQUEST['KRSID'], '*');
if ($md == 0) {
$w = GetFields('koreksinilai', "KoreksiNilaiID", $_REQUEST['KNID'], '*');
$jdl = "Edit SK Koreksi Nilai";
} else {
$w = array();
$w['KoreksiNilaiID'] = 0;
$w['Tanggal'] = date('Y-m-d');
$w['SK'] = '';
$w['Perihal'] = '';
$w['TahunID'] = $krs['TahunID'];
$w['KRSID'] = $krs['KRSID'];
$w['MhswID'] = $mhsw['MhswID'];
$w['MKID'] = $krs['MKID'];
$w['GradeLama'] = $krs['GradeNilai'];
$w['GradeNilai'] = $krs['GradeNilai'];
$w['Pejabat'] = '';
$w['Jabatan'] = '';
$w['Lampiran'] = '';
$w['Keterangan'] = '';
$w['NA'] = 'N';
$jdl = "Tambah SK Koreksi Nilai";
}
$mk = GetFields('mk', 'MKID', $w['MKID'], "MKKode, Nama");
$tgl = GetDateOption($w['Tanggal'], "TGL");
$optnilai = GetOption2('nilai', "concat(Nama, ' (', Bobot, ')')", "Bobot desc", $w['GradeNilai'], "ProdiID='{$mhsw['ProdiID']}'", "Nama");
// Tampilkan form
CheckFormScript("SK,Perihal,GradeNilai,Keterangan,Pejabat,Jabatan");
echo "<p><table class=box cellspacing=1>\r\n <form action='?' method=POST onSubmit=\"return CheckForm(this)\">\r\n <input type=hidden name='mnux' value='koreksi.nilai'>\r\n <input type=hidden name='gos' value='KoreksiSav'>\r\n <input type=hidden name='md' value='{$md}'>\r\n <input type=hidden name='KoreksiNilaiID' value='{$w['KoreksiNilaiID']}'>\r\n <input type=hidden name='TahunID' value='{$w['TahunID']}'>\r\n <input type=hidden name='KRSID' value='{$w['KRSID']}'>\r\n <input type=hidden name='MKID' value='{$w['MKID']}'>\r\n <input type=hidden name='MhswID' value='{$w['MhswID']}'>\r\n <input type=hidden name='GradeLama' value='{$w['GradeLama']}'>\r\n <tr><td class=ul colspan=2><font size=+1>{$jdl}</font></td></tr>\r\n <tr><td class=inp>Nomer SK</td><td class=ul><input type=text name='SK' value='{$w['SK']}' size=30 maxlength=50></td></tr>\r\n <tr><td class=inp>Tanggal SK</td><td class=ul>{$tgl}</td></tr>\r\n <tr><td class=inp>Perihal</td><td class=ul><input type=text name='Perihal' value='{$w['Perihal']}' size=30 maxlength=50></td></tr>\r\n <tr><td class=inp>Matakuliah</td><td class=ul><font size=+1>{$mk['Nama']}</font> ({$mk['MKKode']})</td></tr>\r\n <tr><td class=inp>Nilai/Grade Lama</td><td class=ul><font size=+1>{$w['GradeLama']}</font></td></tr>\r\n <tr><td class=inp>Nilai/Grade Baru</td><td class=ul><select name='GradeNilai'>{$optnilai}</select></td></tr>\r\n <tr><td class=inp>Keterangan (Sebab2)</td><td class=ul><textarea name='Keterangan' cols=30 rows=3>{$w['Keterangan']}</textarea></td></tr>\r\n <tr><td class=inp>Dibuat oleh</td><td class=ul><input type=text name='Pejabat' value='{$w['Pejabat']}' size=30 maxlength=50></td></tr>\r\n <tr><td class=inp>Jabatan</td><td class=ul><input type=text name='Jabatan' value='{$w['Jabatan']}' size=30 maxlenght=50></td></tr>\r\n <tr><td class=ul colspan=2><input type=submit name='Simpan' value='Simpan'>\r\n <input type=reset name='Reset' value='Reset'>\r\n <input type=button name='Batal' value='Batal' onClick=\"location='?mnux=koreksi.nilai&gos=TampilkanNilaiMhsw'\"></td></tr>\r\n </form></table></p>";
}
function DataMhsw($mhsw)
{
$lls = $mhsw['StatusMhswID'] != 'L' ? "Transkrip Nilai (baru bisa dicetak kalau mhsw sudah lulus)" : "<a href='?mnux=transkrip&gos=TransNilai&md=1'>Transkrip Nilai Akhir</a>";
$optbhs = GetOption2('bahasa', "concat(BahasaID, ' - ', Nama)", "Nama", $_SESSION['bhs'], '', 'BahasaID');
$perolehan = $mhsw['ProdiID'] == '10' ? "<li><a href='?mnux=transkrip&gos=PerolehanSKS'>Daftar Perolehan SKS</a></li>" : '';
// buat opsi printer
$optPrinter = GetOptionPrinter();
$optJns = GetJenisTranskrip();
echo <<<END
<p><table class=box cellspacing=1 cellpadding=4>
<tr><td class=ul colspan=4><b>{$mhsw['KodeID']}</b></td></tr>
<tr><td class=inp>NPM</td><td class=ul>{$mhsw['MhswID']}</td>
<td class=inp>Nama Mahasiswa</td><td class=ul>{$mhsw['Nama']}</td></tr>
<tr><td class=inp>Angkatan</td><td class=ul>{$mhsw['TahunID']}</td>
<td class=inp>Status</td><td class=ul>{$mhsw['SM']}</td></tr>
<tr><td class=inp>IPK</td><td class=ul>{$mhsw['IPK']}</td>
<td class=inp>Total SKS</td><td class=ul>{$mhsw['TotalSKS']} SKS</td></tr>
<form action='?' method=GET>
<input type=hidden name='mnux' value='transkrip'>
<tr><td class=inp>Bahasa</td><td class=ul><select name='bhs' onChange='this.form.submit()'>{$optbhs}</select></td>
<td class=inp>Jenis Printer</td><td class=ul><select name='_Printer' onChange='this.form.submit()'>{$optPrinter}</select></td></tr>
\t<tr><td class=inp>Jenis Transkrip</td><td class=ul colspan=3><select name='_Jns' onChange='this.form.submit()'>{$optJns}</select></td></tr>
</form>
</table></p>
<p><b>Laporan</b></p>
<ol>
{$perolehan}
<li><a href='?mnux=transkrip&gos=TransNilai&md=0'>Transkrip Sementara</a></li>
<li>{$lls}</li>
</ol>
END;
}
function TampilkanPresensiMhsw($p)
{
$s = "select pm.*, mhsw.Nama\r\n from presensimhsw pm\r\n left outer join mhsw on mhsw.MhswID = pm.MhswID and mhsw.KodeID = '" . KodeID . "'\r\n where pm.PresensiID = '{$p['PresensiID']}'\r\n order by pm.MhswID";
$r = _query($s);
$def = GetFields('jenispresensi', 'Def', 'Y', '*');
$opt0 = GetOption2('jenispresensi', "Nama", 'JenisPresensiID', $def['JenisPresensiID'], '', 'JenisPresensiID');
echo "<table class=box cellspacing=1 width=100%>";
echo "<script>\r\n function ttutup() {\r\n opener.location='../index.php?mnux={$_SESSION['mnux']}&gos=Edit&JadwalID={$p['JadwalID']}';\r\n self.close();\r\n return false;\r\n }\r\n </script>";
echo "<tr>\r\n <form action='../{$_SESSION['mnux']}.mhswedit.php' method=POST>\r\n <input type=hidden name='gos' value='SimpanSemua' />\r\n <input type=hidden name='pid' value='{$p['PresensiID']}' />\r\n \r\n <td class=ul colspan=5>Set semua ke:\r\n <select name='Stt'>{$opt0}</select>\r\n <input type=submit name='SetStt' value='Set Status' />\r\n <input type=button name='Refresh' value='Refresh' \r\n onClick=\"location='../{$_SESSION['mnux']}.mhswedit.php?pid={$p['PresensiID']}'\" />\r\n <input type=button name='Tutup' value='Tutup' onClick=\"ttutup()\" />\r\n </td>\r\n \r\n </form>\r\n </tr>";
$n = 0;
$arr = GetArrPre();
while ($w = _fetch_array($r)) {
$n++;
$optpre = GetOptPre($arr, $w['JenisPresensiID']);
echo "\r\n <tr><td class=inp width=10>{$n}</td>\r\n <td class=inp1 width=94><b>{$w['MhswID']}</b></td>\r\n <td class=ul1 width=260>{$w['Nama']}</td>\r\n <td class=ul><select id='PresensiMhsw_{$w['PresensiMhswID']}'\r\n onChange='javascript:SetPresensiMhsw({$w['PresensiMhswID']})'>{$optpre}</select></td>\r\n </tr>";
}
echo <<<SCR
</table>
<script>
function SetPresensiMhsw(id) {
var status = document.getElementById("PresensiMhsw_"+id).value;
lnk = "../{$_SESSION['mnux']}.mhswedit.save.php?id="+id+"&st="+status;
win2 = window.open(lnk, "", "width=0, height=0, scrollbars, status");
if (win2.opener == null) childWindow.opener = self;
}
</script>
SCR;
}
function BPTEDT()
{
$mhswid = $_REQUEST['mhswid'];
$w = GetFields('mhsw', 'MhswID', $mhswid, '*');
$bipotid = GetOption2("bipot", "concat(Tahun, ' - ', Nama, ' - ', Def)", 'Tahun', $w['BIPOTID'], "ProgramID='{$w['ProgramID']}' and ProdiID='{$w['ProdiID']}'", 'BIPOTID');
echo "<p><table class=box cellspacing=1 cellpadding=4>\r\n <form action='?' method=POST>\r\n <input type=hidden name='mnux' value='mhswmasterbipot'>\r\n <input type=hidden name='mhswid' value='{$mhswid}'>\r\n <input type=hidden name='gos' value='BPTSAV'>\r\n\r\n <tr><th class=ttl colspan=2>Edit Master Biaya & Potongan Mhsw</th></tr>\r\n <tr><td class=inp1>NPM</td><td class=ul>{$w['MhswID']}</td></tr>\r\n <tr><td class=inp1>Nama</td><td class=ul>{$w['Nama']}</td></tr>\r\n <tr><td class=inp1>Program</td><td class=ul>{$w['ProgramID']}</td></tr>\r\n <tr><td class=inp1>Program Studi</td><td class=ul>{$w['ProdiID']}</td></tr>\r\n <tr><td class=inp1>Biaya dan Potongan</td><td class=ul><select name='BIPOTID'>{$bipotid}</select></td></tr>\r\n <tr><td colspan=2><input type=submit name='Simpan' value='Simpan'>\r\n <input type=reset name='Reset' value='Reset'>\r\n <input type=button name='Batal' value='Batal' onClick=\"location='?mnux=mhswmasterbipot'\"></td></tr>\r\n </form></table></p>";
}
function ModEdt()
{
global $_Author, $_AuthorEmail;
$md = $_REQUEST['md'] + 0;
if ($md == 0) {
$w = GetFields('mdl', 'MdlID', $_REQUEST['mid'], '*');
$jdl = 'Edit Modul';
} else {
$w = array();
$w['MdlID'] = '';
$w['MdlGrpID'] = $_SESSION['mdlgrp'];
$w['Nama'] = '';
$w['Script'] = '';
$w['LevelID'] = '.';
$w['Web'] = 'Y';
$w['CS'] = 'N';
$w['Author'] = $_Author;
$w['EmailAuthor'] = $_AuthorEmail;
$w['Simbol'] = '';
$w['Help'] = '';
$w['NA'] = 'N';
$w['Keterangan'] = '';
$jdl = "Tambah Modul";
}
$optgrp = GetOption2('mdlgrp', "concat(MdlGrpID, ' - ', Nama)", 'Nama', $w['MdlGrpID'], "Accounting = 'N'", 'MdlGrpID');
$na = $w['NA'] == 'Y' ? 'checked' : '';
$web = $w['Web'] == 'Y' ? 'checked' : '';
$cs = $w['CS'] == 'Y' ? 'checked' : '';
$snm = session_name();
$sid = session_id();
$DftrLevel = GetDftrLevel($w['LevelID']);
// Tampilkan form
echo "<p><table class=box cellspacing=1 cellpadding=4>\n <form action='?' name='data' method=POST>\n <input type=hidden name='md' value='{$md}'>\n <input type=hidden name='MdlID' value='{$w['MdlID']}'>\n <input type=hidden name='mnux' value='sysmod'>\n <input type=hidden name='token' value='ModSav'>\n\n <tr><th colspan=3 class=ttl>{$jdl}</th></tr>\n <tr><td class=inp1>Nama</td><td class=ul><input type=text name='Nama' value='{$w['Nama']}' size=40 maxlength=50></td>\n <td class=ul rowspan=12 valign=bottom>{$DftrLevel}</td></tr>\n <tr><td class=inp1>Group</td><td class=ul><select name='MdlGrpID'>{$optgrp}</select></td></tr>\n <tr><td class=inp1>Script</td><td class=ul><input type=text name='Script' value='{$w['Script']}' size=40 maxlength=50></td></tr>\n <tr><td class=inp1>Level</td><td class=ul><input type=text name='LevelID' value='{$w['LevelID']}' size=40 maxlength=50></td></tr>\n <tr><td class=inp1>Versi Web</td><td class=ul><input type=checkbox name='Web' value='Y' {$web}></td></tr>\n <tr><td class=inp1>Versi CS</td><td class=ul><input type=checkbox name='CS' value='Y' {$cs}></td></tr>\n <tr><td class=inp1>Author</td><td class=ul><input type=text name='Author' value='{$w['Author']}' size=40 maxlength=50></td></tr>\n <tr><td class=inp1>Email</td><td class=ul><input type=text name='EmailAuthor' value='{$w['EmailAuthor']}' size=40 maxlength=50></td></tr>\n <tr><td class=inp1>Simbol</td><td class=ul><input type=text name='Simbol' value='{$w['Simbol']}' size=40 maxlength=50></td></tr>\n <tr><td class=inp1>Help</td><td class=ul><input type=text name='Help' value='{$w['Help']}' size=40 maxlength=50></td></tr>\n <tr><td class=inp1>NA (tdk aktif)</td><td class=ul><input type=checkbox name='NA' value='Y' {$na}></td></tr>\n <tr><td class=inp1>Keterangan</td><td class=ul><textarea name='Keterangan' cols=30 rows=3>{$w['Keterangan']}</textarea></td></tr>\n <tr><td colspan=2><input type=submit name='Simpan' value='Simpan'>\n <input type=reset name='Reset' value='Reset'>\n <input type=button name='Batal' value='Batal' onClick=\"location='?mnux=sysmod'\"></td></tr>\n </form></table></p>";
}
function TampilkanHeaderAlumni()
{
$optprodi = GetOption2('prodi', "concat(ProdiID, ' - ', Nama)", 'ProdiID', $_SESSION['prodi'], "KodeID='{$_SESSION['KodeID']}'", 'ProdiID');
$optprid = GetOption2('program', "concat(ProgramID, ' - ', Nama)", 'ProgramID', $_SESSION['prid'], "KodeID='{$_SESSION['KodeID']}'", 'ProgramID');
// Tampilkan formulir
echo "<p><table class=box cellspacing=1 cellpadding=4 width=700>\r\n <form action='?' method=POST>\r\n <input type=hidden name='mnux' value='{$_SESSION['mnux']}' />\r\n <input type=hidden name='alumnipage' value='1' />\r\n\r\n <tr><td class=inp>Program:</td>\r\n <td class=ul1><select name='prid' onChange='this.form.submit()'>{$optprid}</select></td>\r\n <td class=inp>Program Studi:</td>\r\n <td class=ul1><select name='prodi' onChange='this.form.submit()'>{$optprodi}</select></td></tr>\r\n <tr><td class=inp>Cari Mhsw:</td>\r\n <td class=ul1 colspan=3>\r\n <input type=text name='srcmhswval' value='{$_SESSION['srcmhswval']}' size=20 maxlength=20>\r\n <input type=submit name='srcmhswkey' value='NPM'>\r\n <input type=submit name='srcmhswkey' value='Nama'>\r\n <input type=submit name='srcmhswkey' value='Reset'></td>\r\n </tr>\r\n </form>\r\n </table></p>";
}
function TampilkanDaftarYudisium()
{
$optprd = GetOption2('prodi', "concat(ProdiID, ' - ', Nama)", "ProdiID", $_SESSION['prodi'], '', "ProdiID");
$bulan1 = GetMonthOption($_SESSION['bulan1']);
$bulan2 = GetMonthOption($_SESSION['bulan2']);
$tahun1 = GetNumberOption(date('Y') - 10, date('Y'), $_SESSION['tahun1']);
$tahun2 = GetNumberOption(date('Y') - 10, date('Y') + 1, $_SESSION['tahun2']);
$TglYudisium = GetDateOption($_SESSION['TglYudisium'], 'TglYudisium');
echo "<p><table class=box cellspacing=1 cellpadding=4>\r\n <form action='?' method=POST>\r\n <tr><td class=ul colspan=2><font size=+1>Filter</font></td></tr>\r\n <tr><td class=inp>Prodi :</td><td class=ul><select name='prodi'>{$optprd}</select> Kosongkan jika ingin melihat semua</td></tr>\r\n <tr><td class=inp>Lulus bulan :</td><td class=ul>\r\n <select name='bulan1'>{$bulan1}</select><select name='tahun1'>{$tahun1}</select> s/d\r\n <select name='bulan2'>{$bulan2}</select><select name='tahun2'>{$tahun2}</select> <input type=submit name='Filter' value='Filter Daftar'></td></tr>\r\n </form>\r\n \r\n <tr><td class=ul colspan=2><font size=+1>SK Yudisium</font></td></tr>\r\n <tr><td colspan=2>Set mahasiswa yang bertanda centang dalam daftar di bawah ini dengan SK Yudisium berikut ini:</td></tr> \r\n <form action='?' method=POST>\r\n <input type=hidden name='mnux' value='skyudisium'>\r\n <input type=hidden name='gos' value='SKYSAV'>\r\n <tr><td class=inp>No SK Yudisium :</td><td class=ul><input type=text name='SKYudisium' value='{$_SESSION['SKYudisium']}' size=50 maxlength=100></td></tr>\r\n <tr><td class=inp>Tanggal Yudisium :</td><td class=ul>{$TglYudisium} <input type=submit name='Simpan' value='Set SK Semua yg Dicentang'></td></tr>\r\n </table></p>";
if ($_SESSION['prodi'] != '10') {
$_whr = "('{$_SESSION['tahun1']}-{$_SESSION['bulan1']}-01' <= ta.TglUjian) \r\n and (ta.TglUjian <= '{$_SESSION['tahun2']}-{$_SESSION['bulan2']}-31') and ";
} else {
$_whr = "";
}
$s = "select ta.*, m.Nama\r\n from ta ta\r\n left outer join mhsw m on ta.MhswID=m.MhswID\r\n where ta.Lulus='Y'\r\n and m.ProdiID = '{$_SESSION['prodi']}'\r\n \r\n order by ta.MhswID";
$r = _query($s);
$n = 0;
$TotalSKY = _num_rows($r) + 0;
echo "<input type=hidden name='TotalSKY' value={$TotalSKY}>\r\n <p><table class=box cellspacing=1 cellpadding=4>\r\n <tr><th class=ttl>#</th>\r\n <th class=ttl>N.P.M</th>\r\n <th class=ttl>Nama Mahasiswa</th>\r\n <th class=ttl>Tgl Ujian</th>\r\n <th class=ttl>Judul</th>\r\n <th class=ttl>SK Yudisium</th>\r\n <th class=ttl>Tgl Yudisium</th>\r\n <th class=ttl>Centang</th>\r\n </tr>";
while ($w = _fetch_array($r)) {
$n++;
$TglSKYudisium = FormatTanggal($w['TglSKYudisium']);
echo "<tr><td class=inp>{$n}</td>\r\n <td class=ul>{$w['MhswID']}</td>\r\n <td class=ul>{$w['Nama']}</td>\r\n <td class=ul>{$w['TglUjian']}</td>\r\n <td class=ul>{$w['Judul']}</td>\r\n <td class=ul>{$w['SKYudisium']} </td>\r\n <td class=ul>{$TglSKYudisium}</td>\r\n <td class=ul><input type=checkbox name='SKY[]' value='{$w['TAID']}'></td>\r\n </tr>";
}
echo "</table></form></p>";
}
function Edit($MhswID, $TahunID, $md, $id, $tagihanid)
{
if ($md == 0) {
$jdl = "Edit Potongan Mhsw";
$w = GetFields('bipotmhsw', 'BIPOTMhswID', $id, '*');
$ro = "readonly=true disabled=true";
} elseif ($md == 1) {
$jdl = "Tambah Potongan Mhsw";
$w = array();
$w['Jumlah'] = 1;
$ro = '';
} else {
die(ErrorMsg('Error', "Mode edit <b>{$md}</b> tidak ditemukan.<br />\r\n Hubungi Sysadmin untuk informasi lebih detail.\r\n <hr size=1 color=silver />\r\n Opsi: <input type=button name='Tutup' value='Tutup'\r\n onClick=\"window.close()\" />"));
}
// Tampilkan formulir
if ($_SESSION['_LevelID'] == 1) {
$Dibayar = "<tr>\r\n <td class=inp>Dibayar:</td>\r\n <td class=ul><input type=text name='Dibayar' value='{$w['Dibayar']}' size=20 maxlength=20 /></td>\r\n </tr>";
} else {
$Dibayar = "<input type=hidden name='Dibayar' value='{$w['Dibayar']}' />";
}
$BIPOTID = GetaField('mhsw', 'MhswID', $MhswID, 'BIPOTID');
$bn = GetFields('bipotnama', 'BIPOTNamaID', $w['BIPOTNamaID'], 'Nama');
$optbipotnama = GetOption2('bipotnama a inner join bipot2 b on a.BIPOTNamaID = b.BIPOTNamaID', "concat(a.Nama, ' (', a.TrxID, ')')", 'a.TrxID, a.Urutan', $w['BIPOTNamaID'], "a.KodeID='" . KodeID . "' and b.BIPOTID='{$BIPOTID}' and a.NA='N' and b.NA='N' and a.TrxID=-1", "concat(a.BIPOTNamaID,',',b.Jumlah)", 1);
// concat(a.BIPOTNamaID,',',b.Jumlah)
$optbipotnama2 = $md == 1 ? "<select id='bipotnamaid2' name='BIPOTNamaID2' onChange='test(this.value)' {$ro}>{$optbipotnama}</select>" : "";
$txtbipotnama = $md == 1 ? "" : "<input type=text value='{$bn['Nama']}' size=50 length=50 disabled>";
echo "<p><table class=box cellspacing=1 width=100%>\r\n <form action='../{$_SESSION['mnux']}.bipotedit2.php' method=POST>\r\n <input type=hidden name='gos' value='Simpan' />\r\n <input type=hidden name='md' value='{$md}' />\r\n <input type=hidden name='MhswID' value='{$MhswID}' />\r\n <input type=hidden name='TahunID' value='{$TahunID}' />\r\n <input type=hidden name='tagihanid' value='{$tagihanid}' />\r\n <input type=hidden name='id' value='{$id}' /> \r\n <tr><th class=ttl colspan=2>{$jdl}</th></tr>\r\n <tr><td class=inp>Potongan:</td><td class=ul1>\r\n {$optbipotnama2}\r\n {$txtbipotnama}\r\n <input type=hidden id='bipotnamaid' name='BIPOTNamaID' value='{$w['BIPOTNamaID']}'> </td></tr>\r\n <tr><td class=inp>Jumlah:</td><td class=ul1><input type=text name='Jumlah' value='{$w['Jumlah']}' size=3 maxlength=3 /></td></td>\r\n <tr><td class=inp>Besar, Rp:</td><td class=ul1><input type=text id='besar' name='Besar' value='{$w['Besar']}' size=20 maxlength=20 /></td></tr>\r\n {$Dibayar}\r\n <tr><td class=inp>Catatan:</td><td class=ul1><textarea name='Catatan' cols=30 rows=4>{$w['Catatan']}</textarea></td></tr>\r\n <tr><td class=ul1 colspan=2 align=center><input type=submit name='Simpan' value='Simpan' /><input type=button name='Batal' value='Batal' onClick=\"window.close()\" /></td></tr> \r\n </form></table></p>";
}
function TampilkanHeaderNilaiMhsw()
{
global $arrID;
CheckFormScript("tahun");
$optprd = GetOption2("prodi", "concat(ProdiID, ' - ', Nama)", "ProdiID", $_SESSION['prodi'], '', "ProdiID");
echo "<p><table class=box cellspacing=1 cellpadding=4>\r\n <form action='?' method=POST onSubmit=\"return CheckForm(this)\">\r\n <input type=hidden name='mnux' value='{$_SESSION['mnux']}'>\r\n <input type=hidden name='gos' value='CreateDBFNilaiMhsw'>\r\n <tr><th class=ttl colspan=5>{$arrID['Nama']}</th></tr>\r\n\t<tr><td class=inp>Tahun Akademik</td><td class=ul colspan=4><input type=text name=tahun value='{$_SESSION['tahun']}' size=15></td></tr>\r\n\t<tr><td class=inp>Prodi</td><td class=ul colspan=4><select name='prodi'>{$optprd}</td></tr> \r\n <tr></tr> <td class=inp>Dari NIM:</td>\r\n <td class=ul><input type=text name='DariNPM' value='{$_SESSION['DariNPM']}' size=20 maxlength=50></td>\r\n <td class=inp>Sampai NIM:</td>\r\n <td class=ul><input type=text name='SampaiNPM' value='{$_SESSION['SampaiNPM']}' size=20 maxlength=50></td>\r\n <td class=ul><input type=submit name='Cetak' value='Proses'></td>\r\n \r\n </form></table></p>";
}
function PresenterAdd($mnux = 'presenter', $gos = 'PresenterAddSav', $sub = '')
{
$md = $_REQUEST['md'] + 0;
if ($md == 0) {
$w = GetFields('presenter', 'Login', $_REQUEST['presenterid'], '*');
$jdl = "Edit Data Pribadi";
$_strdsnid = "<input type=hidden name='presenterid' value='{$w['Login']}'><b>{$w['Login']}</b>";
} else {
$w = array();
$w['Login'] = '';
$w['Nama'] = '';
$w['Jabatan'] = '';
$w['Telephone'] = '';
$w['Handphone'] = '';
$w['Email'] = '';
$w['TempatLahir'] = '';
$w['TanggalLahir'] = date('Y-m-d');
$w['KelaminID'] = 'P';
$w['AgamaID'] = 'K';
$w['NA'] = 'N';
$jdl = "Tambah Presenter";
$_strpresenterid = "<input type=text name='presenterid' size=20 maxlength=20>";
}
$_na = $w['NA'] == 'Y' ? 'checked' : '';
$snm = session_name();
$sid = session_id();
$TglLahir = GetDateOption($w['TanggalLahir'], 'TglLahir');
$optagm = GetOption2('agama', "concat(Agama, ' - ', Nama)", 'Agama', $w['AgamaID'], '', 'Agama');
$radkel = GetRadio("select Nama, Kelamin from kelamin order by Nama", "Kelamin", "Nama", "Kelamin", $w['KelaminID'], ", ");
echo "<p><table class=box cellspacing=1 cellpadding=4>\n <form action='?' method=POST>\n <input type=hidden name='mnux' value='{$mnux}'>\n <input type=hidden name='gos' value='{$gos}'>\n <input type=hidden name='sub' value='{$sub}'>\n <input type=hidden name='md' value='{$md}'>\n <tr><th class=ttl colspan=2>{$jdl}</th></tr>\n <tr><td class=inp1>Login/Presenter ID</td><td class=ul>{$_strpresenterid}</td></tr>\n <tr><td class=inp1>Nama Presenter</td><td class=ul><input type=text name='Nama' value='{$w['Nama']}' size=40 maxlength=50></td></tr>\n <tr><td class=inp1>Jabatan</td><td class=ul><input type=text name='Gelar' value='{$w['Gelar']}' size=\$0 maxlength=100></td></tr>\n <tr><td class=inp1>Tempat/Tanggal Lahir</td><td class=ul><input type=text name='TempatLahir' value='{$w['TempatLahir']}' size=30 maxlength=50>Tanggal: {$TglLahir}</td></tr>\n <tr><td class=inp1>Jenis Kelamin</td><td class=ul>{$radkel}</td></tr>\n <tr><td class=inp1>Agama</td><td class=ul><select name='AgamaID'>{$optagm}</select></td></tr>\n <tr><td class=inp1># Telepon</td><td class=ul><input type=text name='Telephone' value='{$w['Telephone']}' size=40 maxlength=50></td></tr>\n <tr><td class=inp1># Ponsel</td><td class=ul><input type=text name='Handphone' value='{$w['Handphone']}' size=40 maxlength=50></td></tr>\n <tr><td class=inp1>E-mail</td><td class=ul><input type=text name='Email' value='{$w['Email']}' size=40 maxlength=50></td></tr>\n <tr><td class=inp1>Tidak aktif?</td><td class=ul><input type=checkbox name='NA' value='Y' {$_na}></td></tr>\n <tr><td colspan=2><input type=submit name='Simpan' value='Simpan'>\n <input type=reset name='Reset' value='Reset'>\n <input type=button name='Batal' value='Batal' onClick=\"location='?mnux=dosen&gos=&{$snm}={$sid}'\"></td></tr>\n </form></table></p>";
}
function TampilkanPembayaranDariDeposit($mhsw, $krs, $byr)
{
$optrek = GetOption2('rekening', "concat(RekeningID, ' - ', Nama)", 'RekeningID', '', '', 'RekeningID');
CheckFormScript("RekeningID");
echo "<p><font size=+2>» Pembayaran Dari Deposit</font></p>";
$s = "select dep.*, date_format(dep.Tanggal, '%d-%m-%Y') as TGL\r\n from depositmhsw dep\r\n where dep.MhswID='{$mhsw['MhswID']}'\r\n order by Tanggal";
$r = _query($s);
$n = 0;
echo "<blockquote><table class=box>\r\n <tr><th class=ttl>#</th>\r\n <th class=ttl>Tanggal</th>\r\n <th class=ttl>Jumlah</th>\r\n <th class=ttl>Dipakai</th>\r\n <th class=ttl>Sisa</th>\r\n <th class=ttl>Opsi</th>\r\n </tr>";
while ($w = _fetch_array($r)) {
$n++;
if ($w['Tutup'] == 'Y') {
$c = "class=nac";
$byrkn = "<td class=ul> </td>";
} else {
$c = "class=ul";
$byrkn = "<form action='?' method=POST onSubmit=\"return CheckForm(this)\">\r\n <input type=hidden name='mnux' value='klinik.biyar.trx'>\r\n <input type=hidden name='gos' value='DariDeposit'>\r\n <input type=hidden name='DMID' value='{$w['DepositMhswID']}'>\r\n <input type=hidden name='MhswID' value='{$_SESSION['MhswID']}'>\r\n <input type=hidden name='KRS' value='{$krs['KRSID']}'>\r\n <td class=ul><select name='RekeningID'>{$optrek}</select>\r\n <input type=submit name='Bayarkan' value='Bayarkan'></td>\r\n </form>";
}
$jml = number_format($w['Jumlah']);
$pki = number_format($w['Dipakai']);
$ssa = number_format($w['Jumlah'] - $w['Dipakai']);
echo "<tr><td class=inp>{$n}</td>\r\n <td {$c}>{$w['TGL']}</td>\r\n <td {$c} align=right>{$jml}</td>\r\n <td {$c} align=right>{$pki}</td>\r\n <td {$c} align=right>{$ssa}</td>\r\n {$byrkn}\r\n </tr>";
}
echo "</table></blockquote>";
}
function Edit()
{
$mhsw = GetFields('mhsw', "KodeID='" . KodeID . "' and MhswID", $_SESSION['MhswID'], '*');
$optbpt = GetOption2('bipot', 'Tahun', 'Tahun Desc', $mhsw['BIPOTID'], "KodeID='" . KodeID . "' and ProgramID='{$mhsw['ProgramID']}' and ProdiID='{$mhsw['ProdiID']}'", 'BIPOTID');
echo <<<ESD
<table class=bsc width=100%>
<form action='../{$_SESSION['mnux']}.bipotmhsw.php' method=POST>
<input type=hidden name='gos' value='Simpan' />
<input type=hidden name='MhswID' value='{$_SESSION['MhswID']}' />
<tr><td class=inp>NIM:</td>
<td class=ul1><b>{$mhsw['MhswID']}</b></td>
</tr>
<tr><td class=inp>Mahasiswa:</td>
<td class=ul1><b>{$mhsw['Nama']}</b></td>
</tr>
<tr><td class=inp>Angkatan:</td>
<td class=ul1><b>{$mhsw['TahunID']}</b></td>
</tr>
<tr><td class=inp>Bipot:</td>
<td class=ul1>
<select name='BIPOTID'>{$optbpt}</select>
</td></tr>
<tr><td class=ul1 colspan=2 align=center>
<input type=submit name='Simpan' value='Simpan' />
<input type=button name='Batal' value='Batal'
onClick="window.close()" />
</td></tr>
</form>
</table>
ESD;
}
function TampilkanFilterMhsw()
{
global $arrID;
$optprodi = GetOption2('prodi', "concat(ProdiID, ' - ', Nama)", 'ProdiID', $_SESSION['prodi'], '', 'ProdiID');
$optprid = GetOption2('program', "concat(ProgramID, ' - ', Nama)", 'ProgramID', $_SESSION['prid'], '', 'ProgramID');
echo "<p><table class=box cellspacing=1 cellpadding=4>\r\n <form action='?' method=POST>\r\n <input type=hidden name='mnux' value='cluster'>\r\n <input type=hidden name='gos' value=''>\r\n <tr><td colspan=2 class=ul><b>{$arrID['Nama']}</b></td></tr>\r\n <tr><td class=inp1>Periode PMB</td><td class=ul><input type=text name='pmbperiod' value='{$_SESSION['pmbperiod']}' size=10 maxlength=10></td></tr>\r\n <tr><td class=inp1>Program</td><td class=ul><select name='prid'>{$optprid}</select></td></tr>\r\n <tr><td class=inp1>Program Studi</td><td class=ul><select name='prodi'>{$optprodi}</select></td></tr>\r\n <tr><td colspan=2><input type=submit name='Filter' value='Filter'></td></tr>\r\n </form></table></p>";
}
function TampilkanJenisUjian()
{
global $arrUjian;
$optJU = "";
for ($i = 0; $i < sizeof($arrUjian); $i++) {
$nm = $arrUjian[$i];
$ck = $i == $_SESSION['ujian'] ? 'selected' : '';
$optJU .= "<option value='{$i}' {$ck}>{$nm}</option> \n";
}
$optprid = GetOption2("program", "concat(ProgramID, ' - ', Nama)", 'ProgramID', $_SESSION['prid'], '', 'ProgramID');
$optprodi = GetOption2("prodi", "concat(ProdiID, ' - ', Nama)", "ProdiID", $_SESSION['prodi'], '', 'ProdiID');
$optjenjad = GetOption2('jenisjadwal', "concat(JenisJadwalID, ' - ', Nama)", "JenisJadwalID", $_SESSION['jenjad'], '', "JenisJadwalID");
echo <<<END
<p><table class=box cellspacing=1>
<form action='?' method=POST>
<input type=hidden name='mnux' value='jadwal.ujian'>
<tr><td class=ul colspan=4><b>{$_SESSION['KodeID']}</b></td></tr>
<tr><td class=inp>Tahun</td><td class=ul><input type=text name='tahun' value='{$_SESSION['tahun']}' size=10 maxlength=10></td>
<td class=inp>Jenis Ujian</td><td class=ul><select name='ujian'>{$optJU}</select></td></tr>
<tr><td class=inp>Program</td><td class=ul><select name='prid'>{$optprid}</select></td>
<td class=inp>Program Studi</td><td class=ul><select name='prodi'>{$optprodi}</select></td></tr>
<tr><td class=inp>Jenis Jadwal</td><td class=ul><select name='jenjad' onChange='this.form.submit()'>{$optjenjad}</select></td>
<td colspan=2><input type=submit name='Tampilkan' value='Tampilkan'></td></tr>
</form></table>
END;
}
function BipotNamaEdt()
{
global $mnux, $tok;
$md = $_REQUEST['md'] + 0;
if ($md == 0) {
$w = GetFields('bipotnama', 'BIPOTNamaID', $_REQUEST['bnid'], '*');
$Jdl = "Edit Nama Biaya dan Potongan";
} else {
$w = array();
$w['BIPOTNamaID'] = 0;
$w['Urutan'] = 0;
$w['Nama'] = '';
$w['RekeningID'] = '';
$w['TrxID'] = 1;
$w['Baris'] = 0;
$w['DipotongBeasiswa'] = 'N';
$w['Catatan'] = '';
$w['NA'] = 'N';
$Jdl = "Tambah Nama Biaya & Potongan";
}
$NA = $w['NA'] == 'Y' ? 'checked' : '';
$Detil = $w['Detil'] == 'Y' ? 'checked' : '';
$Denda = $w['KenaDenda'] == 'Y' ? 'checked' : '';
$DipotongBeasiswa = $w['DipotongBeasiswa'] == 'Y' ? 'checked' : '';
$opttrx = GetOption2('trx', "Concat(TrxID, '. ', Nama)", 'TrxID, Nama', $w['TrxID'], '', 'TrxID');
$optrek = GetOption2('rekening', "concat(RekeningID, ' - ', Nama)", 'RekeningID', $w['RekeningID'], "KodeID='{$_SESSION['KodeID']}'", 'RekeningID');
// Tampilkan
CheckFormScript("Nama,TrxID");
echo "<p><table class=box cellspacing=1 cellpadding=4 width=600>\r\n <form action='?' method=POST onSubmit=\"return CheckForm(this)\">\r\n <input type=hidden name='mnux' value='{$mnux}'>\r\n <input type=hidden name='tok' value='{$tok}'>\r\n <input type=hidden name='sub' value='BipotNamaSav'>\r\n <input type=hidden name='md' value='{$md}'>\r\n <input type=hidden name='bnid' value='{$w['BIPOTNamaID']}'>\r\n <tr><th class=ttl colspan=2>{$Jdl}</th></tr>\r\n <tr><td class=inp>Urutan</td><td class=ul><input type=text name='Urutan' value='{$w['Urutan']}' size=3 maxlength=3> <font color=red>*)</font></td></tr>\r\n <tr><td class=inp>Nama</td><td class=ul><input type=text name='Nama' value='{$w['Nama']}' size=40 maxlength=50></td></tr>\r\n <tr><td class=inp>Masukkan ke rekening</td><td class=ul><select name='RekeningID'>{$optrek}</select></td></tr>\r\n <tr><td class=inp>Jenis Transaksi</td><td class=ul><select name='TrxID'>{$opttrx}</select></td></tr>\r\n <tr><td class=inp>Di baris</td>\r\n <td class=ul><input type=text name='Baris' value='{$w['Baris']}' size=3 maxlength=3> Pada baris ke berapa dalam cetakan.</td></tr>\r\n <tr><td class=inp>Dipotong Beasiswa</td>\r\n <td class=ul><input type=checkbox name='DipotongBeasiswa' value='Y' {$DipotongBeasiswa}> Apakah dapat dipotong beasiswa?</td></tr>\r\n <tr><td class=inp>Tidak aktif (NA)?</td><td class=ul><input type=checkbox name='NA' value='Y' {$NA}></td></tr>\r\n <tr><td class=inp>Catatan</td><td class=ul><textarea name='Catatan' cols=30 rows=2>{$w['Catatan']}</textarea></td></tr>\r\n <tr><td colspan=2><input type=submit name='Simpan' value='Simpan'>\r\n <input type=reset name='Reset' value='Reset'>\r\n <input type=button name='Batal' value='Batal' onClick=\"location='?mnux={$mnux}&tok={$tok}&sub='\"></td></tr>\r\n </form></table></p>";
echo CatatanBipotNama();
}
function FrmEdt()
{
global $mnux, $pref, $_PMBMaxPilihan, $arrID;
$md = $_REQUEST['md'] + 0;
$PMBFormulirID = $_REQUEST['fid'] + 0;
if ($md == 0) {
$w = GetFields('pmbformulir', 'PMBFormulirID', $PMBFormulirID, '*');
$jdl = 'Edit Formulir PMB';
} else {
$w = array();
$w['PMBFormulirID'] = 0;
$w['Nama'] = '';
$w['KodeID'] = $arrID['Kode'];
$w['Harga'] = 0;
$w['JumlahPilihan'] = 1;
$w['HanyaProdi1'] = '';
$w['KecualProdi1'] = '';
$w['HanyaProdi2'] = '';
$w['KecualProdi2'] = '';
$w['HanyaProdi3'] = '';
$w['KecualProdi3'] = '';
$w['NA'] = 'N';
$w['Keterangan'] = '';
$jdl = 'Tambah Formulir PMB';
}
$na = $w['NA'] == 'Y' ? 'checked' : '';
$pil = GetNumberOption(1, $_PMBMaxPilihan, $w['JumlahPilihan']);
$optKID = GetOption2('identitas', "concat(Kode, ' - ', Nama)", 'Kode', $w['KodeID'], '', 'Kode');
$snm = session_name();
$sid = session_id();
CheckFormScript("_KodeID,Nama,JumlahPilihan,Harga");
echo "<table class=box cellspacing=1 cellpadding=4>\r\n <form action='?' method=POST onSubmit=\"return CheckForm(this)\">\r\n <input type=hidden name='md' value='{$md}'>\r\n <input type=hidden name='mnux' value='{$mnux}'>\r\n <input type=hidden name='{$pref}' value='Hrg'>\r\n <input type=hidden name='sub' value='FrmSav'>\r\n <input type=hidden name='PMBFormulirID' value='{$w['PMBFormulirID']}'>\r\n \r\n <tr><th colspan=2 class=ttl>{$jdl}</th></tr>\r\n <tr><td class=inp1>Institusi</td><td class=ul><select name='_KodeID'>{$optKID}</select></td></tr>\r\n <tr><td class=inp1>Nama Formulir</td><td class=ul><input type=text name='Nama' value='{$w['Nama']}' size=40 maxlength=50></td></tr>\r\n <tr><td class=inp1>Jumlah Pilihan</td><td class=ul><select name='JumlahPilihan'>{$pil}</select></td></tr>\r\n <tr><td class=inp1>Harga Formulir</td><td class=ul><input type=text name='Harga' value='{$w['Harga']}' size=15 maxlength=15></td></tr>\r\n <tr><td class=inp1>Tidak aktif?</td><td class=ul><input type=checkbox name='NA' value='Y' {$na}></td></tr>\r\n <tr><td class=inp1>Keterangan</td><td class=ul><textarea name='Keterangan' cols=40 rows=4>{$w['Keterangan']}</textarea></td></tr>\r\n \r\n <tr><td class=ul colspan=2><b>Setup Pilihan 1</td></tr>\r\n <tr><td class=inp1>Hanya Prodi <font color=red>*)</td><td class=ul><input type=text name='HanyaProdi1' value='{$w['HanyaProdi1']}' size=50 maxlength=100></td></tr>\r\n <tr><td class=inp1>Kecuali Prodi <font color=red>**)</td><td class=ul><input type=text name='KecualiProdi1' value='{$w['KecualiProdi1']}' size=50 maxlength=100></td></tr>\r\n \r\n <tr><td class=ul colspan=2><b>Setup Pilihan 2</td></tr>\r\n <tr><td class=inp1>Hanya Prodi <font color=red>*)</td><td class=ul><input type=text name='HanyaProdi2' value='{$w['HanyaProdi2']}' size=50 maxlength=100></td></tr>\r\n <tr><td class=inp1>Kecuali Prodi <font color=red>**)</td><td class=ul><input type=text name='KecualiProdi2' value='{$w['KecualiProdi2']}' size=50 maxlength=100></td></tr>\r\n \r\n <tr><td class=ul colspan=2><b>Setup Pilihan 3</td></tr>\r\n <tr><td class=inp1>Hanya Prodi <font color=red>*)</td><td class=ul><input type=text name='HanyaProdi3' value='{$w['HanyaProdi3']}' size=50 maxlength=100></td></tr>\r\n <tr><td class=inp1>Kecuali Prodi <font color=red>**)</td><td class=ul><input type=text name='KecualiProdi3' value='{$w['KecualiProdi3']}' size=50 maxlength=100></td></tr>\r\n \r\n <tr><td colspan=2><input type=submit name='Simpan' value='Simpan'>\r\n <input type=reset name='Reset' value='Reset'>\r\n <input type=button name='Batal' value='Batal' onClick=\"location='?mnux={$mnux}&{$pref}=Hrg&sub=&{$snm}={$sid}'\"></td></tr>\r\n \r\n </form></table><br>";
// Keterangan
echo "<table class=box cellspacing=0 cellpadding=4>\r\n <tr><td class=ul><font color=red>*)</td><td class=ul>Jika formulir ini hanya berlaku untuk prodi ini.</td></tr>\r\n <tr><td class=ul><font color=red>**)</td><td class=ul>Jika formulir ini tidak berlaku untuk prodi ini.</td></tr>\r\n <tr><td colspan=2>Masing-masing Prodi diapit tanda titik (.)</td></tr>\r\n </table>";
}
