function PSSBDEL1() { $PSSBID = $_REQUEST['pssbid']; $s = "delete from pssb where PSSBID='{$PSSBID}' "; $r = _query($s); echo Konfirmasi1("PSSB <font size=+1>{$PSSBID}</font> Sudah Dihapus"); DftrPSSB(); }
function JenisBeasiswa() { if (strpos(".1.20.50.", '.' . $_SESSION['_LevelID'] . '.') === false) { echo Konfirmasi1("Anda tidak dapat mengakses modul ini."); } else { include_once "beasiswa.jen.php"; $sub = !empty($_REQUEST['sub']) ? $_REQUEST['sub'] : 'DftrJenisBeasiswa'; $sub(); } }
function DsnRekSav() { $dsnid = $_REQUEST['dsnid']; $NamaBank = sqling($_REQUEST['NamaBank']); $NamaAkun = sqling($_REQUEST['NamaAkun']); $NomerAkun = sqling($_REQUEST['NomerAkun']); // simpan $s = "update dosen set NamaBank='{$NamaBank}', NamaAkun='{$NamaAkun}', NomerAkun='{$NomerAkun}'\r\n where Login='******' "; $r = _query($s); echo Konfirmasi1("Data sudah disimpan"); DsnRekEdt(); }
function DaftarSesiMhsw($mhswid, $mhsw) { // Hitung sudah berapa kali cuti $MaxCuti = 4; $JmlCuti = GetaField('khs', "MhswID='{$mhswid}' and StatusMhswID", 'C', "count(KHSID)") + 0; if ($JmlCuti >= $MaxCuti) { echo Konfirmasi1("Mahasiswa telah cuti sebanyak {$JmlCuti}. Tidak dapat mengajukan cuti lagi."); } $s = "select k.*, sm.Nama as STA, sm.Nilai,\r\n format(k.SaldoAwal, 0) as SAWAL,\r\n format(k.Biaya, 0) as BIA,\r\n format(k.Bayar, 0) as BYR,\r\n format(k.Tarik, 0) as TRK,\r\n format(k.Potongan, 0) as POT,\r\n (k.SaldoAwal - k.Biaya + k.Bayar - k.Tarik + k.Potongan) as SALK,\r\n format(k.SaldoAwal-k.Biaya+k.Bayar-k.Tarik+k.Potongan, 0) as _SALK\r\n from khs k\r\n left outer join statusmhsw sm on k.StatusMhswID=sm.StatusMhswID\r\n where k.MhswID='{$mhswid}'\r\n order by k.Sesi"; $r = _query($s); $tot = 0; echo "<p><table class=box cellspacing=1>"; echo "<tr><th class=ttl>Smt</th>\r\n <th class=ttl>Tahun</th>\r\n <th class=ttl>Saldo Awal</th>\r\n <th class=ttl>Biaya2</th>\r\n <th class=ttl>Potongan2</th>\r\n <th class=ttl>Bayar2</th>\r\n <th class=ttl>Tarikan2</th>\r\n <th class=ttl>Total</th>\r\n <th class=ttl>Status</th>\r\n <th class=ttl>Frm Cuti</th>\r\n <th class=ttl>SK Cuti</th>\r\n <th class=ttl>KSS</th>\r\n <th class=ttl>Keterangan</th>\r\n </tr>"; while ($w = _fetch_array($r)) { $tot += $w['SALK']; $c = $w['SALK'] == 0 ? 'class=ul' : 'class=wrn'; $st = $w['Nilai'] == 1 ? 'class=ul' : 'class=nac'; if ($w['StatusMhswID'] == 'C') { //GetArrayTable($sql, $key, $label, $separator=', ') { $ket = GetArrayTable("select TahunID from cuti where MhswID='{$mhswid}' order by TahunID", 'TahunID', 'TahunID'); $btn = ' '; $sk = $w['NoSurat']; $ctk1 = "<a href='?mnux=kss&gos=cekkss&tahun={$w['TahunID']}&mhswid={$w['MhswID']}&khsid={$w['KHSID']}'>\r\n <img src='img/printer.gif'></a>"; } else { $ket = ' '; $ctk1 = ' '; if ($JmlCuti >= $MaxCuti) { $btn = "×"; $sk = $w['NoSurat']; } else { $btn = "<a href='cetak/cuti.cetak.php?mhswid={$mhswid}&tahun={$w['TahunID']}' target=_blank title='Cetak Formulir Cuti'><img src='img/printer.gif'></a>"; $sk = "<a href='?mnux=cuti&gos=SKCuti&mhswid={$mhswid}&tahun={$w['TahunID']}&khsid={$w['KHSID']}' title='Buat SK Cuti Kuliah'><img src='img/gear.gif' width=20></a>"; } } echo "<tr>\r\n <td class=inp>{$w['Sesi']}</td>\r\n <td class=ul>{$w['TahunID']}</td>\r\n <td class=ul align=right>{$w['SAWAL']}</td>\r\n <td class=ul align=right>{$w['BIA']}</td>\r\n <td class=ul align=right>{$w['BYR']}</td>\r\n <td class=ul align=right>{$w['TRK']}</td>\r\n <td class=ul align=right>{$w['POT']}</td>\r\n <td {$c} align=right>{$w['_SALK']}</td>\r\n <td {$st}>{$w['STA']}</td>\r\n <td class=ul align=center>{$btn}</td>\r\n <td class=ul align=center>{$sk} </td>\r\n <td class=ul align=center>{$ctk1}</td>\r\n <td class=ul>{$ket} </td>\r\n </tr>"; } $_tot = number_format($tot); $c = $tot >= 0 ? 'class=ul' : 'class=wrn'; echo "<tr><td colspan=7 align=right>Saldo Akhir :</td>\r\n <td {$c} align=right><b>{$_tot}</b></td></tr>"; echo "</table></p>"; }
$khsprev = GetFields('khs', "MhswID='{$mhswid}' and Sesi", $khs['Sesi'] - 1, '*'); if (empty($khsprev)) { BuatDefaultMaxSKS($khs); } else { $MaxSKS = GetaField('maxsks', "DariIP <= {$khsprev['IPS']} and {$khsprev['IPS']} <= SampaiIP and ProdiID", $khs['ProdiID'], "SKS"); $khs['MaxSKS'] = $MaxSKS; // Simpan $s = "update khs set MaxSKS={$MaxSKS} where KHSID={$khs['KHSID']}"; $r = _query($s); } } HeaderKRSMhsw($mhsw, $datatahun, $khs); //echo "HITUNG SKS ULANG"; //UpdateJumlahKRSMhsw($mhsw['MhswID'], $khs['KHSID']); if ($khs['CetakKRS'] > 0) { echo Konfirmasi1("Mahasiswa sudah pernah cetak KRS sebanyak {$khs['CetakKRS']} kali."); } if ($mhsw['BatasStudi'] >= $tahun) { $gos($mhsw, $datatahun, $khs); } else { echo ErrorMsg("Tidak Dapat Mengisi KRS", "Mahasiswa <font size=+1>{$mhsw['MhswID']}</font> tidak dapat mengisi KRS karena\r\n telah melampuai batas studinya, yaitu: <font size=+1>{$mhsw['BatasStudi']}</font>"); } } } } function BuatDefaultMaxSKS(&$khs) { $MaxSKS = GetaField('prodi', 'ProdiID', $khs['ProdiID'], 'DefSKS') + 0; $khs['MaxSKS'] = $MaxSKS; // Simpan $s = "update khs set MaxSKS={$MaxSKS} where KHSID={$khs['KHSID']} ";