示例#1
1
function AmbilDetail($mhsw, $khs)
{
    $s = "select *\r\n    from bayarmhsw bm\r\n    where bm.TahunID='{$khs['TahunID']}' and bm.MhswID='{$mhsw['MhswID']}'\r\n      and bm.TrxID=-1\r\n    order by bm.Tanggal";
    $r = _query($s);
    $str = '';
    if (_num_rows($r) > 0) {
        $n = 0;
        $str = "<table class=bsc cellspacing=1 cellpadding=1>";
        while ($w = _fetch_array($r)) {
            $n++;
            $tgl = FormatTanggal($w['Tanggal']);
            $jml = number_format($w['Jumlah']);
            $proses = $w['Proses'] == 0 ? "<a href='?mnux=mhswkeu.ambil&gos=TrxAmbilPros&khsid={$khs['KHSID']}&bayarmhswid={$w['BayarMhswID']}' title='Proses Pembayaran'><img src='img/gear.gif'> Proses</a>" : "<a href='?mnux=mhswkeu.ambil&gos=TrxAmbilPros&khsid={$khs['KHSID']}&bayarmhswid={$w['BayarMhswID']}&Rep=1' title='Proses Reprint'><img src='img/printer.gif'> Reprint</a>";
            $str .= "<tr><td class=inp>{$n}</td>\r\n        <td class=ul valign=middle>{$proses}</td>\r\n        <td class=ul>{$w['BayarMhswID']}</td>\r\n        <td class=ul>{$tgl}</td>\r\n        <td class=ul>{$jml}</td>\r\n        </tr>";
        }
        $str .= "</table>";
    } else {
        $str = "&nbsp;";
    }
    return $str;
}
示例#2
0
function TampilkanHeader()
{
    $ta = GetFields('ta', 'TAID', $_SESSION['TAID'], '*');
    $dsn = GetFields('dosen', "Login = '******'Pembimbing']}' and KodeID", KodeID, "Nama, Gelar");
    $mhsw = GetFields('mhsw', "MhswID = '{$ta['MhswID']}' and KodeID", KodeID, "*");
    $TglMulai = FormatTanggal($ta['TglMulai']);
    $TglSelesai = FormatTanggal($ta['TglSelesai']);
    $b1 = empty($dsn) ? '(Belum diset)' : "{$dsn['Nama']} <sup>{$dsn['Gelar']}</sup>";
    echo <<<ESD
  <table class=box cellspacing=1 width=100%>
  <tr><td class=inp width=100>NIM:</td>
      <td class=ul>{$ta['MhswID']}&nbsp;</td>
      <td class=inp width=100>Nama Mahasiswa:</td>
      <td class=ul>{$mhsw['Nama']}&nbsp;</td>
      </tr>
  <tr><td class=inp>Tahun Akademik:</td>
      <td class=ul>{$ta['TahunID']}&nbsp;</td>
      <td class=inp>Batas Waktu:</td>
      <td class=ul>{$TglMulai} ~ {$TglSelesai}</td>
      </tr>
  <tr><td class=inp>Judul:</td>
      <td class=ul colspan=3>{$ta['Judul']}&nbsp;</td>
      </tr>
  <tr><td class=inp>Deskripsi/Abstrak:</td>
      <td class=ul colspan=3>{$ta['Deskripsi']}&nbsp;</td>
      </tr>
  <tr><td class=inp>Pembimbing Utama:</td>
      <td class=ul colspan=3>{$b1}</td>
      </tr>
  </table>
ESD;
    TampilkanDaftarPembimbing($_SESSION['TAID'], $mhsw);
}
示例#3
0
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']}&nbsp;</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>";
}
示例#4
0
function KalendarAkd()
{
    $t = GetFields('tahun', "ProdiID='{$_SESSION['prodi']}' and ProgramID='{$_SESSION['prid']}' and TahunID", $_SESSION['tahun'], '*');
    if (empty($t)) {
        echo ErrorMsg("Kalendar Akademik Tidak Ada", "Kalendar Akademik <font size=+1>{$_SESSION['tahun']}</font> tidak ada atau\n      belum dibuat.<br />\n      Hubungi MIS/IT untuk informasi lebih lanjut");
    } else {
        $_prd = GetaField('prodi', 'ProdiID', $_SESSION['prodi'], 'Nama');
        $_prg = GetaField('program', 'ProgramID', $_SESSION['prid'], 'Nama');
        $TglKRSMulai = FormatTanggal($t['TglKRSMulai']);
        $TglKRSSelesai = FormatTanggal($t['TglKRSSelesai']);
        $TglUbahKRSMulai = FormatTanggal($t['TglUbahKRSMulai']);
        $TglUbahKRSSelesai = FormatTanggal($t['TglUbahKRSSelesai']);
        $TglCuti = FormatTanggal($t['TglCuti']);
        $TglMundur = FormatTanggal($t['TglMundur']);
        $TglKembaliUangKuliah = FormatTanggal($t['TglKembaliUangKuliah']);
        $TglBayarMulai = FormatTanggal($t['TglBayarMulai']);
        $TglBayarSelesai = FormatTanggal($t['TglBayarSelesai']);
        $TglKuliahMulai = FormatTanggal($t['TglKuliahMulai']);
        $TglKuliahSelesai = FormatTanggal($t['TglKuliahSelesai']);
        $TglUTSMulai = FormatTanggal($t['TglUTSMulai']);
        $TglUTSSelesai = FormatTanggal($t['TglUTSSelesai']);
        $TglUASMulai = FormatTanggal($t['TglUASMulai']);
        $TglUASSelesai = FormatTanggal($t['TglUASSelesai']);
        $TglNilai = FormatTanggal($t['TglNilai']);
        echo "<p><table class=box cellspacing=1>\n    <tr><td class=ul colspan=2><font size=+1>Kalendar Akademik</font></th></tr>\n    <tr><td class=inp>Tahun Akademik</td>\n      <td class=ul>{$t['TahunID']}</td></tr>\n    <tr><td class=inp>Nama Tahun</td>\n      <td class=ul>{$t['Nama']}</td></tr>\n    <tr><td class=inp>Program</td>\n      <td class=ul>{$_prg}</td></tr>\n    <tr><td class=inp>Program Studi</td>\n      <td class=ul>{$_prd}</td></tr>\n    <tr><td class=inp>Tidak Aktif?</td><td class=ul><img src='img/book{$t['NA']}.gif'></td></tr>\n      \n    <tr><td class=ul colspan=2><font size=+1>KRS</font></td></tr>\n    <tr><td class=inp>Mulai KRS</td>\n      <td class=ul>{$TglKRSMulai}</td></tr>\n    <tr><td class=inp>Selesai KRS</td>\n      <td class=ul>{$TglKRSSelesai}</td></tr>\n    <tr><td class=inp>Mulai Ubah KRS</td><td class=ul>{$TglUbahKRSMulai}</td></tr>\n    <tr><td class=inp>Selesai Ubah KRS</td><td class=ul>{$TglUbahKRSSelesai}</td></tr>\n    <tr><td class=inp>Batas Pengajuan Cuti</td><td class=ul>{$TglCuti}</td></tr>\n    <tr><td class=inp>Batas Pengajuan Mundur Kuliah</td><td class=ul>{$TglMundur}</td></tr>\n    <tr><td class=inp>Batas Pengambilan Kelebihan Uang Kuliah</td><td class=ul>{$TglKembaliUangKuliah}</td></tr>\n    \n    <tr><td class=ul colspan=2><font size=+1>Masa Pembayaran</font></td></tr>\n    <tr><td class=inp>Mulai Pembayaran</td><td class=ul>{$TglBayarMulai}</td></tr>\n    <tr><td class=inp>Selesai Pembayaran</td><td class=ul>{$TglBayarSelesai}</td></tr>\n    \n    <tr><td class=ul colspan=2><font size=+1>Periode Perkuliahan</font></td></tr>\n    <tr><td class=inp>Mulai Kuliah</td><td class=ul>{$TglKuliahMulai}</td></tr>\n    <tr><td class=inp>Selesai Kuliah</td><td class=ul>{$TglKuliahSelesai}</td></tr>\n    \n    <tr><td class=ul colspan=2><font size=+1>Periode Ujian Tengah Semester</font></td></tr>\n    <tr><td class=inp>Mulai UTS</td><td class=ul>{$TglUTSMulai}</td></tr>\n    <tr><td class=inp>Selesai UTS</td><td class=ul>{$TglUTSSelesai}</td></tr>\n    \n    <tr><td class=ul colspan=2><font size=+1>Periode Ujian Akhir Semester</font></td></tr>\n    <tr><td class=inp>Mulai UAS</td><td class=ul>{$TglUASMulai}</td></tr>\n    <tr><td class=inp>Selesai UAS</td><td class=ul>{$TglUASSelesai}</td></tr>\n    <tr><td class=inp>Batas Akhir Penilaian</td><td class=ul>{$TglNilai}</td></tr>\n    <tr><td class=inp>Catatan</td>\n      <td class=ul>{$t['Catatan']}&nbsp;</td></tr>\n    \n    </table></p>";
    }
}
function BuatPanitera()
{
    global $prodi_asal, $prodi_panitera;
    $sked = $_REQUEST['sked'];
    $mhsw = GetFields('mhsw', "MhswID", $sked, '*');
    if (!empty($mhsw)) {
        if ($mhsw['ProdiID'] == $prodi_asal) {
            $ada = GetFields('mhsw', "ProdiID='{$prodi_panitera}' and PMBID", $sked, '*');
            if (!empty($ada)) {
                die(ErrorMsg("Mhsw Sudah Terdaftar", "Mahasiswa dengan NPM S.Ked <b>{$sked}</b> telah terdaftar di program Kepaniteraan.\r\n        <hr size=1 color=silver>\r\n\t      Pilihan: <a href='?mnux=mhsw.panitera.baru'>Kembali</a>"));
            }
            //if ($mhsw['LulusUjian'] == 'N')
            if ($mhsw['StatusMhswID'] != 'L') {
                die(ErrorMsg("Mhsw Belum Lulus", "Mahasiswa dengan NPM S.Ked <b>{$sked}</b> belum lulus S.Ked.\r\n      <hr size=1 color=silver>\r\n\t    Pilihan: <a href='?mnux=mhsw.panitera.baru'>Kembali</a>"));
            }
            $tgl = FormatTanggal($mhsw['TanggalLulus']);
            CheckFormScript("SKMasuk");
            $TGL = GetDateOption(date('Y-m-d'), 'TGL');
            echo Konfirmasi("Pembuatan NPM Kepaniteraan", "<p><form action='?' method=POST onSubmit=\"return CheckForm(this)\">\r\n      <input type=hidden name='mnux' value='mhsw.panitera.baru'>\r\n      <input type=hidden name='sked' value='{$sked}'>\r\n      <input type=hidden name='gos' value='BuatPanitera1'>\r\n      <table class=bsc>\r\n\t\t  <tr><td class=ul>NPM SKed</td>\r\n\t\t  <td class=ul><b>{$mhsw['MhswID']}</td></tr>\r\n\t\t  <tr><td class=ul>Nama Mhsw</td>\r\n\t\t  <td class=ul><b>{$mhsw['Nama']}</td></tr>\r\n\t\t  <tr><td class=ul>Lulus Tanggal</td>\r\n\t\t  <td class=ul><b>{$tgl}</td></tr>\r\n\t\t  <tr><td class=ul>Nilai Akhir</td>\r\n\t\t  <td class=ul><b>{$mhsw['GradeNilai']} ({$mhsw['NilaiUjian']})</td></tr>\r\n\t\t  <tr><td class=ul>SK Masuk Panitera</td>\r\n\t\t    <td class=ul><input type=text name='SKMasuk' size=30 maxlength=50></td></tr>\r\n\t\t  <tr><td class=ul>Tanggal SK Masuk</td>\r\n\t\t    <td class=ul>{$TGL}</td></tr>\r\n\t\t  </table></p>\r\n\t\t\r\n\t    Pilihan: <input type=submit name='Simpan' value='Simpan'>\r\n\t    <input type=button name='Batal' value='Batalkan Proses' onClick=\"location='?mnux=mhsw.panitera.baru&gos='\">\r\n      </form>");
        } else {
            echo ErrorMsg("Mhsw Bukan Dari Kedokteran", "Mahasiswa dengan Nama <b>{$mhsw['Nama']}</b> (<b>{$sked}</b>) bukan dari Fakultas Kedokteran.<br />\r\n\t  Mahasiswa ini tidak dapat diproses menjadi mahasiswa Kepaniteraan.\r\n\t  <hr size=1 color=silver>\r\n\t  Pilihan: <a href='?mnux=mhsw.panitera.baru'>Kembali</a>");
        }
    } else {
        echo ErrorMsg("Mhsw Tidak Ditemukan", "Mhsw dengan NPM <b>{$sked}</b> tidak ditemukan, atau bukan dari fakultas Kedokteran.\r\n\t  <hr size=1 color=silver>\r\n\t  Pilihan: <a href='?mnux=mhsw.panitera.baru'>Kembali</a>");
    }
}
示例#6
0
function GetHeaderJadwalKlinik($JdwlID = 0)
{
    $jdwl = GetFields('jadwal j', "j.JadwalID", $JdwlID, "j.*");
    $TM = FormatTanggal($jdwl['TglMulai']);
    $TS = FormatTanggal($jdwl['TglSelesai']);
    echo "<p><table class=box>\r\n  <tr><td class=inp>ID</td>\r\n    <td class=ul>{$jdwl['JadwalID']}</td>\r\n    <td class=inp>RS</td>\r\n    <td class=ul>{$jdwl['RuangID']}</td>\r\n    <td class=inp>Kelas</td>\r\n    <td class=ul>{$jdwl['NamaKelas']}</td>\r\n    <td class=inp>Kapasitas</td>\r\n    <td class=ul>{$jdwl['Kapasitas']}</td>\r\n    </tr>\r\n  <tr><td class=inp>Kode</td>\r\n    <td class=ul>{$jdwl['MKKode']}</td>\r\n    <td class=inp>Matakuliah</td>\r\n    <td class=ul>{$jdwl['Nama']}</td>\r\n    <td class=inp>SKS</td>\r\n    <td class=ul>{$jdwl['SKS']}</td>\r\n    <td class=inp>Periode</td>\r\n    <td class=ul>{$TM} - {$TS}</td>\r\n  </table></p>";
    return $jdwl;
}
示例#7
0
function HeaderAnjunganMhsw($mhsw)
{
    $tglLahir = FormatTanggal($mhsw['TanggalLahir']);
    $foto = $mhsw['Foto'];
    $foto = empty($foto) ? "img/tux001.jpg" : $foto;
    $PA = GetaField('dosen', "Login", $mhsw['PenasehatAkademik'], "concat(Nama, ', ', Gelar)");
    echo "<p><table class=bsc>\r\n  <tr><td class=ttl colspan=4>Data Pribadi</td></tr>\r\n  <tr><td class=inp>Nomer Pokok Mhsw</td>\r\n      <td class=ul>{$mhsw['MhswID']}</td>\r\n      <td class=inp>Program</td>\r\n      <td class=ul>{$mhsw['ProgramID']} - {$mhsw['PRG']}</td>\r\n      <td class=bsc rowspan=8 valign=top><img src='../{$foto}' vspace=10 hspace=10 height=150 width=120></td>\r\n      </tr>\r\n  <tr><td class=inp>Nama Mhsw</td>\r\n      <td class=ul>{$mhsw['Nama']}</td>\r\n      <td class=inp>Program Studi</td>\r\n      <td class=ul>{$mhsw['ProdiID']} - {$mhsw['PRD']}</td>\r\n      </tr>\r\n  <tr><td class=inp>Angkatan</td>\r\n      <td class=ul>{$mhsw['TahunID']}</td>\r\n      <td class=inp>Status Mhsw</td>\r\n      <td class=ul>{$mhsw['STA']} &nbsp;</td>\r\n      </tr>\r\n  <tr><td class=inp>Batas Studi</td>\r\n      <td class=ul>{$mhsw['BatasStudi']} &nbsp;</td>\r\n      <td class=inp>Pembimbing Akademik</td>\r\n      <td class=ul>{$PA} &nbsp;</td>\r\n      </tr>\r\n  <tr><td class=inp>Jenis Kelamin</td>\r\n      <td class=ul>{$mhsw['KEL']} &nbsp;</td>\r\n      <td class=inp>Agama</td>\r\n      <td class=ul>{$mhsw['AGM']} &nbsp;</td>\r\n      </tr>\r\n  <tr><td class=inp>Tempat, Tgl Lahir</td>\r\n      <td class=ul>{$mhsw['TempatLahir']}, {$tglLahir}</td>\r\n      <td class=inp>Status Perkawinan</td>\r\n      <td class=ul>{$mhsw['KWN']} &nbsp;</td>\r\n      </tr>\r\n\t<tr><td class=ttl colspan=4>&nbsp;</td></tr></table></p>";
}
示例#8
0
function DftrUjian()
{
    global $arrUjian;
    $_jj = empty($_SESSION['jenjad']) ? '' : "and j.JenisJadwalID='{$_SESSION['jenjad']}' ";
    switch ($_SESSION['ujian']) {
        case 0:
            $ord = "j.HariID, j.JamMulai, j.MKKode, j.NamaKelas";
            break;
        case 1:
            $ord = "j.UTSTanggal, j.UTSJamMulai, j.MKKode, j.NamaKelas";
            break;
        case 2:
            $ord = "j.UASTanggal, j.UASJamMulai, j.MKKode, j.NamaKelas";
            break;
    }
    $s = "select j.*\n    from jadwal j\n    where j.TahunID='{$_SESSION['tahun']}' and j.NamaKelas<>'KLINIK'\n      and INSTR(j.ProgramID, '.{$_SESSION['prid']}.')>0\n      and INSTR(j.ProdiID, '.{$_SESSION['prodi']}.')>0 {$_jj} \n      and j.JadwalSer = 0 \n\t  order by {$ord}";
    $r = _query($s);
    $tgl = '';
    echo "<p><table class=box cellspacing=1>\n    <tr><th class=ttl>Edit</th>\n    <th class=ttl>Tanggal</th>\n    <th class=ttl>Jam</th>\n    <th class=ttl>Ruang</th>\n    <th class=ttl>ID</th>\n    <th class=ttl>Kode</th>\n    <th class=ttl>Matakuliah</th>\n    <th class=ttl>Kelas</th>\n    <th class=ttl>Jenis</th>\n    <th class=ttl>SKS</th>\n    <th class=ttl>Mhsw</th>\n    <th class=ttl title='Minimal Kehadiran Mhsw'>Min</th>\n    <th class=ttl>Dosen</th>\n    <th class=ttl title='Daftar Hadir Ujian'><img src='img/printer.gif'></th>\n    <th class=ttl title='Daftar Mhsw Tidak Boleh Ujian'><img src='img/printer.gif'></th> \n    </tr>";
    $nmujian = $arrUjian[$_SESSION['ujian']];
    while ($w = _fetch_array($r)) {
        if ($tgl != $w[$nmujian . "Tanggal"]) {
            $tgl = $w[$nmujian . "Tanggal"];
            $Tanggal = $tgl == "0000-00-00" ? "-" : FormatTanggal($tgl);
        } else {
            $Tanggal = "\"";
        }
        if ($w[$nmujian . "Tanggal"] == "0000-00-00") {
            $c = "class=nac";
            $Tanggal = "x";
            $dhu = "&nbsp;";
            $JAM = "&nbsp;";
        } else {
            $c = "class=ul";
            $dhu = "<a href='jadwal.cetakdh.php?JadwalID={$w['JadwalID']}&ctk={$_SESSION['ujian']}' title='Daftar Hadir Ujian' target=_blank>DHU</a>";
            $xdhu = $_SESSION['ujian'] == 2 ? "<a href='jadwal.cetakdh.php?JadwalID={$w['JadwalID']}&ctk=2&hak=1' title='Mhsw Tidak Ujian' target=_blank>MTU</a>" : '&nbsp;';
            $JAM = substr($w[$nmujian . "JamMulai"], 0, 5) . "-" . substr($w[$nmujian . "JamSelesai"], 0, 5);
        }
        // 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 />');
        $RuangID = $w[$nmujian . "RuangID"];
        if (empty($RuangID)) {
            $RG = '';
        } else {
            $arrrg = explode(',', $RuangID);
            for ($i = 0; $i < sizeof($arrrg); $i++) {
                $arrrg[$i] = substr($arrrg[$i], 0, strpos($arrrg[$i], ':'));
            }
            $RG = implode(',', $arrrg);
        }
        echo "<tr>\n      <td class=ul><a href='?mnux=jadwal.ujian&gos=JUEdt&JadwalID={$w['JadwalID']}&ujian={$_SESSION['ujian']}'><img src='img/edit.png'></a></td>\n      <td {$c} align=center>{$Tanggal}</td>\n      <td {$c}>{$JAM}</td>\n      <td {$c}>{$RG}&nbsp;</td>\n      <td class=inp>{$w['JadwalID']}</td>\n      <td {$c}>{$w['MKKode']}</td>\n      <td {$c}>{$w['Nama']}</td>\n      <td {$c}>{$w['NamaKelas']}&nbsp;</td>\n      <td {$c}>{$w['JenisJadwalID']}</td>\n      <td {$c} align=right>{$w['SKS']}</td>\n      <td {$c} align=right>{$w['JumlahMhsw']}/{$w['Kapasitas']}</td>\n      <td {$c} align=right title='Min {$w['KehadiranMin']}x dari {$w['Kehadiran']}x tatap muka'>{$w['KehadiranMin']}/{$w['Kehadiran']}</td>\n      <td {$c}>{$dosen}</td>\n      <td {$c}>{$dhu}</td>\n      <td {$c}>{$xdhu}</td>\n      </tr>";
    }
    echo "</table></p>";
}
function BuatJudulLaporan($_fid, $p)
{
    $lbr = 190;
    $t = 6;
    $Mulai = FormatTanggal($_SESSION['TglMulai']);
    $Selesai = FormatTanggal($_SESSION['TglSelesai']);
    $p->SetFont('Helvetica', 'B', 14);
    $p->Cell($lbr, $t, "Laporan Penjualan Formulir", 0, 1, 'C');
    $p->Cell($lbr, $t, "Periode: {$Mulai} ~ {$Selesai}", 0, 1, 'C');
    $p->Ln(2);
}
示例#10
0
function TADSN($mhsw, $ta)
{
    $TM = FormatTanggal($ta['TglMulai']);
    $TS = FormatTanggal($ta['TglSelesai']);
    $TU = FormatTanggal($ta['TglUjian']);
    $_TU = $TU == '00/00/0000' ? "&nbsp;" : $TU;
    $pemb = GetaField('dosen', "Login", $ta['Pembimbing'], "concat(Nama, ', ', Gelar)");
    $peng = GetaField('dosen', "Login", $ta['Penguji'], "concat(Nama, ', ', Gelar)");
    //echo "<p><a href='?mnux=ta'>Kembali ke Data Tugas Akhir</a></p>";
    echo "<p><table class=box cellspacing=1 cellpadding=4>\r\n  <tr><td class=inp>Batas Tanggal</td><td class=ul>{$TM} ~ {$TS}</td>\r\n    <td class=inp>Tgl Ujian</td><td class=ul>{$_TU}</td></tr>\r\n  <tr><td class=inp>Pembimbing Utama <a href='?mnux=ta&gos=TAEdt&taid={$ta['TAID']}&md=0'><img src='img/edit.png'></a></td>\r\n    <td class=ul>{$pemb} &nbsp;</td>\r\n    <td class=inp>Penguji Utama <img src='img/edit.png'></td>\r\n    <td class=ul>{$peng} &nbsp;</td></tr>\r\n  <tr><td class=inp>Judul</td>\r\n    <td class=ul colspan=3>{$ta['Judul']}</td></tr>\r\n  <tr><td class=inp>Opsi</td>\r\n    <td class=ul colspan=3><input type=button name='Kembali' value='Kembali ke Data Mhsw' onClick=\"location='?mnux=ta'\"></td></tr>\r\n  </table></p>";
    DaftarPendamping($mhsw, $ta);
}
示例#11
0
function AmbilDetail($f, $mhsw, $w)
{
    global $_lf;
    $s = "select pm.*, jp.Nama, jp.Nilai, p.Tanggal\n    from presensimhsw pm\n      left outer join presensi p on pm.PresensiID=p.PresensiID\n      left outer join jenispresensi jp on pm.JenisPresensiID=jp.JenisPresensiID\n    where pm.MhswID='{$mhsw['MhswID']}' and pm.JadwalID={$w['JadwalID']}\n      and pm.JenisPresensiID <> 'H'\n    order by p.Tanggal";
    $r = _query($s);
    $n = 0;
    while ($w = _fetch_array($r)) {
        $n++;
        $tgl = FormatTanggal($w['Tanggal']);
        fwrite($f, str_pad(' ', 12) . str_pad($n . '.', 4) . str_pad($tgl, 14) . str_pad($w['Nama'], 10) . $_lf);
    }
}
示例#12
0
function TampilkanHeaderMatakuliahKlinik($mhsw, $krs, $mnux = '')
{
    $jdwl = GetFields('jadwal', 'JadwalID', $krs['JadwalID'], '*');
    $mk = GetFields('mk', 'MKID', $krs['MKID'], '*');
    $RS = GetaField('rumahsakit', 'RSID', $jdwl['RuangID'], 'Nama');
    $TM = FormatTanggal($jdwl['TglMulai']);
    $TS = FormatTanggal($jdwl['TglSelesai']);
    $bia = number_format($jdwl['Harga']);
    $byr = number_format($krs['Bayar']);
    $sisa = $jdwl['Harga'] - $krs['Bayar'];
    $ss = number_format($sisa);
    echo "<p><table class=box>\r\n  <tr><td class=inp>Matakuliah</td>\r\n    <td class=ul colspan=3>{$krs['MKKode']} - <b>{$mk['Nama']}</b> ({$mk['Singkatan']})</td>\r\n    <td class=inp>SKS</td>\r\n    <td class=ul>{$mk['SKS']}</td>\r\n  </tr>\r\n  <tr><td class=inp>Rumah Sakit</td>\r\n    <td class=ul>{$jdwl['RuangID']} - <b>{$RS}</b></td>\r\n    <td class=inp>Dari</td>\r\n    <td class=ul>{$TM}</td>\r\n    <td class=inp>Sampai</td>\r\n    <td class=ul>{$TS}</td></tr>\r\n  <tr><td class=inp>Biaya</td>\r\n    <td class=ul>{$bia}</td>\r\n    <td class=inp>Dibayar</td>\r\n    <td class=ul>{$byr}</td>\r\n    <td class=inp>Kekurangan</td>\r\n    <td class=ul><b>{$ss}</b></td>\r\n    </tr>\r\n  <tr><td colspan=3><input type=button name='Kembali' value='Kembali' onClick=\"location='?mnux={$mnux}'\"></td></tr>\r\n  </table></p>";
}
function fnKonfirmasi($jid)
{
    TampilkanJudul("Jadwalkan {$_SESSION['_jdwlU']}");
    $w = GetFields('jadwal', 'JadwalID', $jid, '*');
    $d = GetFields('dosen', "Login = '******'DosenID']}' and KodeID", KodeID, "Nama, Gelar");
    $tgl = FormatTanggal($_SESSION['_jdwlTgl']);
    echo <<<ESD
  <table class=box width=100%>
  <form name='frmUJIAN' action='../{$_SESSION['mnux']}.edit.php' method=POST>
  <input type=hidden name='jid' value='{$jid}' />
  <input type=hidden name='gos' value='fnSimpan' />
  <input type=hidden name='_jdwlRuang' value='{$_SESSION['_jdwlRuang']}' />
  <input type=hidden name='_jdwlTgl' value='{$_SESSION['_jdwlTgl']}' />
  <input type=hidden name='_jdwlU' value='{$_SESSION['_jdwlU']}' />
  
  <tr><td class=inp>Kode:</td>
      <td class=ul>{$w['MKKode']}&nbsp;</td>
      <td class=inp>Matakuliah:</td>
      <td class=ul>{$w['Nama']}&nbsp;</td>
      </tr>
  <tr><td class=inp>SKS:</td>
      <td class=ul>{$w['SKS']} <sup>sks</sup></td>
      <td class=inp>Kelas:</td>
      <td class=ul>{$w['NamaKelas']}&nbsp;</td>
      </tr>
  <tr><td class=inp>Prodi:</td>
      <td class=ul>{$w['ProdiID']} <sup>{$w['ProgramID']}</sup></td>
      <td class=inp>Dosen:</td>
      <td class=ul>{$d['Nama']} <sup>{$d['Gelar']}</sup></td>
      </tr>
  
  <tr><th class=ttl colspan=4>Dijadwalkan Di:</th></tr>
  <tr><td class=inp>Tanggal:</td>
      <td class=ul>{$tgl}</td>
      <td class=inp>Ruang:</td>
      <td class=ul>{$_SESSION['_jdwlRuang']}&nbsp;</td>
      </tr>
  <tr><td class=inp>Jam Mulai:</td>
      <td class=ul><input type=text name='JamMulai' size=5 maxlength=5 /></td>
      <td class=inp>Selesai:</td>
      <td class=ul><input type=text name='JamSelesai' size=5 maxlength=5 /></td>
      </tr>
  <tr><td class=ul colspan=4 align=center>
      <input type=submit name='btnSimpan' value='Jadwalkan' />
      <input type=button name='btnTutup' value='Tutup' 
        onClick="window.close()" />
      </td></tr>
  </form>
  </table>
ESD;
}
function TampilkanDeposit()
{
    global $_lf;
    $mxb = 55;
    $mxc = 112;
    $grs = str_pad('-', $mxc, '-') . $_lf;
    $DariTanggal = FormatTanggal($_SESSION['DTGL']);
    $SampaiTanggal = FormatTanggal($_SESSION['STGL']);
    $hdr = str_pad("Daftar Deposit Mahasiswa", $mxc, ' ', STR_PAD_BOTH) . $_lf . str_pad("Periode: {$DariTanggal} sampai {$SampaiTanggal}", $mxc, ' ', STR_PAD_BOTH) . $_lf . $grs . str_pad('No.', 5) . str_pad('Tanggal', 12) . str_pad('N.P.M', 15) . str_pad('Nama Mahasiswa', 30) . str_pad('Jumlah', 15, ' ', STR_PAD_LEFT) . str_pad('Dipakai', 15, ' ', STR_PAD_LEFT) . str_pad('Sisa', 15, ' ', STR_PAD_LEFT) . $_lf . $grs;
    // Query
    $s = "select dm.DepositMhswID, dm.Tanggal, dm.MhswID,\r\n    dm.Jumlah, dm.Dipakai, (dm.Jumlah - dm.Dipakai) as Sisa, dm.Tutup,\r\n    LEFT(m.Nama, 29) as Nama, m.ProdiID\r\n    from depositmhsw dm\r\n      left outer join mhsw m on dm.MhswID=m.MhswID\r\n    where '{$_SESSION['DTGL']}' <= dm.Tanggal and dm.Tanggal <= '{$_SESSION['STGL']}'\r\n    order by dm.Tanggal";
    $r = _query($s);
    $n = 0;
    $b = 0;
    $nmf = HOME_FOLDER . DS . "tmp/{$_SESSION['_Login']}.dwoprn";
    $f = fopen($nmf, 'w');
    fwrite($f, $hdr);
    $_Jumlah = 0;
    $_Dipakai = 0;
    $_Sisa = 0;
    while ($w = _fetch_array($r)) {
        $n++;
        $b++;
        if ($b >= $mxb) {
            $mxb = 0;
            fwrite($f, $grs . chr(12));
            fwrite($f, $hdr);
        }
        $TGL = FormatTanggal($w['Tanggal']);
        // Jumlahkan
        $_Jumlah += $w['Jumlah'];
        $_Dipakai += $w['Dipakai'];
        $_Sisa += $w['Sisa'];
        // Format tampilan
        $Jumlah = number_format($w['Jumlah']);
        $Dipakai = number_format($w['Dipakai']);
        $Sisa = number_format($w['Sisa']);
        $Tutup = $w['Sisa'] == 0 ? chr(215) : '';
        fwrite($f, str_pad($n, 5) . str_pad($TGL, 12) . str_pad($w['MhswID'], 15) . str_pad($w['Nama'], 30) . str_pad($Jumlah, 15, ' ', STR_PAD_LEFT) . str_pad($Dipakai, 15, ' ', STR_PAD_LEFT) . str_pad($Sisa, 15, ' ', STR_PAD_LEFT) . str_pad($Tutup, 4, ' ', STR_PAD_LEFT) . $_lf);
    }
    $__Jumlah = number_format($_Jumlah);
    $__Dipakai = number_format($_Dipakai);
    $__Sisa = number_format($_Sisa);
    fwrite($f, $grs);
    fwrite($f, str_pad("Jumlah : ", 62, ' ', STR_PAD_LEFT) . str_pad($__Jumlah, 15, ' ', STR_PAD_LEFT) . str_pad($__Dipakai, 15, ' ', STR_PAD_LEFT) . str_pad($__Sisa, 15, ' ', STR_PAD_LEFT) . $_lf);
    fclose($f);
    TampilkanFileDWOPRN($nmf, 'klinik.lap');
}
function BuatIsinya($TahunID, $ProdiID, $p)
{
    $s = "select b2.*, bn.Singkatan, bn.Urutan, b.Tanggal\r\n    from bayarmhsw2 b2\r\n      left outer join bayarmhsw b on b2.BayarMhswID = b.BayarMhswID\r\n      left outer join bipotnama bn on b2.BIPOTNamaID = bn.BIPOTNamaID\r\n    where b.KodeID = '" . KodeID . "'\r\n      and b.TahunID = '{$TahunID}'\r\n      and '{$_SESSION['TglMulai']}' <= b.Tanggal\r\n      and b.Tanggal <= '{$_SESSION['TglSelesai']}'\r\n      and b.NA = 'N'\r\n      and b2.NA = 'N'\r\n    order by bn.Urutan";
    $r = _query($s);
    $arrNama = array();
    $arrTGL = array();
    $arrJML = array();
    $arrTTL = array();
    while ($w = _fetch_array($r)) {
        if (array_search($w['Singkatan'], $arrNama) === false) {
            $arrNama[] = $w['Singkatan'];
        }
        if (array_search($w['Tanggal'], $arrTGL) === false) {
            $arrTGL[] = $w['Tanggal'];
        }
        $arrJML[$w['Tanggal']][$w['Singkatan']] += $w['Jumlah'];
        $arrTTL[$w['Singkatan']] += $w['Jumlah'];
    }
    // Tampilkan
    $t = 4;
    $lbr0 = 18;
    $lbr = 20;
    $p->SetFont('Helvetica', 'B', 8);
    $p->Cell($lbr0, $t, 'Tanggal', 1, 0);
    foreach ($arrNama as $Nama) {
        $p->Cell($lbr, $t, $Nama, 1, 0, 'C');
    }
    $p->Ln($t);
    // Data
    $p->SetFont('Helvetica', '', 8);
    foreach ($arrTGL as $tgl) {
        $_tgl = FormatTanggal($tgl);
        $p->Cell($lbr0, $t, $_tgl, 1, 0);
        foreach ($arrNama as $nama) {
            $jml = number_format($arrJML[$tgl][$nama]);
            $p->Cell($lbr, $t, $jml, 1, 0, 'R');
        }
        $p->Ln($t);
    }
    $p->Ln(2);
    // Tampilkan Total
    $p->Cell($lbr0, $t, 'Total:', 1, 0, 'R');
    foreach ($arrNama as $nama) {
        $jml = number_format($arrTTL[$nama]);
        $p->Cell($lbr, $t, $jml, 1, 0, 'R');
    }
    $p->Ln($t);
}
示例#16
0
function AlumniKrjDaftar($a)
{
    echo "<p>Berikut adalah riwayat pekerjaan alumni:</p>";
    $s = "select ak.*\r\n    from alumnikerja ak\r\n    where ak.MhswID='{$a['MhswID']}'\r\n    order by ak.MulaiKerja desc";
    $r = _query($s);
    $n = 0;
    echo "<p><a href='?mnux=alumni.det&alumnisub=AlumniKrj&gos=AlumniKrjEdt&AlumniID={$a['MhswID']}&md=1'>Pekerjaan Baru</a></p>";
    echo "<p><table class=box>\r\n    <tr><th class=ttl>#</th>\r\n    <th class=ttl>Perusahaan</th>\r\n    <th class=ttl>Pekerjaan/Jabatan</th>\r\n    <th class=ttl>Masa Kerja</th>\r\n    <th class=ttl>Telepon</th>\r\n    <th class=ttl>Fax</th>\r\n    <th class=ttl>Website</th>\r\n    <th class=ttl>Status</th>\r\n    </tr>";
    while ($w = _fetch_array($r)) {
        $n++;
        $MK = FormatTanggal($w['MulaiKerja']);
        $KK = $w['NA'] == 'Y' ? '- ' . FormatTanggal($w['KeluarKerja']) : '';
        echo "<tr><td class=inp nowrap>{$n}\r\n      <a href='?mnux=alumni.det&alumnisub=AlumniKrj&gos=AlumniKrjEdt&AlumniID={$a['MhswID']}&md=0&AlumniKerjaID={$w['AlumniKerjaID']}'><img src='img/edit.png'></a></td>\r\n    <td class=ul>{$w['Nama']}</td>\r\n    <td class=ul>{$w['Jabatan']}</td>\r\n    <td class=ul>{$MK} {$KK}</td>\r\n    <td class=ul>{$w['Telepon']} &nbsp;</td>\r\n    <td class=ul>{$w['Facsimile']} &nbsp;</td>\r\n    <td class=ul>{$w['Website']}</td>\r\n    <td class=ul align=center><img src='img/book{$w['NA']}.gif'></td>\r\n    </tr>";
    }
    echo "</table></p>";
}
示例#17
0
function TampilkanDetailHistory($mhsw)
{
    global $urutanklinik;
    TampilkanPilihanUrutanKlinik();
    $_u = explode('~', $urutanklinik[$_SESSION['_urutanklinik']]);
    $_key = $_u[1];
    $s = "select k.*, mk.Nama, j.RuangID, j.TglMulai, j.TglSelesai\r\n    from krs k\r\n      left outer join mk on k.MKID=mk.MKID\r\n      left outer join jadwal j on k.JadwalID=j.JadwalID\r\n    where MhswID='{$mhsw['MhswID']}'\r\n    order by {$_key}";
    $r = _query($s);
    $n = 0;
    echo "<p><table class=box cellspacing=1>\r\n    <tr><th class=ttl>No</th>\r\n    <th class=ttl>Kode</th>\r\n    <th class=ttl>Matakuliah</th>\r\n    <th class=ttl>Rumah<br />Sakit</th>\r\n    <th class=ttl>Periode</th>\r\n    <th class=ttl>Grade</th>\r\n    <th class=ttl>Bobot</th>\r\n    </tr>";
    while ($w = _fetch_array($r)) {
        $n++;
        $TM = FormatTanggal($w['TglMulai']);
        $TS = FormatTanggal($w['TglSelesai']);
        echo "<tr><td class=inp>{$n}</td>\r\n    <td class=ul>{$w['MKKode']}</td>\r\n    <td class=ul>{$w['Nama']}</td>\r\n    <td class=ul>{$w['RuangID']}</td>\r\n    <td class=ul>{$TM}~{$TS}</td>\r\n    <td class=ul align=center>{$w['GradeNilai']}</td>\r\n    <td class=ul align=right>{$w['BobotNilai']}</td>\r\n    </tr>";
    }
    echo "</table></p>";
}
示例#18
0
function TampilkanHutangMhsw1($mhsw)
{
    TampilkanHeaderMhswKlinik($mhsw);
    echo "<p><a href='?mnux=klinik.hutang&gos=HTGEDT&md=1&MhswID={$mhsw['MhswID']}'>Tambah Hutang Mahasiswa</a></p>";
    // Ambil data
    $s = "select *\r\n    from hutangmhsw hm\r\n    where hm.MhswID='{$mhsw['MhswID']}'\r\n    order by hm.Tanggal";
    $r = _query($s);
    echo "<p><table class=box cellspacing=1 cellpadding=4>\r\n    <tr><th class=ttl colspan=2>#</th>\r\n    <th class=ttl>Tanggal</th>\r\n    <th class=ttl>Jumlah</th>\r\n    <th class=ttl>Dibayar</th>\r\n    <th class=ttl>Catatan</th>\r\n    </tr>";
    $n = 0;
    while ($w = _fetch_array($r)) {
        $n++;
        $c = $w['NA'] == 'Y' ? 'class=nac' : 'class=ul';
        $tgl = FormatTanggal($w['Tanggal']);
        $jml = number_format($w['Jumlah']);
        $byr = number_format($w['Dibayar']);
        echo "<tr>\r\n      <td class=inp>{$n}</td>\r\n      <td class=ul><a href='?mnux={$_SESSION['mnux']}&gos=HTGEDT&md=0&HTGID={$w['HutangMhswID']}'><img src='img/edit.png'></a></td>\r\n      <td {$c}>{$tgl}</td>\r\n      <td {$c} align=right>{$jml}</td>\r\n      <td {$c} align=right>{$byr}</td>\r\n      <td {$c}>{$w['Catatan']}</td>\r\n      </tr>";
    }
    echo "</table></p>";
}
示例#19
0
function CetakDaftarBPM()
{
    if (empty($_SESSION['tahun'])) {
        die(ErrorMsg("Tahun Akademik Kosong", "Tentukan Tahun Akademik terlebih dahulu untuk melihat laporan."));
    }
    $s = "select bm.*, m.Nama\r\n    from bayarmhsw bm\r\n      left outer join mhsw m on bm.MhswID=m.MhswID\r\n    where m.ProdiID='11'\r\n      and bm.TahunID='{$_SESSION['tahun']}'\r\n      and (bm.Jumlah + bm.JumlahLain) > 0\r\n    order by bm.BayarMhswID";
    $r = _query($s);
    $n = 0;
    echo "<p><table class=box cellspacing=1 cellpadding=4>";
    echo "<tr><th class=ttl>#</th>\r\n    <th class=ttl>No. BPM</th>\r\n    <th class=ttl>Tanggal</th>\r\n    <th class=ttl>Keterangan</th>\r\n    <th class=ttl>N.P.M</th>\r\n    <th class=ttl>Nama Mahasiswa</th>\r\n    <th class=ttl>Jumlah</th>\r\n    <th class=ttl>Lain2</th>\r\n    </tr>";
    while ($w = _fetch_array($r)) {
        $n++;
        $tgl = FormatTanggal($w['Tanggal']);
        $jml = number_format($w['Jumlah']);
        $jml2 = number_format($w['JumlahLain']);
        $c = $w['Proses'] == 1 ? "class=ul" : "class=nac";
        $c = $jml + $jml2 > 0 ? $c : "class=nac";
        echo "<tr>\r\n      <td class=inp>{$n}</td>\r\n      <td {$c}>{$w['BayarMhswID']}</td>\r\n      <td {$c}>{$tgl}</td>\r\n      <td {$c}>{$w['Keterangan']}</td>\r\n      <td {$c}>{$w['MhswID']}</td>\r\n      <td {$c}>{$w['Nama']}</td>\r\n      <td {$c} align=right>{$jml}</td>\r\n      <td {$c} align=right>{$jml2}</td>\r\n    </tr>";
    }
    echo "</table></p>";
}
function CetakKuliahKlinik()
{
    $s = "select j.*\r\n    from jadwal j\r\n    where INSTR(j.ProdiID, '.11.')>0\r\n      and j.NamaKelas = 'KLINIK'\r\n    order by RuangID, TglMulai, JenisJadwalID, NamaKelas";
    $r = _query($s);
    $n = 0;
    $rg = 'qwertyuiop';
    echo "<p><table class=box cellspacing=1>";
    $hdr = "<tr><th class=ttl>#</th>\r\n    <th class=ttl>Kode</th>\r\n    <th class=ttl>Matakuliah</th>\r\n    <th class=ttl>Jenis</th>\r\n    <th class=ttl>Kelas</th>\r\n    <th class=ttl>Mulai</th>\r\n    <th class=ttl>Selesai</th>\r\n    <th class=ttl>Jml Mhsw</th>\r\n    </tr>";
    while ($w = _fetch_array($r)) {
        $n++;
        if ($rg != $w['RuangID']) {
            $rg = $w['RuangID'];
            echo "<tr><td class=ul colspan=5><font size=+1>{$w['RuangID']}</font></td></tr>";
            echo $hdr;
        }
        $TM = FormatTanggal($w['TglMulai']);
        $TS = FormatTanggal($w['TglSelesai']);
        $jml = number_format($w['JumlahMhsw']);
        echo "<tr>\r\n      <td class=inp>{$n}</td>\r\n      <td class=ul>{$w['MKKode']}</td>\r\n      <td class=ul>{$w['Nama']}</td>\r\n      <td class=ul>{$w['JenisJadwalID']}</td>\r\n      <td class=ul>{$w['NamaKelas']}</td>\r\n      <td class=ul>{$TM}</td>\r\n      <td class=ul>{$TS}</td>\r\n      <td class=ul align=right>{$jml}</td>\r\n    </tr>";
    }
    echo "</table></p>";
}
示例#21
0
function TampilkanBPM()
{
    $ada = GetFields('bayarmhsw', 'BayarMhswID', $_SESSION['bpmid'], '*');
    if (!empty($ada)) {
        // Tampilkan header
        $EditBPM = '';
        $mhsw = GetFields('mhsw', 'MhswID', $ada['MhswID'], '*');
        $khsid = GetaField('khs', "MhswID='{$ada['MhswID']}' and TahunID", $ada['TahunID'], 'KHSID');
        if (strpos('.1.60.70.', ".{$_SESSION['_LevelID']}.") === false) {
            $strOps = '';
        } else {
            $EditBPM = "<input type=button name='Edit' value='Edit BPM' onClick=\"location='?mnux=bpm.edt&bpmid={$_SESSION['bpmid']}&bck=bpm.inq&bckgos='\">";
            $KeuMhsw = "<input type=button name='Keu' value='Keuangan Mhsw' onClick=\"location='?mnux=mhswkeu.det&gos=MhswKeuSesi&mhswid={$ada['MhswID']}&khsid={$khsid}'\">";
            $strOps = "<tr><td class=inp>Pilihan</td><td class=ul colspan=5>{$EditBPM} {$KeuMhsw}</td></tr>";
            //http://localhost/?mnux=mhswkeu.det&gos=MhswKeuSesi&mhswid=222004001&khsid=85520
        }
        $auto = $ada['Autodebet'] > 0 ? 'Y' : 'N';
        $pros = $ada['Proses'] > 0 ? 'Y' : 'N';
        $jml = $ada['Proses'] > 0 ? number_format($ada['Jumlah']) : 0;
        $jmllain = $ada['Proses'] > 0 ? number_format($ada['JumlahLain']) : 0;
        $TanggalBuat = FormatTanggal($ada['TanggalBuat']);
        $TanggalBayar = FormatTanggal($ada['Tanggal']);
        $TanggalEntry = FormatTanggal($ada['TanggalEdit']);
        echo "<p><table class=box cellspacing=1 cellpadding=1>\r\n    <tr><td class=inp>No BPM :</td>\r\n      <td class=ul>{$ada['BayarMhswID']}</td>\r\n      <td class=inp>Bank - Bukti Setoran :</td>\r\n      <td class=ul>{$ada['Bank']} - {$ada['BuktiSetoran']}</td>\r\n      <td class=inp>Tanggal Cetak BPM :</td>\r\n      <td class=ul>{$TanggalBuat}</td></tr>\r\n    <tr><td class=inp>Rekening :</td>\r\n      <td class=ul>{$ada['RekeningID']}</td>\r\n      <td class=inp>Tahun Akd :</td>\r\n      <td class=ul>{$ada['TahunID']}</td>\r\n      <td class=inp>Tanggal Bayar ke Bank :</td>\r\n      <td class=ul>{$TanggalBayar}</td></tr>\r\n    <tr><td class=inp>N.P.M :</td>\r\n      <td class=ul>{$ada['MhswID']}</td>\r\n      <td class=inp>Nama Mahasiswa :</td>\r\n      <td class=ul>{$mhsw['Nama']}</td>\r\n      <td class=inp>Tanggal Entry :</td>\r\n      <td class=ul>{$TanggalEntry}</td></tr>\r\n    <tr><td class=inp>Autodebet?</td>\r\n      <td class=ul><img src='img/{$auto}.gif'></td>\r\n      <td class=inp>Sudah diproses?</td>\r\n      <td class=ul colspan=3><img src='img/{$pros}.gif'></td></tr>\r\n    <tr><td class=inp>Jumlah</td>\r\n      <td class=ul><font size=+1>{$jml}</font></td>\r\n      <td class=inp>Jumlah Lain</td>\r\n      <td class=ul colspan=3><font size=+1>{$jmllain}</font></td></tr>\r\n    {$strOps}\r\n    </table></p>";
        // Tampilkan detail pembayaran
        echo "<p>Berikut adalah detail pembayaran BPM ini:</p>\r\n    <p><table class=box cellspacing=1 cellpadding=4>\r\n    <tr><th class=ttl>#</th>\r\n      <th class=ttl>Keterangan</th>\r\n      <th class=ttl>Dibayarkan</th></tr>";
        $s = "select bm2.*, bn.Nama\r\n      from bayarmhsw2 bm2\r\n        left outer join bipotmhsw bm on bm.BIPOTMhswID=bm2.BIPOTMhswID\r\n        left outer join bipotnama bn on bm.BIPOTNamaID=bn.BIPOTNamaID\r\n      where bm2.BayarMhswID='{$_SESSION['bpmid']}'\r\n      order by bn.Urutan";
        $r = _query($s);
        $n = 0;
        while ($w = _fetch_array($r)) {
            $n++;
            $jml = number_format($w['Jumlah']);
            echo "<tr><td class=inp>{$n}</td>\r\n      <td class=ul>{$w['Nama']}</td>\r\n      <td class=ul align=right>{$jml}</td>\r\n      </tr>";
        }
        echo "</table></p>";
    } else {
        echo ErrorMsg('BPM Tidak Ditemukan', "BPM dengan no: <font size=+1>{$_SESSION['bpmid']}</font> tidak ditemukan.");
    }
}
示例#22
0
function BPMMhswLulus($mhsw)
{
    // tampilkan menu
    echo "<p><a href='?mnux=bpmlulus&gos=BPMLulusAdd'>Tambahkan BPM</a></p>";
    // tampilkan BPM lama
    $s = "select *\r\n    from bayarmhsw bm\r\n    where MhswID='{$_SESSION['mhswid']}'\r\n    order by TahunID desc";
    $r = _query($s);
    $n = 0;
    echo "<p><table class=box cellspacing=1 cellpadding=4>\r\n    <tr><th class=ttl>#</th>\r\n    <th class=ttl>No. BPM</th>\r\n    <th class=ttl>No. Rekening</th>\r\n    <th class=ttl>Tanggal</th>\r\n    <th class=ttl>Jumlah</th>\r\n    <th class=ttl>Jumlah Lain</th>\r\n    <th class=ttl>Cetak BPM</th>\r\n    <th class=ttl>Status</th>\r\n\t\t<th class=ttl>Edit</th>\r\n    </tr>";
    while ($w = _fetch_array($r)) {
        $n++;
        $c = $w['Proses'] == 0 ? "class=ul" : "class=nac";
        $st = $w['Proses'] == 0 ? "<a href='?mnux=bpmlulus&gos=BPMLulusPrc&BPMID={$w['BayarMhswID']}'><img src='img/N.gif' title='Belum Diproses'></a>" : "<img src='img/Y.gif' title='Sudah Diproses'>";
        $ctk = $w['Proses'] == 0 ? "<a href='cetak/bpmlulus.cetak.php?BPMID={$w['BayarMhswID']}' target=_blank><img src='img/printer.gif'></a>" : "&nbsp;";
        $edt = $w['Proses'] == 0 ? "&nbsp;" : "<a href='?mnux=bpmlulus&gos=BPMLulusEdt&BPMID={$w['BayarMhswID']}'><img src='img/edit.png' title='Edit BPM'></a>";
        $Jumlah = number_format($w['Jumlah']);
        $JumlahLain = number_format($w['JumlahLain']);
        $tgl = FormatTanggal($w['Tanggal']);
        echo "<tr>\r\n      <td {$c}>{$n}</td>\r\n      <td {$c}>{$w['BayarMhswID']}</td>\r\n      <td {$c}>{$w['RekeningID']}</td>\r\n      <td {$c}>{$tgl}</td>\r\n      <td {$c} align=right>{$Jumlah}</td>\r\n      <td {$c} align=right>{$JumlahLain}</td>\r\n      <td {$c} align=center>{$ctk}</td>\r\n      <td {$c} align=center>{$st}</td>\r\n\t\t\t<td {$c} align=center>{$edt}</td>\r\n      </tr>";
    }
    echo "</table>";
}
示例#23
0
function HeaderKRSMhsw($mhsw, $datatahun, $khs)
{
    global $_LevelPaketKRS, $_LevelMundurKRS;
    $KRSMulai = FormatTanggal($datatahun['TglKRSMulai']);
    $KRSSelesai = FormatTanggal($datatahun['TglKRSSelesai']);
    $UbahKRSMulai = FormatTanggal($datatahun['TglUbahKRSMulai']);
    $UbahKRSSelesai = FormatTanggal($datatahun['TglUbahKRSSelesai']);
    $Cuti = FormatTanggal($datatahun['TglCuti']);
    $Mundur = FormatTanggal($datatahun['TglMundur']);
    $KuliahMulai = FormatTanggal($datatahun['TglKuliahMulai']);
    $KuliahSelesai = FormatTanggal($datatahun['TglKuliahSelesai']);
    $BayarMulai = FormatTanggal($datatahun['TglBayarMulai']);
    $BayarSelesai = FormatTanggal($datatahun['TglBayarSelesai']);
    $PA = GetaField('dosen', "Login", $mhsw['PenasehatAkademik'], "concat(Nama, ', ', Gelar)");
    // Dapat mengakses Paket KRS?
    if (strpos($_LevelPaketKRS, '.' . $_SESSION['_LevelID'] . '.') === false) {
        $btn = '';
        $bnt1 = '';
    } else {
        $btn = "<input type=button name='Paket' value='Paket KRS' onClick=\"location='?mnux=krs&gos=PaketKRS'\">";
        $btn1 = "<input type=button name='Cetak' value='Cetak KRS' onClick=\"location='cetak/krs.cetak.php?khsid={$khs['KHSID']}&prn=1'\">";
    }
    //if ($datatahun['TglKRSSelesai'] < date("Y-m-d")) {
    //''if ($_SESSION['_LevelID'] != 1) {
    //''$btn1 ='';
    /*} else*/
    //$btn1 = "<input type=button name='Cetak' value='Cetak KRS' onClick=\"location='krs.cetak.php?khsid=$khs[KHSID]&prn=1'\">";
    //}
    if ($datatahun['TglKRSMulai'] <= date('Y-m-d') && date('Y-m-d') <= $datatahun['TglKRSSelesai'] || $datatahun['TglUbahKRSMulai'] <= date('Y-m-d') && date('Y-m-d') <= $datatahun['TglUbahKRSSelesai'] || ($datatahun['TglKRSOnlineMulai'] <= date('Y-m-d') && date('Y-m-d') <= $datatahun['TglKRSOnlineSelesai'] || $_SESSION['_LevelID'] == 41) || $_SESSION['_LevelID'] == 1) {
        $btn1 = "<input type=button name='Cetak' value='Cetak KRS' onClick=\"location='cetak/krs.cetak.php?khsid={$khs['KHSID']}&prn=1'\">";
    } else {
        $btn1 = '';
    }
    $SesiLalu = $khs['Sesi'] <= 1 ? 1 : $khs['Sesi'] - 1;
    $khslalu = GetFields('khs', "MhswID='{$mhsw['MhswID']}' and Sesi", $SesiLalu, "*");
    $ipslalu = number_format($khslalu['IPS'], 2);
    echo "<p><table class=box cellspacing=1 cellpadding=4>\r\n  <tr><td class=inp2><b>Mhsw</b></td>\r\n    <td class=inp>NPM</td><td class=ul>{$mhsw['MhswID']}</td>\r\n    <td class=inp>Nama</td><td class=ul>{$mhsw['Nama']}</td>\r\n    <td class=inp>Program</td><td class=ul>{$mhsw['PRG']} ({$mhsw['ProgramID']})</td>\r\n    <td class=inp>Prodi</td><td class=ul>{$mhsw['PRD']} ({$mhsw['ProdiID']})</td>\r\n  </tr>\r\n  <tr><td class=inp2><b>Sesi</b></td>\r\n    <td class=inp>Tahun Akd</td><td class=ul>{$khs['TahunID']} Smt: {$khs['Sesi']}</td>\r\n    <td class=inp>Status</td><td class=ul>{$khs['SM']} ({$khs['StatusMhswID']})</td>\r\n    <td class=inp>Tot SKS</td><td class=ul>{$khs['TotalSKS']} <abbr title='dari maksimal'>dr</abbr> {$khs['MaxSKS']} SKS, {$khs['JumlahMK']} MK</td>\r\n    <td class=inp>IPS Lalu</td><td class=ul>{$ipslalu}, IPK: {$mhsw['IPK']}</td>\r\n  </tr>\r\n  <tr><td class=inp2><b>Batas</b></td>\r\n    <td class=inp>Isi KRS</td><td class=ul>{$KRSMulai}~{$KRSSelesai}</td>\r\n    <td class=inp>Ubah KRS</td><td class=ul>{$UbahKRSMulai}~{$UbahKRSSelesai}</td>\r\n    <td class=inp>Pengajuan Cuti & Mundur</td><td class=ul>{$Cuti} & {$Mundur}</td>\r\n    <td class=inp>Kuliah</td><td class=ul>{$KuliahMulai}~{$KuliahSelesai}</td></tr>\r\n  </tr>\r\n  <tr><td class=inp2><b>Pilihan</b></td>\r\n    <td class=ul colspan=2 nowrap>\r\n    {$btn} {$btn1}\r\n    <input type=button name='Kembali' value='Kembali' onClick=\"location='?mnux=krs'\">\r\n    </td>\r\n    <td class=inp>Batas Studi</td><td class=ul>{$mhsw['BatasStudi']}&nbsp;</td>\r\n    <td class=inp>Pembayaran</td><td class=ul>{$BayarMulai}~{$BayarSelesai}</td>\r\n    <td class=inp>Penasehat</td><td class=ul>{$PA}&nbsp;</td>\r\n    </tr>\r\n  </table>";
}
function TuliskanDataUtama($mhsw, $khs, &$arr)
{
    $mrg = str_pad(' ', 15);
    $TGL = FormatTanggal($mhsw['TanggalLahir']);
    $SKRG = date('d-m-Y');
    $thn = GetFields("tahun", "ProgramID='{$mhsw['ProgramID']}' and ProdiID='{$mhsw['ProdiID']}' and TahunID", $khs['TahunID'], "Nama, date_format(TglAkhirKSS, '%d-%m-%Y') as TNIL");
    $rek = GetaField('pejabat', 'JabatanID', 'REKTOR', 'Nama');
    $pa = GetaField('dosen d', "d.Login", $mhsw['PenasehatAkademik'], "concat(d.Nama, ', ', d.Gelar)");
    $Alamat = empty($mhsw['Alamat']) ? $mhsw['AlamatAsal'] : $mhsw['Alamat'];
    $Kota = empty($mhsw['Kota']) ? $mhsw['KotaAsal'] : $mhsw['Kota'];
    if (strlen($Alamat) > 45) {
        $needle = ' ';
        $piece = $pos = strripos($Alamat, $needle);
        $Alamat1 = substr($Alamat, 0, $piece);
        $Alamat2 = strstr($Alamat, substr($Alamat, $piece, $piece));
        $Alamat2 = str_pad($Alamat2, 25);
    } else {
        $Alamat1 = $Alamat;
        $Alamat2 = '';
    }
    $Alamat1 = str_replace(chr(13), ' ', $Alamat1);
    $Alamat1 = str_replace(chr(10), '', $Alamat1);
    $arr[0] .= $mrg . str_pad($thn['Nama'], 59);
    $arr[1] .= $mrg . str_pad($mhsw['MhswID'], 59);
    $arr[2] .= $mrg . str_pad($mhsw['Nama'], 59);
    $arr[3] .= $mrg . str_pad($mhsw['TempatLahir'] . ', ' . $TGL, 59);
    $arr[4] .= $mrg . str_pad($Alamat1, 59);
    //$arr[5] .= $mrg . str_pad($Alamat2, 59);
    $arr[5] .= $mrg . str_pad($Kota . ' ' . $mhsw['KodePos'], 59);
    $arr[6] .= $mrg . str_pad($mhsw['FAK'] . '/ ' . $mhsw['PRD'], 59);
    $arr[7] .= $mrg . str_pad($pa, 59);
    $arr[8] .= $mrg . str_pad(' ', 30) . str_pad($SKRG, 29);
    $arr[9] .= str_pad(' ', 74);
    $arr[10] .= str_pad('   ' . $thn['TNIL'], 74);
    $arr[11] .= str_pad(' ', 74);
    $arr[12] .= str_pad(' ', 74);
    $arr[13] .= str_pad($rek, 65, ' ', STR_PAD_LEFT);
}
function CetakNilaiKlinik()
{
    include "sisfokampus.php";
    HeaderSisfoKampus();
    $JadwalID = $_REQUEST['JadwalID'];
    $jdwl = GetFields("jadwal j\r\n    left outer join rumahsakit rs on j.RuangID=rs.RSID", "JadwalID", $JadwalID, "j.*, rs.Nama as NamaRS");
    // tampilkan header
    echo "<p><center><font size=+1>Daftar Nilai Matakuliah Klinik</font><br />\r\n    <font size=+2>{$jdwl['Nama']} ({$jdwl['MKKode']})</font></center></p>";
    $TM = FormatTanggal($jdwl['TglMulai']);
    $TS = FormatTanggal($jdwl['TglSelesai']);
    echo "<p><center>Rumah Sakit: <font size=+1>{$jdwl['NamaRS']}</font><br />\r\n    Periode: <font size=+1>{$TM} ~ {$TS}</font></center></p>";
    $s = "select k.KRSID, k.MhswID, m.Nama, k.GradeNilai, k.BobotNilai\r\n    from krs k\r\n      left outer join mhsw m on k.MhswID=m.MhswID\r\n    where k.JadwalID='{$JadwalID}'\r\n    order by k.MhswID";
    $r = _query($s);
    $n = 0;
    echo "<p align=center><table class=box cellspacing=1>\r\n    <tr><th class=ttl>No</th>\r\n    <th class=ttl>N P M</th>\r\n    <th class=ttl>Nama Mahasiswa</th>\r\n    <th class=ttl>Grade<br />Nilai</th>\r\n    <th class=ttl>Bobot<br />Nilai</th>\r\n    </tr>";
    while ($w = _fetch_array($r)) {
        $n++;
        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 align=center>{$w['GradeNilai']}</td>\r\n    <td class=ul align=right>{$w['BobotNilai']}</td>\r\n    </tr>";
    }
    echo "</table></p>";
    echo "<p align=center>Total Mahasiswa: <font size=+1>{$n}</font></p>";
    echo "<script>window.print()</script>";
}
示例#26
0
文件: ta.php 项目: johnxth/sisfoapp
function DftrTA($mhsw)
{
    // Tampilkan menu tambah
    if ($mhsw['ProdiID'] != '11' && $mhsw['ProdiID'] != '10') {
        echo "<p><a href='?mnux=ta&gos=TAEdt&md=1&crmhswid={$mhsw['MhswID']}'><img src='img/edit.png'>\n      Daftarkan tugas akhir</a></p>";
        $s = "select t.*, concat(d.Nama, ', ', d.Gelar) as DSN\n      from ta t\n        left outer join dosen d on t.Pembimbing=d.Login\n      where t.MhswID='{$mhsw['MhswID']}'\n      order by t.TglMulai desc";
        $r = _query($s);
        $n = 0;
        if (_num_rows($r) > 0) {
            $n++;
            echo "<p><table class=box cellspacing=1 cellpadding=4>\n        <tr><th class=ttl>#</th>\n        <th class=ttl>Tahun</th>\n        <th class=ttl>Waktu</th>\n        <th class=ttl>Judul</th>\n        <th class=ttl colspan=2>Pembimbing</th>\n        <th class=ttl>Batal?</th>\n        <th class=ttl>Ujian</th>\n        <th class=ttl colspan=2>Penguji</th>\n        <th class=ttl title='Cetak Undangan Dosen Penguji'>Und</th>\n        <th class=ttl>Lulus?</th>\n        </tr>";
            while ($w = _fetch_array($r)) {
                // data TA
                $TM = FormatTanggal($w['TglMulai']);
                $TS = FormatTanggal($w['TglSelesai']);
                $c = $w['NA'] == 'Y' ? 'class=nac' : 'class=ul';
                $pemb2 = AmbilPembimbing($w['TAID'], 0);
                // data ujian
                $TU = FormatTanggal($w['TglUjian']);
                $_TU = $TU == '00/00/0000' ? "&nbsp;" : $TU;
                $Penguji = GetaField('dosen', "Login", $w['Penguji'], "concat(Nama, ', ', Gelar)");
                $Penguji = empty($Penguji) ? "&nbsp;" : $Penguji;
                $peng2 = AmbilPembimbing($w['TAID'], 1);
                // Jika batal
                if ($w['NA'] == 'Y') {
                    $lls = "<img src='img/kali.png'>";
                } else {
                    $lls = $w['Lulus'] == 'Y' ? "<img src='img/Y.gif'>" : "<a href='?mnux=ta&gos=TALLS&taid={$w['TAID']}&crmhswid={$mhsw['MhswID']}'><img src='img/{$w['Lulus']}.gif'><br />Nilai</a>";
                }
                echo "<tr><td class=inp rowspan=2>{$n}</td>\n          <td {$c} rowspan=2><a href='?mnux=ta&gos=TAEdt&taid={$w['TAID']}&crmhswid={$mhsw['MhswID']}&md=0'><img src='img/edit.png'>\n            {$w['TahunID']}</a></td>\n          <td {$c} rowspan=2>{$TM} <br /> {$TS}</td>\n          <td {$c} rowspan=2>{$w['Judul']}</td>\n          <td {$c} colspan=2>{$w['DSN']}</td>\n        \n          <td class=ul align=center rowspan=2><img src='img/book{$w['NA']}.gif'></td>\n          <td {$c} rowspan=2><a href='?mnux=ta&gos=TAUjn&taid={$w['TAID']}&crmhswid={$mhsw['MhswID']}'><img src='img/check.gif'> Set Ujian</a><br />\n          {$_TU}</td>\n          <td {$c} colspan=2>{$Penguji}</td>\n          <td class=ul rowspan=2 align=center>\n            <a href='ta.und.php?taid={$w['TAID']}'><img src='img/printer.gif'></a></td>\n          <td {$c} rowspan=2 align=center>{$lls}</td>\n          </tr>\n        \n          <tr>\n          <td class=inp1 title='Edit Pembimbing Pendamping'><a href='?mnux=ta.dsn&taid={$w['TAID']}&tipta=0'><img src='img/edit.png'></a></td>\n          <td {$c} nowrap>{$pemb2}&nbsp;</td>\n          <td class=inp1 title='Edit Penguji Pendamping'><a href='?mnux=ta.dsn&taid={$w['TAID']}&tipta=1'><img src='img/edit.png'></a></td>\n          <td {$c} nowrap>{$peng2}&nbsp;</td>\n          </tr>";
            }
            echo "</table></p>";
        }
    } else {
        CheckMhswFK($mhsw);
    }
}
示例#27
0
function TampilkanHeaderMhsw($thn, $mhsw, $khs)
{
    $KRSMulai = FormatTanggal($thn['TglKRSMulai']);
    $KRSSelesai = FormatTanggal($thn['TglKRSSelesai']);
    $BayarMulai = FormatTanggal($thn['TglBayarMulai']);
    $BayarSelesai = FormatTanggal($thn['TglBayarSelesai']);
    $GelarPA = GetaField('dosen', "KodeID='" . KodeID . "' and Login", $mhsw['PenasehatAkademik'], 'Gelar');
    // batas waktu
    $skrg = date('Y-m-d');
    if ($thn['TglKRSMulai'] <= $skrg && $skrg <= $thn['TglKRSSelesai']) {
        if ($_SESSION['_LevelID'] == 120) {
            $CetakKRS = "<a href='#' onClick=\"alert('Hubungi Staf TU/Adm Akademik untuk mencetak LRS/KRS.')\"><img src='img/printer2.gif' /></a>";
            $CetakLRS = '';
        } else {
            $CetakKRS = "<input type=button name='CetakKRS' value='Cetak KRS' onClick=\"javascript:CetakKRS({$khs['KHSID']})\" />";
            $CetakLRS = "<input type=button name='CetakLRS' value='Cetak LRS' onClick=\"javascript:CetakLRS({$khs['KHSID']})\"/>";
        }
    } else {
        $CetakKRS = '&nbsp;';
        $CetakLRS = '&nbsp;';
    }
    $keu = BuatSummaryKeu($mhsw, $khs);
    echo "<table class=box cellspacing=1 align=center width=800>\r\n  <tr><td class=wrn width=2 rowspan=4></td>\r\n      <td class=inp width=80>Mahasiswa:</td>\r\n      <td class=ul width=200>{$mhsw['Nama']} <sup>({$mhsw['MhswID']})</sup></td>\r\n      <td class=inp width=80>Sesi:</td>\r\n      <td class=ul>{$khs['Sesi']}</td>\r\n      <td class=inp width=80>Status:</td>\r\n      <td class=ul width=100>{$khs['STA']} <sup>({$khs['StatusMhswID']})</sup></td>\r\n      </tr>\r\n  <tr>\r\n      <td class=inp title='Dosen Pembimbing Akademik'>Pemb. Akd:</td>\r\n      <td class=ul>{$mhsw['namaDosen']} <sup>{$GelarPA}</sup>&nbsp;</td>\r\n      <td class=inp>Jml SKS:</td>\r\n      <td class=ul>{$khs['SKS']}<sub title='Maksimum SKS yg boleh diambil'>&minus;{$khs['MaxSKS']}</sub></td>\r\n      <td class=inp>Status Awal:</td>\r\n      <td class=ul>{$mhsw['STAWAL']} <sup>({$mhsw['StatusAwalID']})</sup></td>\r\n      </tr>\r\n  <tr><td class=ul colspan=6>{$keu}</td></tr>\r\n  </table>";
}
示例#28
-1
function DaftarPrestasi($m, $pres = 1)
{
    $s = "select *\r\n    from prestasi\r\n    where MhswID='{$m['MhswID']}' and JenisPrestasi={$pres}\r\n    order by Tanggal desc";
    $r = _query($s);
    $n = 0;
    $hdrSkorsing = $pres == -1 ? "<th class=ttl>Skors?</th>" : '';
    echo "<p><table class=box cellspacing=1 cellpadding=4>\r\n    <tr><th class=ttl colspan=2>#</th>\r\n    <th class=ttl>Tanggal</th>\r\n    <th class=ttl>Judul</th>\r\n    <th class=ttl>Keterangan</th>\r\n    <th class=ttl>Hapus</th>\r\n    {$hdrSkorsing}\r\n    </tr>";
    while ($w = _fetch_array($r)) {
        $n++;
        $c = $w['NA'] == 'Y' ? 'class=nac' : 'class=ul';
        $tgl = FormatTanggal($w['Tanggal']);
        if ($pres == -1) {
            $strSkorsing = "<td class=ul><a href='?mnux=skorsing.det&mhswid={$m['MhswID']}'>&raquo; Skorsing</a></td>";
        } else {
            $strSkorsing = '';
        }
        echo "<tr><td class=inp>{$n}</td>\r\n      <td class=ul align=center><a href='?mnux=mhsw.prestasi.det&gos=PresEdt&md=0&presid={$w['PrestasiID']}'><img src='img/edit.png'></a></td>\r\n      <td {$c}>{$tgl}</td>\r\n      <td {$c}>{$w['Judul']}</td>\r\n      <td {$c}>{$w['Keterangan']}</td>\r\n      <td class=ul align=right><a href='?mnux={$_SESSION['mnux']}&gos=PresDel&presid={$w['PrestasiID']}'><img src='img/del.gif'></a></td>\r\n      {$strSkorsing}\r\n      <tr>";
    }
    echo "</table></p>";
}
示例#29
-1
function BuatHeadernya($TahunID, $ProdiID, $p)
{
    global $lbr;
    $t = 6;
    $TglMulai = FormatTanggal($_SESSION['TglMulai']);
    $TglSelesai = FormatTanggal($_SESSION['TglSelesai']);
    $p->SetFont('Helvetica', 'B', 12);
    $p->Cell($lbr, $t, "Laporan Pembayaran Mahasiswa", 0, 1, 'C');
    $p->Cell($lbr, $t, "Rentang Pembayaran: {$TglMulai} sampai {$TglSelesai}", 0, 1, 'C');
    $p->Ln(2);
    $t = 6;
    $p->SetFont('Helvetica', 'BI', 10);
    $p->Cell(10, $t, 'Nmr', 1, 0);
    $p->Cell(22, $t, 'Tanggal', 1, 0);
    $p->Cell(23, $t, 'N I M', 1, 0);
    $p->Cell(46, $t, 'Nama Mahasiswa', 1, 0);
    $p->Cell(23, $t, 'Jumlah', 1, 0);
    $p->Cell(22, $t, 'Bank/Tunai', 1, 0);
    $p->Cell(44, $t, 'Nomer Bukti Setoran', 1, 0);
    $p->Ln($t);
}
示例#30
-1
function TrxSkorsing2($mhsw)
{
    $Tahun1 = $_REQUEST['Tahun1'];
    $Tahun2 = $_REQUEST['Tahun2'];
    $Tahun3 = $_REQUEST['Tahun3'];
    $Tahun4 = $_REQUEST['Tahun4'];
    $NoSurat = sqling($_REQUEST['NoSurat']);
    $TglSurat = "{$_REQUEST['TglSurat_y']}-{$_REQUEST['TglSurat_m']}-{$_REQUEST['TglSurat_d']}";
    $Keterangan = sqling($_REQUEST['Keterangan']);
    $_TglSurat = FormatTanggal($TglSurat);
    $hdr = HeaderSkorsing($mhsw);
    echo "<p><table class=box cellspacing=1>{$hdr}\r\n  <tr><td class=inp>No Surat</td><td class=ul colspan=3><b>{$NoSurat}</td></tr>\r\n  <tr><td class=inp>Tanggal Surat</td><td class=ul colspan=3><b>{$_TglSurat}</td></tr>\r\n  <tr><td class=inp>Keterangan</td><td class=ul colspan=3>{$Keterangan}</td></tr>\r\n  </table>";
    echo "<p><table class=box cellspacing=1>\r\n    <tr><th class=ttl>#</th>\r\n    <th class=ttl>Tahun</th>\r\n    <th class=ttl>Smt</th>\r\n    <th class=ttl>Status</th>\r\n    <th class=ttl>Juml<br />MK</th>\r\n    <th class=ttl>SKS<br />Diambil</th>\r\n    <th class=ttl>Catatan</th>\r\n    </tr>";
    echo "<form action='?' method=POST>\r\n  <input type=hidden name='mnux' value='skorsing.det'>\r\n  <input type=hidden name='gos' value='TrxSkorsing3'>\r\n  <input type=hidden name='Tahun1' value='{$Tahun1}'>\r\n  <input type=hidden name='Tahun2' value='{$Tahun2}'>\r\n  <input type=hidden name='Tahun3' value='{$Tahun3}'>\r\n  <input type=hidden name='Tahun4' value='{$Tahun4}'>\r\n  <input type=hidden name='NoSurat' value='{$NoSurat}'>\r\n  <input type=hidden name='TglSurat' value='{$TglSurat}'>\r\n  <input type=hidden name='Keterangan' value='{$Keterangan}'>\r\n  ";
    CekTahunSkors($mhsw, $Tahun1, 1);
    CekTahunSkors($mhsw, $Tahun2, 2);
    CekTahunSkors($mhsw, $Tahun3, 3);
    CekTahunSkors($mhsw, $Tahun4, 4);
    echo "<tr><td class=inp>&nbsp;</td><td class=ul colspan=6><input type=submit name='Proses' value='Proses Skorsing'>\r\n    <input type=button name='Batalkan' value='Batalkan Proses' onClick=\"location='?mnux=skorsing'\"></td></tr>";
    echo "</form></table></p>";
}