Ejemplo n.º 1
0
function Proses()
{
    $_max = 100;
    $_praPrc = GetSetVar('_praPrc');
    $_praCnt = GetSetVar('_praCnt');
    $_dari = $_praPrc * $_max;
    $s = "select m.MhswID, m.Nama\r\n    from mhsw m\r\n    where m.KodeID = '" . KodeID . "'\r\n      and m.ProdiID = '{$_SESSION['ProdiID']}'\r\n      and m.StatusMhswID = 'A'\r\n    order by m.MhswID\r\n    limit {$_dari}, {$_max}";
    //die($s);
    $r = _query($s);
    $jml = _num_rows($r);
    if ($jml > 0) {
        while ($w = _fetch_array($r)) {
            $_SESSION['_praCnt']++;
            // Proses satu per satu
            $MhswID = $w['MhswID'];
            $Nama = $w['Nama'];
            $oke = true;
            $psn = '';
            // Apakah ada SKS Minimalnya?
            $oke = CheckSKSMin($MhswID, $psn);
            // Apakah ada IP Minimalnya?
            if ($oke) {
                $oke = CheckIPMin($MhswID, $psn);
            }
            // Apakah ada MK Prasyaratnya?
            if ($oke) {
                $oke = CheckPrasyarat($MhswID, $psn);
            }
            echo <<<ESD
      <script>
      self.parent.Progresnya({$_SESSION['_praCnt']}, '{$MhswID}', '{$Nama}', '{$psn}');
      </script>
ESD;
            // Jika memenuhi syarat
            if ($oke == true) {
                $f = fopen("../" . $_SESSION['_praFile'] . ".txt", 'a');
                fwrite($f, "{$MhswID}|{$Nama}|Oke\r\n");
                fclose($f);
            } else {
                // Jika tidak memenuhi syarat
                $f = fopen("../" . $_SESSION['_praFile'] . "_gagal.txt", 'a');
                fwrite($f, "{$MhswID}|{$Nama}|{$psn}\r\n");
                fclose($f);
            }
        }
        // Nex Process
        $_SESSION['_praPrc']++;
        $time = 10;
        echo <<<ESD
    <script>
    <!--
    //window.setTimeout("location='{$_SESSION['mnux']}.proses.php?gos=Proses&_praPrc={$_praPrc}&_praCnt={$_SESSION['_praCnt']}'", {$time});
    window.setTimeout("location='../{$_SESSION['mnux']}.proses.php'", {$time});
    //-->
    </script>
ESD;
    } else {
        echo "\r\n    <script>\r\n    self.parent.Selesai();\r\n    </script>\r\n    ";
    }
}
Ejemplo n.º 2
0
function DftrMhswTA()
{
    TampilkanFotoScript();
    // setup where-statement
    $whr_prodi = empty($_SESSION['FilterProdiID']) ? '' : "and m.ProdiID='{$_SESSION['FilterProdiID']}'";
    $whr_nama = empty($_SESSION['FilterNamaMhsw']) ? '' : "and m.Nama like '{$_SESSION['FilterNamaMhsw']}%'";
    $whr_nim = empty($_SESSION['FilterMhswID']) ? '' : "and m.MhswID like '{$_SESSION['FilterMhswID']}%'";
    $whr_tahun = empty($_SESSION['TahunID']) ? '' : "and t.TahunID = '{$_SESSION['TahunID']}' ";
    // Tampilkan
    $tapage = GetSetVar('tapage', 1);
    include_once "class/dwolister.class.php";
    $lst = new dwolister();
    $lst->maxrow = 10;
    $lst->page = $_SESSION['tapage'] + 0;
    $lst->pageactive = "=PAGE=";
    $lst->pages = "<a href='?mnux={$_SESSION['mnux']}&tapage==PAGE='>=PAGE=</a>";
    $lst->tables = "ta t\r\n    left outer join mhsw m on t.MhswID = m.MhswID and m.KodeID = '" . KodeID . "'\r\n    left outer join dosen d on d.Login = t.Pembimbing and d.KodeID = '" . KodeID . "'\r\n    left outer join dosen d1 on d1.Login = t.Penguji and d1.KodeID = '" . KodeID . "'\r\n    left outer join prodi prd on prd.ProdiID = m.ProdiID\r\n    where t.NA = 'N'\r\n    {$whr_prodi}\r\n    {$whr_nama}\r\n    {$whr_nim}\r\n    {$whr_tahun}\r\n    ";
    $lst->fields = "t.*, m.Nama as NamaMhsw,\r\n    date_format(TglMulai, '%d-%m-%Y') as _TglMulai,\r\n    date_format(TglSelesai, '%d-%m-%Y') as _TglSelesai,\r\n    date_format(TglUjian, '%d-%m-%Y') as _TglUjian,\r\n    m.PenasehatAkademik, \r\n    d.Nama as NamaDosen, d.Gelar,\r\n    d1.Nama as NamaPenguji, d1.Gelar as GelarPenguji,\r\n    \r\n    replace((select group_concat(concat('&rsaquo; ', td_d.Nama, ' <sup>', td_d.Gelar, '</sup>')) \r\n    from tadosen td\r\n      left outer join dosen td_d on td_d.Login = td.DosenID and td_d.KodeID = '" . KodeID . "' \r\n    where td.TAID = t.TAID\r\n      and td.Tipe=0), ',', '<br />') as _DP,\r\n    \r\n\t(select count(tb.TAID) from tabimbingan tb where tb.TAID = t.TAID) as Bimbingan,\r\n\t\r\n    replace((select group_concat(concat('&rsaquo; ', td_d.Nama, ' <sup>', td_d.Gelar, '</sup>')) \r\n    from tadosen td\r\n      left outer join dosen td_d on td_d.Login = td.DosenID and td_d.KodeID = '" . KodeID . "' \r\n    where td.TAID = t.TAID\r\n      and td.Tipe=1), ',', '<br />') as _DU\r\n    ";
    $lst->headerfmt = "<table class=box cellspacing=1 cellpadding=4 width=940>\r\n    <tr><th class=ttl width=10>Edit</th>\r\n        <th class=ttl width=80>NPM</th>\r\n        <th class=ttl>Nama</th>\r\n        <th class=ttl>Judul</th>\r\n        <th class=ttl width=70>Tgl Mulai<hr size=1 color=white />Selesai</th>\r\n        <th class=ttl width=180>Pembimbing</th>\r\n        <th class=ttl width=70>Bimbingan</th>\r\n\t\t<th class=ttl width=180>Ujian Akhir<hr size=1 color=white />Penguji</th>\r\n        <th class=ttl width=10>Lulus</th>\r\n        </tr>";
    $lst->footerfmt = "</table></p>";
    $lst->detailfmt = "<tr>\r\n    <td class=cna=Lulus= align=center>\r\n      <a href='#' onClick=\"javascript:TAEdit(0,=TAID=)\"><img src='img/edit.png' title='Edit Data TA' /></a>\r\n      </td>\r\n    <td class=cna=Lulus= align=center>\r\n      =MhswID=\r\n      <hr size=1 color=silver />\r\n      <sup>=TahunID=</sup>\r\n      </td>\r\n    <td class=cna=Lulus=>=NamaMhsw=</td>\r\n    <td class=cna=Lulus=>=Judul=</td>\r\n    <td class=cna=Lulus= align=center>\r\n      <sup>=_TglMulai=\r\n      <hr size=1 color=silver />\r\n      =_TglSelesai=</sup>\r\n      </td>\r\n\t<td class=cna=Lulus=>\r\n      &bull; =NamaDosen= <sup>=Gelar=</sup><br />\r\n      =_DP=\r\n      <div align=right>\r\n      <a href='#' onClick=\"javscript:EditPembimbing(=TAID=)\" title='Edit Dosen Pembimbing'><img src='img/edit.png' /></a>\r\n      </div>\r\n      </td>\r\n    <td class=cna=Lulus= align=center>\r\n\t  =Bimbingan=&times;\r\n\t  <div align=right>\r\n      <a href='#' onClick=\"javscript:EditBimbingan(=TAID=)\" title='Edit Bimbingan'><img src='img/edit.png' /></a>\r\n\t  </td>\r\n    <td class=cna=Lulus= align=center>\r\n      <sup>=_TglUjian=</sup>\r\n      <hr size=1 color=silver />\r\n      <div align=left>\r\n      &bull; =NamaPenguji= <sup>=GelarPenguji=</sup><br />\r\n      =_DU=\r\n      </div>\r\n      <div align=right>\r\n      <a href='#' onClick=\"javascript:TAUjian(=TAID=)\" title='Edit Dosen Penguji'><img src='img/edit.png' /></a>\r\n      </div>\r\n      </td>\r\n    <td class=cna=Lulus= align=center>\r\n      <a href='#' onClick=\"javascript:fnKelulusan(=TAID=)\"><img src='img/=Lulus=.gif' /></a>\r\n      </td>\r\n    </tr>\r\n    <tr><td bgcolor=silver colspan=9 height=1></td></tr>";
    echo $lst->TampilkanData();
    echo $ttl;
    echo "<p>Hal.: " . $lst->TampilkanHalaman() . "<br />" . "Total: " . number_format($lst->MaxRowCount) . "</p>";
}
Ejemplo n.º 3
0
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>";
}
Ejemplo n.º 4
0
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  &nbsp;&nbsp;<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      &bull; =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>";
}
Ejemplo n.º 5
0
function Sek()
{
    $NamaSekolah = GetSetVar('NamaSekolah');
    $KotaSekolah = GetSetVar('KotaSekolah');
    include_once "pmbsetup.sek.php";
    $sub = !empty($_REQUEST['sub']) ? $_REQUEST['sub'] : 'DftrSek';
    $sub();
}
Ejemplo n.º 6
0
function CetakNilai($jid, $p)
{
    $JadwalID = GetSetVar('JadwalID');
    $jdwl = GetFields("jadwal j\r\n    left outer join dosen d on d.Login = j.DosenID and d.KodeID = '" . KodeID . "'\r\n    left outer join prodi prd on prd.ProdiID = j.ProdiID and prd.KodeID = '" . KodeID . "'\r\n    left outer join program prg on prg.ProgramID = j.ProgramID and prg.KodeID = '" . KodeID . "'\r\n    left outer join mk mk on mk.MKID = j.MKID\r\n    left outer join hari huas on huas.HariID = date_format(j.UASTanggal, '%w') \r\n\tLEFT OUTER JOIN kelas k ON k.KelasID = j.NamaKelas\r\n    ", "j.JadwalID", $JadwalID, "j.*, concat(d.Nama, ', ', d.Gelar) as DSN, d.NIDN,\r\n    prd.Nama as _PRD, prg.Nama as _PRG,\r\n    mk.Sesi,\r\n    date_format(j.UASTanggal, '%d-%m-%Y') as _UASTanggal,\r\n    date_format(j.UASTanggal, '%w') as _UASHari,\r\n    huas.Nama as HRUAS,\r\n    LEFT(j.UASJamMulai, 5) as _UASJamMulai, LEFT(j.UASJamSelesai, 5) as _UASJamSelesai, k.Nama AS namaKelas\r\n    ");
    $TahunID = $jdwl['TahunID'];
    $thn = GetFields('tahun', "KodeID = '" . KodeID . "' and ProdiID = '{$jdwl['ProdiID']}' and ProgramID = '{$jdwl['ProgramID']}' and TahunID", $TahunID, "*");
    // Buat Header
    BuatHeader($jdwl, $thn, $p);
    BuatIsinya($jdwl, $p);
    BuatFooter($jdwl, $p);
}
Ejemplo n.º 7
0
function DaftarMhsw($mnux, $lnk = '', $keluar = 0)
{
    include_once "class/xthlister.class.php";
    $inqMhswPage = GetSetVar('inqMhswPage');
    $arrKey = array('NIM' => '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 xthlister();
    $lst->page = $_SESSION['inqMhswPage'] + 0;
    $lst->pageactive = "=PAGE=";
    $lst->pages = "<a href='?mnux={$lnk}&inqMhswPage==PAGE='>=PAGE=</a>";
    $lst->tables = "mhsw m\n    left outer join program prg on m.ProgramID=prg.ProgramID\n    left outer join prodi prd on m.ProdiID=prd.ProdiID\n    left outer join statusmhsw sm on m.StatusMhswID=sm.StatusMhswID\n    {$_whr}\n    order by m.MhswID";
    $lst->fields = "m.MhswID, m.Nama, m.ProgramID, m.ProdiID, m.SKKeluar, m.Foto,\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>\n    <tr><th class=ttl>#</th>\n    <th class=ttl>No Mhsw</th>\n    <th class=ttl>Nama Mhsw</th>\n    <th class=ttl>Program</th>\n    <th class=ttl>Program Studi</th>\n    <th class=ttl>Status</th>\n    <th class=ttl>SK Lulus/Keluar</th>\n    </tr>";
    $lst->footerfmt = "</table></p>";
    $lst->detailfmt = "<tr><td class=inp1>=NOMER=</td>\n    <td bgcolor='#9BBB59' class=cna=Keluar=><a href='?mnux={$mnux}&mhswid==MhswID=&{$lnk}'><img src='img/edit.png'>\n    =MhswID=</a></td>\n    <td bgcolor='#8DB3E2' class=cna=Keluar=><a id='=MhswID=' class='jTip' name='    Foto Mahasiswa' href='foto.pop.php?width=156&mhswid==MhswID=&foto==Foto='>=Nama=</a></td>\n    <td bgcolor='#E5B8B7' class=cna=Keluar=>=ProgramID=-=PRG=</td>\n    <td bgcolor='#B2A1C7' class=cna=Keluar=>=ProdiID=-=PRD=</td>\n    <td bgcolor='#FABF8F' class=cna=Keluar=>=SM=</td>\n    <td bgcolor='#BFBFBF' class=cna=Keluar=>=SKKeluar=&nbsp;</td>\n    </tr>";
    echo $lst->TampilkanData();
    echo "Halaman : " . $lst->TampilkanHalaman();
}
Ejemplo n.º 8
0
function DaftarMhsw($mnux, $lnk = '', $keluar = 0)
{
    include_once "class/xthlister.class.b.php";
    $inqMhswPage = GetSetVar('inqMhswPage');
    $arrKey = array('NIM' => '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 xthlister();
    $lst->page = $_SESSION['inqMhswPage'] + 0;
    $lst->pageactive = "=PAGE=";
    $lst->pages = "<a href='?mnux={$lnk}&inqMhswPage==PAGE='>=PAGE=</a>";
    $lst->tables = "mhsw m\n    left outer join program prg on m.ProgramID=prg.ProgramID\n    left outer join prodi prd on m.ProdiID=prd.ProdiID\n    left outer join statusmhsw sm on m.StatusMhswID=sm.StatusMhswID\n    {$_whr}\n    order by m.MhswID";
    $lst->fields = "m.MhswID, m.Nama, m.ProgramID, m.ProdiID, m.SKKeluar, m.Foto,\n    prg.Nama as PRG, prd.Nama as PRD, sm.Nama as SM, sm.Keluar";
    $lst->detailfmt = "\n  <tr>\n  <td class=inp1>=NOMER=</td>\n    </tr>";
    echo $lst->TampilkanData();
    echo $lst->TampilkanHalaman();
}
Ejemplo n.º 9
0
function EdtSet()
{
    global $mnux, $pref, $arrID;
    $prodi = $_SESSION['prodi'];
    $mkkode = $_SESSION['mkkode_' . $prodi];
    $kurid = $_SESSION['kurid_' . $prodi];
    $kuriset = GetSetVar('kuriset');
    //$mk = GetFields('mk', "KurikulumID='$kurid' and MKKode", $mkkode, '*');
    $mk = GetFields("mk mk left outer join prodi prd on mk.ProdiID=prd.ProdiID\r\n    left outer join kurikulum kur on mk.KurikulumID=kur.KurikulumID\r\n    left outer join dosen d on mk.Penanggungjawab=d.Login", "mk.KurikulumID='{$kurid}' and mk.MKKode", $mkkode, "mk.*, kur.Nama as KUR, prd.Nama as PRD, concat(d.Nama, ', ', d.Gelar) as PJ");
    /*
    $optkurikulum = GetOption2('kurikulum', "concat(KurikulumKode, ' - ', Nama)", 'KurikulumID', $_SESSION['kurid_'], "ProdiID='$_SESSION[prodi]'", 'KurikulumID');  
    $optmk = GetOption2('mk', "concat(MKKode, ' - ', Nama)", 'MKKode', '', 
      "MKKode<>'$mkkode' and KurikulumID=".$_SESSION['kurid_'.$_SESSION['prodi']], 'MKKode'); 
    */
    $optkuri = GetOption2('kurikulum', "concat(KurikulumKode, ' - ', Nama)", 'KurikulumID', $_SESSION['kuriset'], "ProdiID='{$prodi}' and KodeID='" . KodeID . "'", 'KurikulumID');
    $optmk = GetOption2('mk', "concat(MKKode, ' - ', Nama)", 'MKKode', '', "MKKode<>'{$mkkode}' and KurikulumID='" . $kuriset . "'", 'MKKode');
    // Headernya
    TampilkanHeaderMatakuliah($mk);
    $setara = GetMKSetara($mk['MKSetara'], $mkkode);
    echo "<p><table class=box cellspacing=1 cellpadding=4>\r\n  <tr><td class=ul colspan=5><b>Matakuliah Setara</td></tr>\r\n  <form action='?' method=POST>\r\n  <input type=hidden name='mnux' value='{$mnux}'>\r\n  <input type=hidden name='mkkode_{$prodi}' value='{$mkkode}'>\r\n  <input type=hidden name='{$pref}' value='{$_SESSION[$pref]}'>\r\n  <input type=hidden name='sub' value='EdtSetSav'>\r\n  <input type=hidden name='BypassMenu' value='1' />\r\n  \r\n  <tr><td class=inp colspan=2>Kurikulum:</td>\r\n    <td class=ul colspan=3><select name='kuriset' onChange=\"window.location='?mnux={$mnux}&{$pref}={$_SESSION[$pref]}&mkkode_{$_SESSION['prodi']}={$mkkode}&sub=EdtSet&kuriset='+this.value\">{$optkuri}</select>\r\n  <tr><td class=inp colspan=2>Tambahkan:</td>\r\n    <td class=ul colspan=3><select name='mkkode_add'>{$optmk}</select>\r\n  <input type=submit name='Tambahkan' value='Tambahkan'></td></tr>\r\n  </form>\r\n  {$setara}\r\n  </table></p>";
}
Ejemplo n.º 10
0
function DaftarMhsw($mnux, $lnk = '', $keluar = 0)
{
    include_once "class/xthlister.class.php";
    $dataMhswPage = GetSetVar('dataMhswPage');
    $arrKey = array('NIM' => 'MhswID');
    // filter
    $whr = array();
    if (!empty($arrKey[$_SESSION['crmhswkeyx']]) && !empty($_SESSION['crmhswvalx'])) {
        $whr[] = "m." . $arrKey[$_SESSION['crmhswkeyx']] . " like '%" . $_SESSION['crmhswvalx'] . "%' ";
    }
    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'] == 7) {
        } else {
            $whr[] = "m.ProdiID in ({$_prodi})";
        }
    }
    // Satukan filter
    $_whr = implode(' and ', $whr);
    $_whr = empty($_whr) ? '' : "where {$_whr}";
    // Tampilkan daftar
    $lst = new xthlister();
    $lst->tables = "mhsw m\n    left outer join program prg on m.ProgramID=prg.ProgramID\n    left outer join prodi prd on m.ProdiID=prd.ProdiID\n    left outer join statusmhsw sm on m.StatusMhswID=sm.StatusMhswID\n    {$_whr}\n    order by m.MhswID";
    $lst->fields = "m.MhswID,\n    prg.Nama as PRG, prd.Nama as PRD, sm.Nama as SM, sm.Keluar";
    $lst->headerfmt = "<p>\n  <table class=box cellspacing=1 cellpadding=4>\n    <tr bgcolor='#9BBB59'>\n      <th rowspan='2' nowrap='true' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Tahun Akade-mik</span></strong></th>\n      <th rowspan='2' nowrap='true' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Daya Tampung</span></strong></th>\n      <th colspan='2' nowrap='true' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Jumlah Calon<br>Mahasiswa Reguler&nbsp; </span></strong></th>\n      <th colspan='2' nowrap='true' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Jumlah<br>Mahasiswa Baru</span></strong></th>\n      <th colspan='2' nowrap='true' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Jumlah<br>Total Mahasiswa</span></strong></th>\n      <th colspan='2' nowrap='true' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Jumlah Lulusan</span></strong></th>\n      <th colspan='3' nowrap='true' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>IPK<br>Lulusan Reguler</span></strong></th>\n      <th colspan='3' nowrap='true' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Persentase<br>Lulusan Reguler<br>dengan IPK :</span></strong></th>\n    </tr>\n    <tr>\n      <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Ikut Seleksi</span></strong></td>\n      <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Lulus Seleksi</span></strong></td>\n      <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Reguler</span></strong></td>\n      <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Transfer</span></strong></td>\n      <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Reguler</span></strong></td>\n      <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Transfer</span></strong></td>\n      <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Reguler </span></strong></td>\n      <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Transfer</span></strong></td>\n      <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Min</span></strong></td>\n      <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Rat</span></strong></td>\n      <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>Mak</span></strong></td>\n      <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>&lt; 2,75</span></strong></td>\n      <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>2,75-3,50</span></strong></td>\n      <td bgcolor='#9BBB59' class='ttl'><strong><span style='line-height:115%; font-family:'Calibri','sans-serif'; font-size:8.0pt; '>&gt; 3,50</span></strong></td>\n    </tr>\n    <tr bgcolor='#9BBB59'>\n      <td class='cna'>(1)</td>\n      <td class='cna'>(2)</td>\n      <td class='cna'>(3)</td>\n      <td class='cna'>(4)</td>\n      <td class='cna'>(5)</td>\n      <td class='cna'>(6)</td>\n      <td class='cna'>(7)</td>\n      <td class='cna'>(8)</td>\n      <td class='cna'>(9)</td>\n      <td class='cna'>(10)</td>\n      <td class='cna'>(11)</td>\n      <td class='cna'>(12)</td>\n      <td class='cna'>(13)</td>\n      <td class='cna'>(14)</td>\n      <td class='cna'>(15)</td>\n      <td class='cna'>(16)</td>\n    </tr>\n    <tr>\n      <td bgcolor='#9BBB59' class='cna'>TS-4</td>\n      <td bgcolor='#DDD9C3' class='cna'>\n\t  \n\t  \n\t  &nbsp;    </td>\n      <td bgcolor='#8DB3E2' class='cna'>&nbsp;</td>\n      <td bgcolor='#8DB3E2' class='cna'>&nbsp;</td>\n      <td bgcolor='#E5B8B7' class='cna'>&nbsp;</td>\n      <td bgcolor='#E5B8B7' class='cna'>&nbsp;</td>\n      <td bgcolor='#D6E3BC' class='cna'>&nbsp;</td>\n      <td bgcolor='#D6E3BC' class='cna'>&nbsp;</td>\n      <td bgcolor='#B2A1C7' class='cna'>&nbsp;</td>\n      <td bgcolor='#B2A1C7' class='cna'>&nbsp;</td>\n      <td bgcolor='#FABF8F' class='cna'>&nbsp;</td>\n      <td bgcolor='#FABF8F' class='cna'>&nbsp;</td>\n      <td bgcolor='#FABF8F' class='cna'>&nbsp;</td>\n      <td bgcolor='#BFBFBF' class='cna'>&nbsp;</td>\n      <td bgcolor='#BFBFBF' class='cna'>&nbsp;</td>\n      <td bgcolor='#BFBFBF' class='cna'>&nbsp;</td>\n    </tr>\n    <tr>\n      <td bgcolor='#9BBB59' class='cna'>TS-3</td>\n      <td bgcolor='#DDD9C3' class='cna'>&nbsp;</td>\n      <td bgcolor='#8DB3E2' class='cna'>&nbsp;</td>\n      <td bgcolor='#8DB3E2' class='cna'>&nbsp;</td>\n      <td bgcolor='#E5B8B7' class='cna'></td>\n      <td bgcolor='#E5B8B7' class='cna'>&nbsp;</td>\n      <td bgcolor='#D6E3BC' class='cna'>&nbsp;</td>\n      <td bgcolor='#D6E3BC' class='cna'>&nbsp;</td>\n      <td bgcolor='#B2A1C7' class='cna'>&nbsp;</td>\n      <td bgcolor='#B2A1C7' class='cna'>&nbsp;</td>\n      <td bgcolor='#FABF8F' class='cna'>&nbsp;</td>\n      <td bgcolor='#FABF8F' class='cna'>&nbsp;</td>\n      <td bgcolor='#FABF8F' class='cna'>&nbsp;</td>\n      <td bgcolor='#BFBFBF' class='cna'>&nbsp;</td>\n      <td bgcolor='#BFBFBF' class='cna'>&nbsp;</td>\n      <td bgcolor='#BFBFBF' class='cna'>&nbsp;</td>\n    </tr>\n    <tr>\n      <td bgcolor='#9BBB59' class='cna'>TS-2</td>\n      <td bgcolor='#DDD9C3' class='cna'>&nbsp;</td>\n      <td bgcolor='#8DB3E2' class='cna'>&nbsp;</td>\n      <td bgcolor='#8DB3E2' class='cna'>&nbsp;</td>\n      <td bgcolor='#E5B8B7' class='cna'></td>\n      <td bgcolor='#E5B8B7' class='cna'>&nbsp;</td>\n      <td bgcolor='#D6E3BC' class='cna'>&nbsp;</td>\n      <td bgcolor='#D6E3BC' class='cna'>&nbsp;</td>\n      <td bgcolor='#B2A1C7' class='cna'>&nbsp;</td>\n      <td bgcolor='#B2A1C7' class='cna'>&nbsp;</td>\n      <td bgcolor='#FABF8F' class='cna'>&nbsp;</td>\n      <td bgcolor='#FABF8F' class='cna'>&nbsp;</td>\n      <td bgcolor='#FABF8F' class='cna'>&nbsp;</td>\n      <td bgcolor='#BFBFBF' class='cna'>&nbsp;</td>\n      <td bgcolor='#BFBFBF' class='cna'>&nbsp;</td>\n      <td bgcolor='#BFBFBF' class='cna'>&nbsp;</td>\n    </tr>\n    <tr>\n      <td bgcolor='#9BBB59' class='cna'>TS-1</td>\n      <td bgcolor='#DDD9C3' class='cna'>&nbsp;</td>\n      <td bgcolor='#8DB3E2' class='cna'>&nbsp;</td>\n      <td bgcolor='#8DB3E2' class='cna'>&nbsp;</td>\n      <td bgcolor='#E5B8B7' class='cna'></td>\n      <td bgcolor='#E5B8B7' class='cna'>&nbsp;</td>\n      <td bgcolor='#D6E3BC' class='cna'>&nbsp;</td>\n      <td bgcolor='#D6E3BC' class='cna'>&nbsp;</td>\n      <td bgcolor='#B2A1C7' class='cna'>&nbsp;</td>\n      <td bgcolor='#B2A1C7' class='cna'>&nbsp;</td>\n      <td bgcolor='#FABF8F' class='cna'>&nbsp;</td>\n      <td bgcolor='#FABF8F' class='cna'>&nbsp;</td>\n      <td bgcolor='#FABF8F' class='cna'>&nbsp;</td>\n      <td bgcolor='#BFBFBF' class='cna'>&nbsp;</td>\n      <td bgcolor='#BFBFBF' class='cna'>&nbsp;</td>\n      <td bgcolor='#BFBFBF' class='cna'>&nbsp;</td>\n    </tr>\n    <tr>\n      <td bgcolor='#9BBB59' class='cna'>TS</td>\n      <td bgcolor='#DDD9C3' class='cna'><countif></td>\n      <td bgcolor='#8DB3E2' class='cna'>&nbsp;</td>\n      <td bgcolor='#8DB3E2' class='cna'>&nbsp;</td>\n      <td bgcolor='#E5B8B7' class='cna'></td>\n      <td bgcolor='#E5B8B7' class='cna'>&nbsp;</td>\n      <td bgcolor='#D6E3BC' class='cna'>&nbsp;</td>\n      <td bgcolor='#D6E3BC' class='cna'>&nbsp;</td>\n      <td bgcolor='#B2A1C7' class='cna'>&nbsp;</td>\n      <td bgcolor='#B2A1C7' class='cna'>&nbsp;</td>\n      <td bgcolor='#FABF8F' class='cna'>&nbsp;</td>\n      <td bgcolor='#FABF8F' class='cna'>&nbsp;</td>\n      <td bgcolor='#FABF8F' class='cna'>&nbsp;</td>\n      <td bgcolor='#BFBFBF' class='cna'>&nbsp;</td>\n      <td bgcolor='#BFBFBF' class='cna'>&nbsp;</td>\n      <td bgcolor='#BFBFBF' class='cna'>&nbsp;</td>\n    </tr>\n    <tr>\n      <td bgcolor='#9BBB59' class='cna'>Jumlah</td>\n      <td bgcolor='#9BBB59' class='cna'>&nbsp;</td>\n      <td bgcolor='#9BBB59' class='cna'>&nbsp;</td>\n      <td bgcolor='#9BBB59' class='cna'>&nbsp;</td>\n      <td bgcolor='#9BBB59' class='cna'></td>\n      <td bgcolor='#9BBB59' class='cna'>&nbsp;</td>\n      <td bgcolor='#9BBB59' class='cna'>&nbsp;</td>\n      <td bgcolor='#9BBB59' class='cna'>&nbsp;</td>\n      <td bgcolor='#9BBB59' class='cna'>&nbsp;</td>\n      <td bgcolor='#9BBB59' class='cna'>&nbsp;</td>\n      <td bgcolor='#9BBB59' class='cna'>&nbsp;</td>\n      <td bgcolor='#9BBB59' class='cna'>&nbsp;</td>\n      <td bgcolor='#9BBB59' class='cna'>&nbsp;</td>\n      <td bgcolor='#9BBB59' class='cna'>&nbsp;</td>\n      <td bgcolor='#9BBB59' class='cna'>&nbsp;</td>\n      <td bgcolor='#9BBB59' class='cna'>&nbsp;</td>\n    </tr>";
    $lst->footerfmt = "</table></p>";
    echo $lst->TampilkanData();
    echo "Halaman : " . $lst->TampilkanHalaman();
}
Ejemplo n.º 11
0
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=&nbsp;</td>\r\n\t  <td class=cna=NA=>=Kota=&nbsp;</td>\r\n\t  <td class=cna=NA=>=Website=&nbsp;</td>\r\n\t  <td class=cna=NA=>=Telephone=&nbsp;</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>";
}
Ejemplo n.º 12
0
function DaftarAntriDosen()
{
    include_once "class/xthlister.class.php";
    $AntrianIDPage = GetSetVar('AntrianIDPage');
    $arrKey = array('NIM' => 'nim', 'Nama' => 'nama', 'Semua' => '');
    // filter
    $whr = array();
    // Satukan filter
    $_whr = implode(' and ', $whr);
    $_whr = empty($_whr) ? '' : "where {$_whr}";
    // Tampilkan daftar
    $lst = new xthlister();
    $lst->page = $_SESSION['AntrianIDPage'] + 0;
    $lst->pageactive = "=PAGE=";
    $lst->pages = "=PAGE=";
    $lst->tables = "antridosenid d\n    left outer join prodi prd on d.ProdiID=prd.ProdiID\n    {$_whr}\n    order by d.Login";
    $lst->fields = "d.Login, d.Nama, d.LevelID, d.KodeID, d.Password, d.ProdiID, d.Foto";
    $lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4>\n    <tr><th class=ttl>#</th>\n    <th class=ttl>NIP</th>\n    <th class=ttl>Nama Dosen</th>\n    <th class=ttl>Prodi</th>\n    <th class=ttl>Konfirmasi</th>\n    </tr>";
    $lst->footerfmt = "</table></p>";
    $lst->detailfmt = "<tr><td>=NOMER=</td>\n    <td bgcolor='#9BBB59' class=cna=Keluar=>=Login=</td>\n    <td bgcolor='#8DB3E2' class=cna=Keluar=>=Nama=</td>\n    <td bgcolor='#B2A1C7' class=cna=Keluar=>=ProdiID=</td>\n    <td bgcolor='#BFBFBF' class=cna=Keluar=>\n\t\n\t\t<form action='?' method='post'>\n\t\t<input type=hidden name='mnux' value='modules/antrianid/antrianid.dosen'>\n\t\t  <input type=hidden name='gos' value='UsrSav'>\n\t\t\n\t\t<input type='hidden' name='Login' value='=Login='******'hidden' name='Nama' value='=Nama='>\n\t\t<input type='hidden' name='Password' value='=Password='******'hidden' name='lvlid' value='=LevelID='>\n\t\t<input type='hidden' name='kid' value='=KodeID='>\n\t\t\n\t\t<input type='submit' class='btn light' value='Simpan' name='Salin'>\n\t\t</form>\n\t\t\n\t</td>\n    </tr>";
    echo $lst->TampilkanData();
    echo "Halaman : " . $lst->TampilkanHalaman();
}
Ejemplo n.º 13
0
function DaftarAntriMhsw1()
{
    include_once "class/xthlister.class.php";
    $AntrianIDPage = GetSetVar('AntrianIDPage');
    $arrKey = array('NIM' => 'nim', 'Nama' => 'nama', 'Semua' => '');
    // filter
    $whr = array();
    // Satukan filter
    $_whr = implode(' and ', $whr);
    $_whr = empty($_whr) ? '' : "where {$_whr}";
    // Tampilkan daftar
    $lst = new xthlister();
    $lst->page = $_SESSION['AntrianIDPage'] + 0;
    $lst->pageactive = "=PAGE=";
    $lst->pages = "=PAGE=";
    $lst->tables = "antrimhswid a\n    left outer join program prg on a.ProgramID=prg.ProgramID\n    left outer join prodi prd on a.ProdiID=prd.ProdiID\n    left outer join statusmhsw sm on a.StatusMhswID=sm.StatusMhswID\n    {$_whr}\n    order by a.MhswID";
    $lst->fields = "a.MhswID, a.Nama, a.LevelID, a.KodeID, a.Password, a.ProgramID, a.ProdiID, a.SKKeluar, a.Foto,\n     sm.Keluar";
    $lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4>\n    <tr><th class=ttl>#</th>\n    <th class=ttl>No Mhsw</th>\n    <th class=ttl>Nama Mhsw</th>\n    <th class=ttl>Program</th>\n    <th class=ttl>Prodi</th>\n    </tr>";
    $lst->footerfmt = "</table></p>";
    $lst->detailfmt = "<tr><td>=NOMER=</td>\n    <td bgcolor='#9BBB59' class=cna=Keluar=>=MhswID=</td>\n    <td bgcolor='#8DB3E2' class=cna=Keluar=>=Nama=</td>\n    <td bgcolor='#E5B8B7' class=cna=Keluar=>=ProgramID=</td>\n    <td bgcolor='#B2A1C7' class=cna=Keluar=>=ProdiID=</td>\n\t</form>\n\t\t\n\t</td>\n    </tr>";
    echo $lst->TampilkanData();
    echo "Halaman : " . $lst->TampilkanHalaman();
}
Ejemplo n.º 14
0
function DaftarAntri()
{
    include_once "class/xthlister.class.php";
    $DaftarAntrianPage = GetSetVar('DaftarAntrianPage');
    $arrKey = array('NIM' => 'nim', 'Nama' => 'nama', 'Semua' => '');
    // filter
    $whr = array();
    // Satukan filter
    $_whr = implode(' and ', $whr);
    $_whr = empty($_whr) ? '' : "where {$_whr}";
    // Tampilkan daftar
    $lst = new xthlister();
    $lst->page = $_SESSION['DaftarAntrianPage'] + 0;
    $lst->pageactive = "=PAGE=";
    $lst->pages = "=PAGE=";
    $lst->tables = "antrian a {$_whr} order by a.lastmodified";
    $lst->fields = "a.nim, a.nama, a.jenis, a.judul, a.kodjenis";
    $lst->headerfmt = "<p><table class=box cellspacing=1 cellpadding=4  width='100%'>\n    <tr>\n\t<th class=ttl>#</th>\n    <th class=ttl>NIM</th>\n    <th class=ttl>Nama Mahasiswa</th>\n    <th class=ttl>Jenis  Surat</th>\n    <th class=ttl>Judul Surat</th>\n    <th class=ttl>Kode Jenis</th>\n    <th class=ttl>Print</th>\n    </tr>";
    $lst->footerfmt = "</table></p>";
    $lst->detailfmt = "<tr>\n\t<td>=NOMER=</td>\n    <td bgcolor='#9BBB59' class=cna=Keluar=>=nim=</td>\n    <td bgcolor='#8DB3E2' class=cna=Keluar=>=nama=</td>\n    <td bgcolor='#E5B8B7' class=cna=Keluar=>=jenis=</td>\n    <td bgcolor='#B2A1C7' class=cna=Keluar=>=judul=</td>\n    <td bgcolor='#FABF8F' class=cna=Keluar=>=kodjenis=</td>\n    <td bgcolor='#BFBFBF' class=cna=Keluar=>\n\t\t<form action='modules/cetak.php' method='post' target='_parent'>\n\t\t<input type='hidden' name='cetak_id' value='nim'>\n\t\t<input type='submit' value='Print'>\n\t\t</form>\n\t</td>\n    </tr>";
    echo $lst->TampilkanData();
    echo "Halaman : " . $lst->TampilkanHalaman();
}
Ejemplo n.º 15
0
function DftrGelombang()
{
    global $_maxbaris;
    include_once "class/lister.class.php";
    GelEdtScript();
    $_gelombangpage = GetSetVar('_gelombangpage', 0);
    $pagefmt = "<a href='?mnux={$_SESSION['mnux']}&gos=gelombang&sub=&_gelombangpage==PAGE='>=PAGE=</a>";
    $pageoff = "<b>=PAGE=</b>";
    $brs = "<hr size=1 color=silver />";
    $gantibrs = "<tr><td bgcolor=silver height=1 colspan=8></td></tr>";
    $lst = new lister();
    $lst->tables = "pmbperiod p where p.KodeID = '" . KodeID . "' order by p.PMBPeriodID desc";
    $lst->fields = "p.PMBPeriodID, p.Nama,\n    p.NA,\n    date_format(p.TglMulai, '%d/%m/%y') as _TglMulai,\n    date_format(p.TglSelesai, '%d/%m/%y') as _TglSelesai,\n    date_format(p.UjianMulai, '%d/%m/%y') as _UjianMulai,\n    date_format(p.UjianSelesai, '%d/%m/%y') as _UjianSelesai,\n    date_format(p.BayarMulai, '%d/%m/%y') as _BayarMulai,\n    date_format(p.BayarSelesai, '%d/%m/%y') as _BayarSelesai,\n\tdate_format(p.WawancaraMulai, '%d/%m/%y') as _WawancaraMulai,\n\tdate_format(p.WawancaraSelesai, '%d/%m/%y') as _WawancaraSelesai";
    $lst->startrow = $_SESSION['_gelombangpage'] + 0;
    $lst->maxrow = $_maxbaris;
    $lst->headerfmt = "<p><table class=box cellspacing=1 align=center width=800>\n    <tr>\n    <td class=ul1 colspan=7>\n      <input type=button name='Tambah' value='Tambah Gelombang'\n        onClick=\"javascript:GelEdt(1, '', '{$_SESSION['mnux']}')\" />\n      <input type=button name='Refresh' value='Refresh'\n        onClick=\"window.location='?mnux={$_SESSION['mnux']}'\" />\n      Catatan: Hanya ada 1 gelombang yang aktif.\n    </td>\n    </tr>\n    \n    <tr>\n    <th class=ttl colspan=2>#</th>\n    <th class=ttl>Gelombang</th>\n    <th class=ttl>Nama Gelombang</th>\n    <th class=ttl>Periode</th>\n    <th class=ttl>Ujian</th>\n    <th class=ttl>Bayar</th>\n    <th class=ttl>NA</th>\n    </tr>";
    $lst->detailfmt = "<tr>\n    <td class=inp width=10>=NOMER=</td>\n    <td class=ul1 width=10>\n      <a href='#' onClick=\"javascript:GelEdt(0, '=PMBPeriodID=', '{$_SESSION['mnux']}')\"><img src='img/edit.png' /></a></td>\n    <td class=cna=NA= width=100>=PMBPeriodID=</td>\n    <td class=cna=NA=>=Nama=</td>\n    <td class=cna=NA= width=80 align=center>=_TglMulai={$brs}=_TglSelesai=</td>\n    <td class=cna=NA= width=80 align=center>=_UjianMulai={$brs}=_UjianSelesai=</td>\n    <td class=cna=NA= width=80 align=center>=_BayarMulai={$brs}=_BayarSelesai=</td>\n    <td class=ul1 width=10 align=center><img src='img/book=NA=.gif' /></td>\n    </tr>" . $gantibrs;
    $lst->footerfmt = "</table>";
    $hal = $lst->WritePages($pagefmt, $pageoff);
    $ttl = $lst->MaxRowCount;
    echo $lst->ListIt();
    echo "<p align=center>Hal: {$hal} <br />(Tot: {$ttl})</p>";
}
Ejemplo n.º 16
0
function DftrSek()
{
    global $_defmaxrow, $mnux, $pref;
    $CariSekolah = GetSetVar('CariSekolah', 'Nama Sekolah');
    $arrCariSekolah = array('Nama Sekolah' => 'Nama', 'Kode Sekolah' => 'SekolahID');
    echo "<table class=box cellspacing=1 cellpadding=4>\r\n  <form action='index.php' method=GET>\r\n  <input type=hidden name='mnux' value='pmbasalsek'>\r\n  <input type=hidden name='gos' value='DftrSek'>\r\n  <input type=hidden name='md' value='{$md}'>\r\n  <input type=hidden name='SRSEK' value='{$_REQUEST['SRSEK']}'>\r\n  <tr><td class=inp1>Cari Sekolah:</td><td class=ul colspan=2><input type=text name='NamaSekolah' value='{$_SESSION['NamaSekolah']}' size=20 maxlength=20>\r\n    <input type=submit name='CariSekolah' value='Nama Sekolah'> <input type=submit name='CariSekolah' value='Kode Sekolah'></td></tr>\r\n  <tr><td class=inp1>Filter Kota:</td><td class=ul><input type=text name='KotaSekolah' value='{$_SESSION['KotaSekolah']}' size=20 maxlength=20></td><td class=ul><input type=submit name='KotaSekolahS' value='Filter'> *) kosongkan jika tidak ingin difilter</td>\r\n  </form></table><br>";
    $whr = array();
    if (!empty($_SESSION['NamaSekolah'])) {
        if ($arrCariSekolah[$CariSekolah] == 'SekolahID') {
            $whr[] = $arrCariSekolah[$CariSekolah] . " like '{$_SESSION['NamaSekolah']}%' ";
        } else {
            $whr[] = $arrCariSekolah[$CariSekolah] . " like '%{$_SESSION['NamaSekolah']}%' ";
        }
    }
    if (!empty($_SESSION['KotaSekolah'])) {
        $whr[] = "Kota like '%{$_SESSION['KotaSekolah']}%' ";
    }
    $_whr = implode(" and ", $whr);
    $_whr = empty($_whr) ? '' : "where {$_whr}";
    include_once "class/lister.class.php";
    $pagefmt = "<a href='?mnux={$mnux}&{$pref}=Sek&SRSEK==STARTROW='>=PAGE=</a>";
    $pageoff = "<b>=PAGE=</b>";
    $lister = new lister();
    $lister->tables = "asalsekolah {$_whr}\r\n    order by " . $arrCariSekolah[$CariSekolah];
    //echo $lister->tables;
    $lister->fields = "*";
    $lister->startrow = $_REQUEST['SRSEK'] + 0;
    $lister->maxrow = $_defmaxrow;
    $lister->headerfmt = "<table class=box cellspacing=1 cellpadding=4>\r\n      <tr><td class=ul colspan=8><a href='?mnux=pmbasalsek&gos=SekEdt&md=1'>Tambah Sekolah</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=inp1 width=18 align=right>=NOMER=</td>\r\n      <td class=cna=NA= nowrap><a href=\"?SRSEK={$_REQUEST['SRSEK']}&mnux=pmbasalsek&gos=SekEdt&sekid==SekolahID=\"><img src='img/edit.png' border=0>\r\n      =SekolahID=</a></td>\r\n\t  <td class=cna=NA=>=Nama=</a></td>\r\n\t  <td class=cna=NA=>=JenisSekolahID=&nbsp;</td>\r\n\t  <td class=cna=NA=>=Kota=&nbsp;</td>\r\n\t  <td class=cna=NA=>=Website=&nbsp;</td>\r\n\t  <td class=cna=NA=>=Telephone=&nbsp;</td>\r\n\t  <td class=cna=NA=><center><img src='img/book=NA=.gif' border=0></td></tr>";
    $lister->footerfmt = "</table>";
    $halaman = $lister->WritePages($pagefmt, $pageoff);
    $TotalNews = $lister->MaxRowCount;
    $usrlist = $lister->ListIt() . "<br>\r\n\t  Halaman: {$halaman}<br>\r\n\t  Total: {$TotalNews}";
    echo $usrlist;
}
Ejemplo n.º 17
0
function DaftarMhswSkorsing($mnux = '', $gos = '')
{
    $inqMhswPage = GetSetVar('inqMhswPage');
    $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;
    $maxdata = 40;
    // Data
    $s = "select m.MhswID, m.Nama, m.ProgramID, m.ProdiID,\r\n    prg.Nama as PRG, prd.Nama as PRD, sm.Nama as SM, sm.Keluar\r\n    from 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\r\n    limit {$maxdata}";
    $r = _query($s);
    // Tampilkan
    $jmldata = _num_rows($r);
    echo "<p><table class=box cellspacing=1>\r\n    <tr><th class=ttl>#</th>\r\n    <th class=ttl>NPM</th>\r\n    <th class=ttl>Nama</th>\r\n    <th class=ttl>Program</th>\r\n    <th class=ttl>Status</th>\r\n    <th class=ttl>Skorsing</th>\r\n    </tr>";
    $n = 0;
    while ($w = _fetch_array($r)) {
        if ($w['Keluar'] == "Y") {
            $c = "class=nac";
            $skr = '';
            $strMhswID = $w['MhswID'];
        } else {
            $c = "class=ul";
            $strMhswID = "<a href='?mnux={$mnux}&mhswid={$w['MhswID']}'>{$w['MhswID']}</a>";
            $sqlskorsing = "select TahunID\r\n        from khs\r\n        where MhswID='{$w['MhswID']}'\r\n          and StatusMhswID='S'\r\n        order by TahunID";
            $skr = GetArrayTable($sqlskorsing, 'TahunID', 'TahunID', ', ', '');
        }
        $n++;
        echo "<tr>\r\n      <td class=inp>{$n}</td>\r\n      <td {$c}>{$strMhswID}</td>\r\n      <td {$c}>{$w['Nama']}</td>\r\n      <td {$c}>{$w['PRG']}</td>\r\n      <td {$c}>{$w['SM']}</td>\r\n      <td {$c}>{$skr} &nbsp;</td>\r\n    </tr>";
    }
    echo "</table></p>";
    if ($jmldata >= $maxdata) {
        echo "<p>*) Data yang ditampilkan dibatasi <font size=+1>{$maxdata}</font> mhsw.</p>";
    }
}
Ejemplo n.º 18
0
    $hdrjdwl = "<tr><th class=ttl>No</th>\n    <th class=ttl>Jam</th>\n    <th class=ttl>Ruang</th>\n    <th class=ttl>Kode MK</th>\n    <th class=ttl>Matakuliah</th>\n    <th class=ttl>Kelas</th>\n    <th class=ttl>SKS</th>\n    <th class=ttl>Prodi</th>\n    <th class=ttl>Dosen</th>\n    <th class=ttl title='Presensi'>Prs</th>\n    <th class=ttl>Link</th>\n    </tr>";
    echo "<p><table class=box cellspacing=1 cellpadding=4>";
    while ($w = _fetch_array($r)) {
        if ($hari != $w['HariID']) {
            $hari = $w['HariID'];
            echo "<tr><td class=ul colspan=12><b>{$w['HR']}</b></td></tr>";
            echo $hdrjdwl;
        }
        $nomer++;
        $totsks += $w['SKS'];
        // Array dosen
        $arrdosen = explode('.', TRIM($w['DosenID'], '.'));
        $strdosen = implode(',', $arrdosen);
        $_dosen = empty($strdosen) ? '' : GetArrayTable("select Nama from dosen where Login in ({$strdosen}) order by Nama", "Login", "Nama", '<br />');
        // Array prodi
        $arrprodi = explode('.', TRIM($w['ProdiID'], '.'));
        $strprodi = implode(',', $arrprodi);
        $_prodi = empty($strprodi) ? '' : GetArrayTable("select Nama from prodi where ProdiID in ({$strprodi}) order by ProdiID", "ProdiID", "Nama", '<br />');
        echo "<tr><td class=inp1>{$nomer}</td>\n      <td class=ul>{$w['JamMulai']}-{$w['JamSelesai']}</td>\n      <td class=ul>{$w['RuangID']}</td>\n      <td class=ul>{$w['MKKode']}</td>\n      <td class=ul>{$w['Nama']}</td>\n      <td class=ul>{$w['NamaKelas']}&nbsp;</td>\n      <td class=ul>{$w['SKS']} ({$w['SKSAsli']})</td>\n      <td class=ul>{$_prodi}</td>\n      <td class=ul>{$_dosen}</td>\n      <td class=ul align=right>{$w['Kehadiran']}</td>\n      <td class=ul><a href='?mnux=dosen.nilai&tahun={$_SESSION['tahun']}&jadwalid={$w['JadwalID']}&dosen={$_SESSION['dosen']}'>Nilai</a></td>\n      </tr>";
    }
    echo "<tr><td colspan=6 align=right>Total SKS :</td><td class=cnnY align=right><b>{$totsks}</b></td></tr>\n    </table></p>";
}
// *** Parameters ***
$tahun = GetSetVar('tahun');
$dosen = GetSetVar('dosen');
// *** Main ***
TampilkanJudul("Jadwal Mengajar Dosen");
TampilkanHeaderJadwalDosen();
if (!empty($dosen) && !empty($tahun)) {
    TampilkanJadwalDosen();
}
Ejemplo n.º 19
0
    $s = "update pmb set LulusUjian='Y' $where";
    $r = _query($s);
  }
  DftrHasilUSM();
}
function DftrHasilUSM() {
  TampilkanFilterHasilUSM();
  TampilkanDaftarUSM();
}

