Esempio n. 1
0
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();
}
Esempio n. 2
0
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();
    }
}
Esempio n. 3
0
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();
}
Esempio n. 4
0
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 = '&nbsp;';
            $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 = '&nbsp;';
            $ctk1 = '&nbsp;';
            if ($JmlCuti >= $MaxCuti) {
                $btn = "&times;";
                $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}&nbsp;</td>\r\n      <td class=ul align=center>{$ctk1}</td>\r\n      <td class=ul>{$ket}&nbsp;</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>";
}
Esempio n. 5
0
                $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']} ";