// 05/03/2007 // *** Functions *** 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>"; } // *** Parameters *** $tahun = GetSetVar('tahun'); // *** Main *** TampilkanJudul("Daftar BPM Klinik"); TampilkanTahunSaja($_SESSION['mnux'], "CetakDaftarBPM", 'klinik.lap'); if (!empty($_REQUEST['gos'])) { $_REQUEST['gos'](); }
// *** Functions *** 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>"; } // *** Parameters *** $tahun = GetSetVar('tahun'); // *** Main *** TampilkanJudul("Daftar Kuliah Klinik"); TampilkanTahunSaja($_SESSION['mnux'], "CetakKuliahKlinik", 'klinik.lap'); if (!empty($_REQUEST['gos'])) { $_REQUEST['gos'](); }
// Author: Emanuel Setio Dewo // 05/03/2007 // *** Functions *** function CetakBelumBayar() { if (empty($_SESSION['tahun'])) { die(ErrorMsg("Tahun Akademik Kosong", "Tentukan Tahun Akademik terlebih dahulu untuk melihat laporan.")); } $s = "select k.*, m.Nama\r\n from krs k\r\n left outer join mhsw m on k.MhswID=m.MhswID\r\n where k.Harga > k.Bayar\r\n and m.ProdiID = '11'\r\n order by m.MhswID"; $r = _query($s); $n = 0; echo "<p><table class=box cellspacing=1>"; echo "<tr><th class=ttl>#</th>\r\n <th class=ttl>N.P.M</th>\r\n <th class=ttl>Nama</th>\r\n <th class=ttl>Harga</th>\r\n <th class=ttl>Dibayar</th>\r\n <th class=ttl>Kurang</th>\r\n </tr>"; while ($w = _fetch_array($r)) { $n++; $hrg = number_format($w['Harga']); $byr = number_format($w['Bayar']); $krg = $w['Harga'] - $w['Bayar']; $krg = number_format($krg); echo "<tr>\r\n <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=right>{$hrg}</td>\r\n <td class=ul align=right>{$byr}</td>\r\n <td class=ul align=right>{$krg}</td>\r\n </tr>"; } echo "</table></p>"; } // *** Parameters *** $tahun = GetSetVar('tahun'); // *** Main *** TampilkanJudul("Daftar Mhsw Klinik Belum Bayar"); TampilkanTahunSaja($_SESSION['mnux'], "CetakBelumBayar", 'klinik.lap'); if (!empty($_REQUEST['gos'])) { $_REQUEST['gos'](); }