// *** Parameters ***
$pmbperiod = GetSetVar("pmbperiod");
$pmbfid = GetSetVar('pmbfid');
$pmbpil1 = GetSetVar('pmbpil1');
$pmbprodi = GetSetVar('pmbprodi');
$pmbnilailulus = GetSetVar('pmbnilailulus', 80);
$_pmbhasilgrade = GetSetVar('pmbhasilgrade', 'A');
$_pmbhasildari = GetSetVar('pmbhasildari', 1);
$_pmbhasilsampai = GetSetVar('pmbhasilsampai', 10);
$pmbtahun = GetSetVar('pmbtahun', $pmbperiod);
if (empty($pmbtahun)) {
  $pmbperiod = GetaField("pmbperiod", "NA", 'N', "PMBPeriodID");
  $_SESSION['pmbperiod'] = $pmbperiod;
}
$gos = (empty($_REQUEST['gos']))? 'DftrHasilUSM' : $_REQUEST['gos'];

// *** Main ***
TampilkanJudul("Hasil USM");
$gos();
?>
Ejemplo n.º 20
0
<?php

// Author: Emanuel Setio Dewo
// 24 Jan 2007
// *** Parameters ***
$tahun = GetSetVar('tahun');
$prodi = GetSetVar('prodi');
$prid = GetSetVar('prid');
// *** Main ***
TampilkanJudul("Cek Tagihan KRS Mahasiswa");
TampilkanTahunProdiProgram('_cek_tagihan_krs', '');
// Tampilkan pesan
echo "<p>Tabel berikut ini membandingkan SKS yang diambil di KRS (tabel: krstemp) dengan\r\n  jumlah SKS yang ditagihkan ke mhsw (tabel: bipotmhsw).\r\n  Jika jumlah SKS-nya tidak sama, maka baris akan ditampilkan dengan warna merah. \r\n  Jika jumlah SKS-nya sama, maka baris akan ditampilkan dengan warna putih. <input type=button name='Cetak' value='Cetak' onClick='window.print()'></p>";
if (!empty($tahun) && !empty($prodi)) {
    TampilkanTagihanKRSMhsw(5);
}
// *** Functions ***
function TampilkanTagihanKRSMhsw($BNID)
{
    $s = "select k.KHSID, k.MhswID, m.Nama, sum(k.SKS) as JmlSKS\r\n    from krstemp k\r\n      left outer join mhsw m on k.MhswID=m.MhswID\r\n      left outer join jadwal j on k.JadwalID=j.JadwalID\r\n    where k.TahunID='{$_SESSION['tahun']}'\r\n      and m.ProdiID='{$_SESSION['prodi']}'\r\n      and k.NA='N'\r\n      and j.JenisJadwalID='K'\r\n      and j.JadwalSer=0\r\n    group by k.MhswID";
    $r = _query($s);
    $n = 0;
    echo "<p><table class=box cellspacing=1>\r\n    <tr><th class=ttl>#</th>\r\n    <th class=ttl>NPM</th>\r\n    <th class=ttl>Nama Mhsw</th>\r\n    <th class=ttl>SKS<br />Temp</th>\r\n    <th class=ttl>SKS<br />Tagih</th>\r\n    <th class=ttl>Rupiah<br />Tagih</th>\r\n    <th class=ttl>Total</th>\r\n    </tr>";
    while ($w = _fetch_array($r)) {
        $n++;
        $jml = GetFields('bipotmhsw', "MhswID='{$w['MhswID']}' and TahunID='{$_SESSION['tahun']}' and BIPOTNamaID", $BNID, "Jumlah, Besar");
        $rupiah = number_format($jml['Besar']);
        $total = number_format($jml['Besar'] * $jml['Jumlah']);
        $c = $jml['Jumlah'] != $w['JmlSKS'] ? 'class=wrn' : 'class=ul';
        $link = $jml['Jumlah'] != $w['JmlSKS'] ? "<a href='cetak/krs.cetak.php?khsid={$w['KHSID']}&prn=1'>{$w['MhswID']}</a>" : $w['MhswID'];
        echo "<tr>\r\n    <td class=inp>{$n}</td>\r\n    <td {$c}>{$link}</td>\r\n    <td {$c}>{$w['Nama']}</td>\r\n    <td {$c} align=right>{$w['JmlSKS']}</td>\r\n    <td {$c} align=right>{$jml['Jumlah']}</td>\r\n    <td {$c} align=right>{$rupiah}</td>\r\n    <td {$c} align=right>{$total}</td>\r\n    </tr>";
Ejemplo n.º 21
0
<?php

// Author : Emanuel Setio Dewo
// Email  : setio.dewo@gmail.com
// Start  : 08/10/2008
session_start();
include_once "../sisfokampus1.php";
HeaderSisfoKampus("Data Mahasiswa Yang Lulus");
// *** Parameters ***
$TahunID = GetSetVar('TahunID');
$ProdiID = GetSetVar('ProdiID');
// *** Main ***
$gos = empty($_REQUEST['gos']) ? 'Satu' : $_REQUEST['gos'];
$gos();
// *** Functions ***
function Satu()
{
    echo <<<ESD
  <font size=+1>Data Mahasiswa Yang Lulus</font> <sup>TRLSM</sup><br />
  <table class=box cellspacing=1 width=100%>
  <tr><td>
      Anda akan mengexport data kelulusan mahasiswa.<br />
      Sistem akan memproses data kelulusan dari tahun akademik yang telah ditentukan di atas.<br />
      Status Mhsw yang akan diproses: <b>L</b>ulus, <b>C</b>uti, <b>N</b>on-aktif.<br />
      Tekan tombol Proses untuk memulai proses export.
      </td>
      <td width=80 align=right valign=top>
      <input type=button name='Proses' value='Proses'
        onClick="location='../{$_SESSION['mnux']}.lulusmhsw.php?gos=Proses'" />
      </td>
      </tr>
    $jdwl = GetFields('jadwal', 'JadwalID', $JadwalID, '*');
    $MhswIDPart = $_REQUEST['MhswIDPart'];
    $KHSID = array();
    $KHSID = $_REQUEST['KHSID'];
    //foreach ($KHSID as $val) echo "$val<br />";
    $inKHSID = implode(',', $KHSID);
    $s = "select MhswID, KHSID\r\n    from khs\r\n    where KHSID in ({$inKHSID})";
    $r = _query($s);
    echo "<ol>";
    while ($w = _fetch_array($r)) {
        $ada = GetaField("krs", "MhswID='{$w['MhswID']}' and JadwalID", $jdwl['JadwalID'], 'KRSID') + 0;
        if ($ada == 0) {
            $str = "insert into krs\r\n        (KHSID, MhswID, TahunID, JadwalID,\r\n        MKID, MKKode, SKS, HargaStandar, Harga,\r\n        Catatan, LoginBuat, TanggalBuat)\r\n        values ({$w['KHSID']}, '{$w['MhswID']}', '{$jdwl['TahunID']}', {$jdwl['JadwalID']},\r\n        '{$jdwl['MKID']}', '{$jdwl['MKKode']}', '{$jdwl['SKS']}', '{$jdwl['HargaStandar']}', '{$jdwl['Harga']}',\r\n        'DITERIMA', 'BATCH-0922', now())";
            $rstr = _query($str);
        } else {
            $str = "SDH.";
        }
        echo "<li>{$w['MhswID']} - {$w['KHSID']} &raquo; {$str}</li>";
    }
    echo "</ol>";
}
// *** Parameters ***
$JadwalID = GetSetVar('JadwalID');
$MhswIDPart = GetSetVar('MhswIDPart');
$gos = $_REQUEST['gos'];
// *** Main ***
TampilkanJudul("Input KRS Masal Berdasarkan Jadwal & Angkatan");
TampilkanInputJadwal();
if (!empty($gos)) {
    $gos();
}
Ejemplo n.º 23
0
<?php

// Author : Emanuel Setio Dewo
// Email  : setio.dewo@gmail.com
// Start  : 08/10/2008
session_start();
include_once "../sisfokampus1.php";
HeaderSisfoKampus("Aktivitas Mahasiswa");
// *** Parameters ***
$TahunID = GetSetVar('TahunID');
$ProdiID = GetSetVar('ProdiID');
$DariMhsw = GetSetVar('DariMhsw');
$SampaiMhsw = GetSetVar('SampaiMhsw');
// *** Main ***
$gos = empty($_REQUEST['gos']) ? 'Satu' : $_REQUEST['gos'];
$gos();
// *** Functions ***
function Satu()
{
    echo <<<ESD
  <font size=+1>Aktivitas Mahasiswa</font> <sup>TRAKM</sup><br />
  <table class=box cellspacing=1 width=99%>
  <form action='../{$_SESSION['mnux']}.mhsw.php' method=POST>
  <tr>
      <td width=200 valign=top>
      Dari NIM:<br /> 
      <input type=text name='DariMhsw' value='{$_SESSION['DariMhsw']}' size=20 maxlength=50 />
      <font color=red>*)</font>
      </td>
      
      <td width=200 valign=top>
Ejemplo n.º 24
0
<?php

// Author : Irvandy Goutama
// Start  : 29 April 2008
// Email  : irvandygoutama@gmail.com
// *** Parameters ***
$_statusmhswNama = GetSetVar('_statusmhswID');
$_statusmhswNama = GetSetVar('_statusmhswNama');
$_statusmhswProdi = GetSetVar('_statusmhswProdi');
$_statusmhswPrg = GetSetVar('_statusmhswPrg');
$_statusmhswNomer = GetSetVar('_statusmhswNomer');
$_statusmhswPage = GetSetVar('_statusmhswPage');
$_statusmhswUrut = GetSetVar('_statusmhswUrut', 1);
$arrUrutMhsw = array('NIM~psm.MhswID asc, m.Nama', 'NIM (balik)~psm.MhswID desc, m.Nama', 'Nama~m.Nama');
RandomStringScript();
// *** Main ***
TampilkanJudul("Pengurusan Status Mahasiswa");
$gos = empty($_REQUEST['gos']) ? 'StatusMhsw' : $_REQUEST['gos'];
$gos();
// *** Functions ***
function AmbilUrutanMhswID()
{
    global $arrUrutMhsw;
    $a = '';
    $i = 0;
    foreach ($arrUrutMhsw as $u) {
        $_u = explode('~', $u);
        $sel = $i == $_SESSION['_statusmhswUrut'] ? 'selected' : '';
        $a .= "<option value='{$i}' {$sel}>" . $_u[0] . "</option>";
        $i++;
    }
Ejemplo n.º 25
0
            $r = _query($s);
            //update KRSTEMP
            $s1 = "update krstemp\r\n\t\t\t\tset JadwalID={$Ke_Kelas}, Catatan='Pindah Jadwal dari {$jid}', LoginEdit='{$_SESSION['_Login']}', TanggalEdit=now()\r\n\t\t\t\twhere KRSID={$krsid}";
            $r1 = _query($s1);
            //update Jadwal
            $s0 = "update jadwal\r\n\t\t\t\tset JumlahMhsw=JumlahMhsw-1 where JadwalID = '{$Ke_kelas}'";
            $r0 = _query($s0);
        }
    }
    HitungJumlahMhsw($jid);
    HitungJumlahMhsw($Ke_Kelas);
    echo Konfirmasi("Telah Dipindahkan", "Sebanyak <font size=+1>{$n}</font> mhsw telah dipindah kelasnya.\r\n    <hr size=1 color=silver>\r\n    Option: <a href='?mnux=koreksikelas'>Kembali</a>");
}
function HitungJumlahMhsw($jid)
{
    $mhswkrs = GetaField('krstemp', 'JadwalID', $jid, "count(KRSID)") + 0;
    $mhsw = GetaField('krs', 'JadwalID', $jid, "count(KRSID)") + 0;
    $s = "update jadwal set JumlahMhsw = '{$mhsw}', JumlahMhswKRS = '{$mhswkrs}' where JadwalID = '{$jid}' ";
    $r = _query($s);
}
// *** Parameters ***
$prodi = GetSetVar('prodi');
$prid = GetSetVar('prid');
$tahun = GetSetVar('tahun');
$gos = empty($_REQUEST['gos']) ? 'DftrJdwl' : $_REQUEST['gos'];
// *** Main ***
TampilkanJudul("Koreksi Kelas");
TampilkanTahunProdiProgram('koreksikelas', '');
if (!empty($prid) && !empty($prodi)) {
    $gos();
}
Ejemplo n.º 26
0
<?php

// Author : Emanuel Setio Dewo
// Email  : setio.dewo@gmail.com
// Start  : 18/12/2008
// *** Parameters ***
$tabalumni = GetSetVar('tabalumni', 0);
$mhswid = GetSetVar('mhswid');
$mhswbck = GetSetVar('mhswbck');
// *** Main ***
TampilkanJudul("Edit Alumni");
$gos = empty($_REQUEST['gos']) ? 'fnEdit' : $_REQUEST['gos'];
$gos();
// *** Functions ***
function fnEdit()
{
    $mhsw = GetFields("mhsw m", "m.MhswID='{$_SESSION['mhswid']}' and m.KodeID", KodeID, "m.*");
    $alumni = GetFields("alumni a", "a.MhswID='{$_SESSION['mhswid']}' and a.KodeID", KodeID, "a.*");
    if (empty($mhsw) || empty($alumni)) {
        echo ErrorMsg('Error', "Data alumni tidak ditemukan.<br />\r\n      Hubungi Sysadmin untuk informasi lebih lanjut.\r\n      <hr size=1 color=silver />\r\n      <input type=button name='btnKembali' value='Kembali'\r\n      onClick=\"location='?mnux={$_SESSION['mhswbck']}&gos='\" />");
    } else {
        TampilkanHeader($mhsw, $alumni);
        TampilkanTab($mhsw, $alumni, $_SESSION['tabalumni']);
    }
}
function TampilkanHeader($mhsw, $alumni)
{
    $prodi = GetaField('prodi', "ProdiID='{$mhsw['ProdiID']}' and KodeID", KodeID, "Nama");
    echo <<<ESD
  <table class=box cellspacing=1 align=center width=600>
  <tr><td class=inp width=60>Nama:</td>
Ejemplo n.º 27
0
<?php

// Author : Emanuel Setio Dewo
// Email  : setio.dewo@gmail.com
// Start  : 04/12/2008
//
// *** Parameters ***
$_honBulan = GetSetVar('_honBulan', date('m'));
$_honTahun = GetSetVar('_honTahun', date('Y'));
$_honDosen = GetSetVar('_honDosen');
$_honProdi = GetSetVar('_honProdi');
// *** Main ***
TampilkanJudul("Honor Dosen");
TampilkanHeaderHonorer();
$gos = empty($_REQUEST['gos']) ? 'DftrHondok' : $_REQUEST['gos'];
$gos();
// *** Functions ***
function TampilkanHeaderHonorer()
{
    $optbulan = GetMonthOption($_SESSION['_honBulan']);
    $optprodi = GetOption2('prodi', "concat(ProdiID, ' - ', Nama)", 'ProdiID', $_SESSION['_honProdi'], "KodeID='" . KodeID . "'", 'ProdiID');
    RandomStringScript();
    echo <<<ESD
  <table class=box cellspacing=1 width=880>
  <form name='frmHeaderHondok' action='?' method=POST>
  <input type=hidden name='mnux' value='{$_SESSION['mnux']}' />
  <input type=hidden name='gos' value='' />
  <input type=hidden name='_honPage' value='1' />
  
  <tr>
      <td class=ul1>
Ejemplo n.º 28
0
<?php

// Author : Emanuel Setio Dewo
// Email  : setio.dewo@gmail.com
// Start  : 16 Sept 2008
// *** Parameters ***
$_krsTahunID = GetSetVar('_krsTahunID');
$_krsMhswID = GetSetVar('_krsMhswID');
// *** Main ***
TampilkanJudul("Nilai Semester Mahasiswa");
CekBolehAksesModul();
TampilkanCariMhswnya();
if (!empty($_krsTahunID) && !empty($_krsMhswID)) {
    $oke = BolehAksesData($_krsMhswID);
    if ($oke) {
        $oke = ValidasiDataMhsw($_krsTahunID, $_krsMhswID, $khs);
    }
    if ($oke) {
        $oke = CekPembayaran($_krsMhswID);
    }
    if ($oke) {
        $mhsw = GetFields("mhsw m\r\n      left outer join statusawal sta on sta.StatusAwalID = m.StatusAwalID \r\n\t  left outer join dosen d on d.Login = m.PenasehatAkademik", "m.KodeID = '" . KodeID . "' and m.MhswID", $_krsMhswID, "m.*, sta.Nama as STAWAL, d.Nama as namaDosen");
        $thn = GetFields("tahun", "KodeID = '" . KodeID . "' and TahunID", $_krsTahunID, "*");
        $gos = sqling($_REQUEST['gos']);
        if (empty($gos)) {
            TampilkanHeaderMhsw($thn, $mhsw, $khs);
            TampilkanDaftarKRSMhsw($thn, $mhsw, $khs);
        } else {
            $gos();
        }
    }
        $isi .= str_pad($w['SKS'], 2, ' ', STR_PAD_LEFT) . ' ';
        $isi .= str_pad($w['TanggalDispensasi'], 12, ' ', STR_PAD_LEFT) . '   ';
        $isi .= str_pad($Catatan, 30, ' ') . ' ';
        $isi .= $_lf;
        fwrite($f, $isi);
    }
    $hal++;
    fwrite($f, $div);
    fwrite($f, str_pad("Dicetak oleh: " . $_SESSION['_Login'] . ', ' . date("d-m-Y H:i"), 50, ' '));
    //str_pad("(Akhir Laporan) Hal. : ".$hal.'/'.$jumhal, 100, ' ', STR_PAD_LEFT));
    // Tutup & tampilkan
    fwrite($f, chr(12));
    fclose($f);
    TampilkanFileDWOPRN($nmf, 'akd.lap');
}
// *** Parameters ***
$tahun = GetSetVar('tahun');
$prodi = GetSetVar('prodi');
$prid = GetSetVar('prid');
$DariNPM = GetSetVar('DariNPM');
$SampaiNPM = GetSetVar('SampaiNPM');
// *** Main ***
TampilkanJudul("Daftar KRS Mahasiswa Yang Dispensasi");
//TampilkanTahunProdiProgram('akd.lap.krsmhsw', 'DftrAkdLapKRSMhsw');
TampilkanTahunProdiProgram('akd.lap.krsmhsw.dispen', 'DftrAkdLapKRSMhswDispen', '', '', 1);
if (!empty($tahun)) {
    DftrAkdLapKRSMhswDispen();
}
?>

Ejemplo n.º 30
0
    $_SESSION['NIMPOS'] = 0;
    echo "<p>Sistem akan memproses <font size=+2>{$jml}</font> data</p>\r\n    <p><IFRAME src='cluster.nim.prc.php?gos=PRCNIM&prodi={$prodiid}&thnangkatan={$tahun_angkatan}' frameborder=0>\r\n    </IFRAME></p>";
}
function headerKelas($namaKelas)
{
    $t = "<p><table class=box cellpadding=4 cellspacing=1>";
    $t .= "<tr><th class=ttl colspan=4>Kelas : {$namaKelas}</th>";
    $t .= "<tr><td class=ttl>No.</td><td class=ttl>PMBID</td><td class=ttl>Nama</td><td class=ttl>NIM</td></tr>";
    return $t;
}
$prodi = GetSetVar('prodi');
$prid = GetSetVar('prid');
$pmbperiod = GetSetVar("pmbperiod");
$Kaps = GetFields('prodi', 'ProdiID', $prodi, "KapasitasKelas");
$kapasitas_kelas = GetSetVar('kapasitas_kelas', $Kaps['KapasitasKelas']);
$tahun_angkatan = GetSetVar('tahun_angkatan');
if (empty($pmbperiod)) {
    $pmbperiod = GetaField("pmbperiod", "NA", 'N', "PMBPeriodID");
    $_SESSION['pmbperiod'] = $pmbperiod;
}
$gos = empty($_REQUEST['gos']) ? 'setupKelas' : $_REQUEST['gos'];
$subg = $_REQUEST['subg'];
// *** Main ***
TampilkanJudul("Pembagian Kelas dan NIM");
TampilkanFilterMhsw();
if (!empty($_SESSION['prodi']) && !empty($_SESSION['prid']) && !empty($_SESSION['KodeID'])) {
    $gos();
    if (!empty($subg)) {
        $jml = GetaField('pmb', "PMBPeriodID = '{$_SESSION['pmbperiod']}' and ProdiID='{$_SESSION['prodi']}' and ProgramID='{$_SESSION['prid']}' and NIM IS NULL and LulusUjian", 'Y', 'count(PMBID)');
        if ($jml > 0) {
            GenerateNIM();