本文整理汇总了PHP中TampilkanHeader函数的典型用法代码示例。如果您正苦于以下问题：PHP TampilkanHeader函数的具体用法？PHP TampilkanHeader怎么用？PHP TampilkanHeader使用的例子？那么, 这里精选的函数代码示例或许可以为您提供帮助。
在下文中一共展示了TampilkanHeader函数的15个代码示例，这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞，您的评价将有助于系统推荐出更棒的PHP代码示例。
示例1: DftrSiswa
function DftrSiswa($pid)
{
$p = GetFields("presensi p\r\n left outer join jadwal j on p.JadwalID = j.JadwalID\r\n left outer join dosen d on d.Login = j.DosenID and d.KodeID='" . KodeID . "'\r\n left outer join hari h on h.HariID = date_format(p.Tanggal, '%w')\r\n\tleft outer join jenisjadwal jj on jj.JenisJadwalID = j.JenisJadwalID", "p.PresensiID", $pid, "p.*, j.MKKode, j.Nama, h.Nama as _HR,\r\n concat(d.Nama, ' <sup>', d.Gelar, '</sup>') as DSN,\r\n date_format(p.Tanggal, '%d-%m-%Y') as _Tanggal,\r\n left(p.JamMulai, 5) as _JM, left(p.JamSelesai, 5) as _JS,\r\n\tjj.Nama as _NamaJenisJadwal, jj.Tambahan");
TampilkanHeader($p);
CekKRSMhsw($p);
TampilkanPresensiMhsw($p);
}示例2: DftrSiswa
function DftrSiswa($pid)
{
$p = GetFields("presensiremedial pr \r\n left outer join jadwalremedial jr on pr.JadwalRemedialID = jr.JadwalRemedialID\r\n left outer join dosen d on d.Login = jr.DosenID and d.KodeID='" . KodeID . "'\r\n left outer join hari h on h.HariID = date_format(pr.Tanggal, '%w')", "pr.PresensiRemedialID", $pid, "pr.*, jr.MKKode, jr.Nama, h.Nama as _HR,\r\n concat(d.Nama, ' <sup>', d.Gelar, '</sup>') as DSN,\r\n date_format(pr.Tanggal, '%d-%m-%Y') as _Tanggal,\r\n left(pr.JamMulai, 5) as _JM, left(pr.JamSelesai, 5) as _JS");
TampilkanHeader($p);
CekKRSMhsw($p);
TampilkanPresensiMhsw($p);
}示例3: TampilkanHalaman
function TampilkanHalaman()
{
TampilkanHeader();
if (!empty($_SESSION['_remTahun'])) {
TampilkanRemedial();
}
}示例4: TampilkanIsinya
function TampilkanIsinya($page, $limit, $gel, $gels, $tahun, $nexttahun, $p)
{
$pagelimit = $page * $limit;
$s = "select DISTINCT(a.AplikanID), m.MhswID, a.Nama, k.Nama as NamaKelas, \r\n\t if(aa.Nama like '_%', aa.Nama, \r\n\t\t\tif(pt.Nama like '_%', pt.Nama, b.AsalSekolah)) as NamaSekolah,\r\n\t b.TahunLulus, pp.Urutan, a.SumberInformasi, a.PresenterID,\r\n\t a.StatusMundur as Mundur\r\n\t from \r\n\t\tstatusaplikanmhsw sam left outer join aplikan a on sam.AplikanID=a.AplikanID\r\n\t\t\t\t left outer join pmb b on a.PMBID=b.PMBID \r\n\t\t\t\t left outer join asalsekolah aa on b.AsalSekolah=aa.SekolahID\r\n\t\t\t\t left outer join perguruantinggi pt on b.AsalSekolah=pt.PerguruanTinggiID\r\n\t\t\t\t left outer join mhsw m on b.PMBID=m.PMBID\r\n\t\t\t\t left outer join kelas k on k.KelasID=m.KelasID\r\n\t\t\t\t left outer join pmbperiod pp on a.PMBPeriodID=pp.PMBPeriodID\r\n\t where b.KodeID = '" . KodeID . "'\r\n\t\t\tand sam.StatusAplikanID='REG'\r\n\t\t\tand pp.Tahun='{$tahun}'\r\n\t order by a.PresenterID, m.MhswID\r\n\t limit {$pagelimit}, {$limit}";
$r = _query($s);
$n = 0;
$t = 3;
TampilkanHeader($p);
while ($w = _fetch_array($r)) {
$n++;
$p->SetFont('Helvetica', '', 6);
$p->Cell(7, $t, $n, 'LB', 0, 'C');
$p->Cell(20, $t, $w['MhswID'], 1, 0, 'C');
$p->SetFillColor(255, 255, 255);
if ($w['Mundur'] == 'N') {
$p->SetFillColor(255, 0, 0);
}
$p->Cell(50, $t, $w['Nama'], 1, 0, 'L', true);
$p->Cell(20, $t, $w['NamaKelas'], 1, 0, 'C');
$p->Cell(70, $t, $w['NamaSekolah'], 1, 0, 'C');
$p->Cell(12, $t, $w['TahunLulus'], 1, 0, 'C');
$p->Cell(10, $t, $w['Urutan'], 1, 0, 'C');
$p->Cell(10, $t, $w['SumberInformasi'], 1, 0, 'C');
$arrSumberInfo = explode(',', $w['SumberInformasi']);
$NamaSumberInfo = GetaField('sumberinfo', 'InfoID', $arrSumberInfo[0], 'Nama');
$p->Cell(70, $t, $NamaSumberInfo, 1, 0, 'L');
$p->Cell(10, $t, $w['PresenterID'], 1, 0, 'C');
$p->Ln($t);
}
}示例5: TampilkanIsinya
function TampilkanIsinya($gel, $gels, $p)
{
$s = "select p.PMBID, p.Nama, p.ProgramID,\r\n\t\tp1.Nama as _Pilihan1, p2.Nama as _Pilihan2, p3.Nama as _Pilihan3\r\n from pmb p\r\n\t\tleft outer join prodi p1 on p1.ProdiID=p.Pilihan1\r\n\t\tleft outer join prodi p2 on p2.ProdiID=p.Pilihan2\r\n\t\tleft outer join prodi p3 on p3.ProdiID=p.Pilihan3\r\n where p.KodeID = '" . KodeID . "'\r\n and p.PMBPeriodID = '{$gel}'\r\n order by p.ProgramID, p.Nama";
$r = _query($s);
$n = 0;
$t = 6;
$ProgramID = ';laskdjf;laskdjf';
while ($w = _fetch_array($r)) {
if ($ProgramID != $w['ProgramID']) {
$ProgramID = $w['ProgramID'];
$p->Ln(2);
$p->SetFont('Helvetica', 'B', 10);
$p->Cell(185, $t, $w['ProgramID'], 0, 1);
TampilkanHeader($p);
}
$n++;
$p->SetFont('Helvetica', '', 9);
$p->Cell(10, $t, $n, 'LB', 0);
$p->Cell(20, $t, $w['PMBID'], 'B', 0);
$p->Cell(55, $t, $w['Nama'], 'B', 0);
$p->Cell(35, $t, $w['_Pilihan1'], 1, 0);
$p->Cell(35, $t, $w['_Pilihan2'], 1, 0);
$p->Cell(35, $t, $w['_Pilihan3'], 1, 0);
$p->Ln($t);
}
}示例6: TampilkanIsinya
function TampilkanIsinya($gel, $gels, $p)
{
$s = "select p.PMBID, p.Nama, p.AsalSekolah, p.NilaiUjian, NilaiSekolah,\r\n\tif(a.Nama like '_%', concat(p.AsalSekolah, ' - ', a.Nama), \r\n\t\tif(pt.Nama like '_%', concat(p.AsalSekolah, ' - ', pt.Nama), p.AsalSekolah)) as _NamaSekolah, \r\n p.KotaOrtu, prd.Nama as _PRD, prg.Nama as _PRG\r\n from pmb p\r\n left outer join prodi prd on prd.ProdiID = p.ProdiID and prd.KodeID = '" . KodeID . "'\r\n left outer join program prg on prg.ProgramID = p.ProgramID and prg.KodeID = '" . KodeID . "'\r\n\t left outer join asalsekolah a on a.SekolahID = p.AsalSekolah\r\n\t left outer join perguruantinggi pt on pt.PerguruanTinggiID = p.AsalSekolah\r\n where p.KodeID = '" . KodeID . "'\r\n and p.PMBPeriodID = '{$gel}'\r\n order by p.AsalSekolah, p.Nama ";
$r = _query($s);
$n = 0;
$t = 6;
$AS = ';laskdjf;laskdjf';
while ($w = _fetch_array($r)) {
if ($AS != $w['AsalSekolah']) {
$AS = $w['AsalSekolah'];
$p->Ln(2);
$p->SetFont('Helvetica', '', 12);
$p->Cell(185, $t, $w['_NamaSekolah'], 0, 1);
TampilkanHeader($p);
}
$n++;
$p->SetFont('Helvetica', '', 9);
$p->Cell(12, $t, $n, 'LB', 0);
$p->Cell(20, $t, $w['PMBID'], 'B', 0);
$p->Cell(50, $t, $w['Nama'], 'B', 0);
$p->Cell(50, $t, $w['_PRD'], 'B', 0);
$p->Cell(30, $t, $w['_PRG'], 'B', 0);
$p->Cell(10, $t, $w['NilaiSekolah'], 'B', 0, 'R');
$p->Cell(10, $t, $w['NilaiUjian'], 'BR', 0, 'R');
$p->Ln($t);
}
}示例7: Edit
function Edit($PMBID, $pmb)
{
TampilkanHeader($pmb);
$optprodi = AmbilPilihanFinal($pmb);
$getnilaisekolah = empty($pmb['NilaiSekolah']) ? 'N/A' : $pmb['NilaiSekolah'];
$gel = GetaField('pmbperiod', "KodeID='" . KodeID . "' and NA", 'N', "PMBPeriodID");
$getnilaiujian = empty($pmb['NilaiUjianTotal']) ? GetaField('ruangusm', "PMBID='{$pmb['PMBID']}' and PMBPeriodID='{$gel}' and KodeID", KodeID, "sum(NilaiUSM)") + 0 : $pmb['NilaiUjianTotal'] + 0;
$xx = GetFields('ruangusm', "PMBID='{$pmb['PMBID']}' and PMBPeriodID='{$gel}' and KodeID", KodeID, "sum(NilaiUSM) as N, count(ProdiUSMID) as J");
$rata = $xx['J'] > 0 ? number_format($xx['N'] / $xx['J'], 2) : 0;
$rata = empty($rata) ? 0 : $rata;
$getnilaiujianrata = empty($pmb['NilaiUjian']) ? $rata : $pmb['NilaiUjian'] + 0;
$getgrade = GetaField('pmbgrade', "NilaiUjianMin <= {$getnilaiujianrata} and {$getnilaiujianrata} <= NilaiUjianMax and KodeID", KodeID, 'GradeNilai');
$optgrd = GetOption2('pmbgrade', "concat(GradeNilai, ' (', if (Keterangan is NULL, '', Keterangan), ')')", 'GradeNilai', $getgrade, "KodeID='" . KodeID . "'", 'GradeNilai');
$arrPT = explode('~', $pmb['PrestasiTambahan']);
foreach ($arrPT as $Prestasi) {
if (!empty($Prestasi)) {
$PrestasiTambahan .= empty($PrestasiTambahan) ? $Prestasi : "<br>" . $Prestasi;
}
}
$ck = $pmb['LulusUjian'] == 'Y' ? 'checked' : '';
echo '
<script>
function cekThisForm(){
var errmsg = "";
var cek = document.getElementById("LulusUjian").checked;
var nilai = document.getElementById("NilaiUjian").value;
if (cek == true){
if (nilai == 0){
errmsg += "Nilai ujian masih bernilai 0 \\n";
}
}
if (errmsg != ""){
alert (errmsg);
return false;
} else {
return true;
}
}
</script>
';
echo "<table class=bsc cellspacing=1 width=100%>\r\n \r\n <form action='../{$_SESSION['mnux']}.nilai.php' method=POST onsubmit='return cekThisForm()'>\r\n <input type=hidden name='PMBID' value='{$PMBID}' />\r\n <input type=hidden name='gos' value='Simpan' />\r\n ";
$pmbformulir = GetFields('pmbformulir', "KodeID='" . KodeID . "' and PMBFormulirID", $pmb['PMBFormulirID'], 'USM, Wawancara');
// Bila PMB Formulir memiliki komponen ujian, ambil kolom dan isi detail USM nya
if ($pmbformulir['USM'] == 'Y') {
$DetailUSM = AmbilDetailUSM($pmb);
echo "\r\n\t <tr><th class=ttl colspan=2>Detail Penilaian</th></tr>\r\n\t {$DetailUSM}\r\n\t <tr><th class=ttl colspan=2>Penilaian Akhir</th></tr>";
}
if ($pmbformulir['Wawancara'] == 'Y') {
$HasilWawancara = GetaField('wawancara w', "w.Tanggal = (select max(w2.Tanggal) from wawancara w2 where w2.PMBID='{$PMBID}' group by w2.PMBID) and w.PMBID='{$PMBID}' and w.KodeID", KodeID, "HasilWawancara");
$_HasilWawancara = !empty($HasilWawancara) ? "<td class=ul1><input type=text name='HasilWawancara' value='{$HasilWawancara}' disabled></td>" : "<td><b>Belum Wawancara</b></td>";
echo "<tr><td class=inp>Hasil Wawancara:</td>\r\n\t\t\t\t{$_HasilWawancara}\r\n\t\t\t\t</tr>";
}
echo "\r\n <tr><td class=inp>Nilai Sekolah Terakhir:</td>\r\n\t <td class=ul1><input type=text name='NilaiSekolah' value='{$getnilaisekolah}' size=4 maxlength=4 style='text-align:right' disabled></td></tr>\r\n <tr><td class=inp>Prestasi Tambahan:</td>\r\n\t <td class=ul1>{$PrestasiTambahan}</td>\r\n\t </tr>";
echo "\r\n <tr><td class=inp>Catatan Lainnya:</td>\r\n\t <td class=ul1><textarea name='Catatan' cols=30 row=2>{$pmb['Catatan']}</textarea></td>\r\n\t </tr>\r\n <tr><td class=inp width=100>Pilihan Final:</td>\r\n <td class=ul1><select name='ProdiID'>{$optprodi}</select></td>\r\n </tr>\r\n <tr><td class=inp>Lulus?</td>\r\n <td class=ul1><input type=checkbox id='LulusUjian' name='LulusUjian' value='Y' {$ck} />\r\n Beri tanda centang jika lulus\r\n </td></tr>\r\n <tr><td class=inp>Grade:</td>\r\n <td class=ul1><input type=text name='GradeNilai' value='{$getgrade}' size=5 readonly></td>\t \r\n </tr>\r\n <tr><td class=ul1 colspan=2 align=center>\r\n <input type=submit name='Simpan' value='Simpan' />\r\n <input type=button name='Batal' value='Batal' onClick=\"window.close()\" />\r\n </td></tr>\r\n </form>\r\n </table>";
}示例8: TampilkanHalaman
function TampilkanHalaman()
{
TampilkanHeader();
if (!empty($_SESSION[periode1])){
TampilkanRemedial();
}
}示例9: fnEdit
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']);
}
}示例10: DftrPMB
function DftrPMB($gels, $gel)
{
TampilkanHeader($gels, $gel);
global $_maxbaris, $arrUrut;
include_once "class/dwolister.class.php";
$hr = "<hr size=1 color=silver />";
$rs = "rowspan=3";
$rsm = "rowspan=2";
// Urutan
$_urut = $arrUrut[$_SESSION['_pmbUrut']];
$__urut = explode('~', $_urut);
$urut = "order by " . $__urut[1];
// Filter formulir
$whr = array();
if (!empty($_SESSION['_pmbFrmID'])) {
$whr[] = "p.PMBFormulirID='{$_SESSION['_pmbFrmID']}'";
}
if (!empty($_SESSION['_pmbPrg'])) {
$whr[] = "p.ProgramID = '{$_SESSION['_pmbPrg']}' ";
}
if (!empty($_SESSION['_pmbNama'])) {
$whr[] = "p.Nama like '%{$_SESSION['_pmbNama']}%'";
}
if (!empty($_SESSION['_pmbNomer'])) {
$whr[] = "p.PMBID like '%{$_SESSION['_pmbNomer']}%'";
}
if ($_SESSION[_LevelID] == 50) {
$whr[] = "p.StatusAwalID = 'PM'";
} else {
$whr[] = " p.StatusAwalID != 'PM'";
}
$_whr = implode(' and ', $whr);
$_whr = empty($_whr) ? '' : 'and ' . $_whr;
$pagefmt = "<a href='?mnux={$_SESSION['mnux']}&gos=&_pmbPage==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 = "pmb p \r\n left outer join pmbformulir f on p.PMBFormulirID = f.PMBFormulirID\r\n left outer join program _prg on p.ProgramID = _prg.ProgramID\r\n left outer join prodi _p1 on p.Pilihan1 = _p1.ProdiID\r\n left outer join prodi _p2 on p.Pilihan2 = _p2.ProdiID\r\n left outer join prodi _p3 on p.Pilihan3 = _p3.ProdiID\r\n left outer join statusawal _sta on p.StatusAwalID = _sta.StatusAwalID\r\n left outer join wawancara w on p.PMBID = w.PMBID and w.Tanggal = (select max(Tanggal) from wawancara where PMBID=p.PMBID group by PMBID)\r\n\tleft outer join asalsekolah a on p.AsalSekolah = a.SekolahID\r\n\tleft outer join perguruantinggi pt on p.AsalSekolah = pt.PerguruanTinggiID\r\n\twhere p.KodeID = '" . KodeID . "' \r\n and p.PMBPeriodID='{$gel}'\r\n {$_whr}\r\n {$urut}";
$lst->fields = "p.PMBID, p.Nama, p.Kelamin, p.ProdiID, p.Pilihan1, p.Pilihan2, p.Pilihan3, \r\n p.DetailNilai, p.NilaiUjian, p.GradeNilai, p.LulusUjian as LU, p.NA, p.NilaiSekolah, \r\n p.AsalSekolah, _prg.Nama as PRG, w.WawancaraID,\r\n if(a.Nama like '_%', a.Nama, \r\n\t\tif(pt.Nama like '_%', pt.Nama, p.AsalSekolah)) as _NamaSekolah,\r\n\tconcat('• ', replace(p.PrestasiTambahan, '~', '<br />• ')) as PT,\r\n f.Nama as FRM, _p1.Nama as P1, _p2.Nama as P2, _p3.Nama as P3,\r\n _sta.Nama as STA,\r\n if (p.ProdiID = p.Pilihan1, 'wrn', concat('cna', p.LulusUjian)) as _selP1,\r\n if (p.ProdiID = p.Pilihan2, 'wrn', concat('cna', p.LulusUjian)) as _selP2,\r\n if (p.ProdiID = p.Pilihan3, 'wrn', concat('cna', p.LulusUjian)) as _selP3,\r\n if (p.NilaiUjian+0 = 0, 'Belum Dihitung', concat(p.NilaiUjian, ' ( ', p.GradeNilai, ' ) ')) as _NilaiUjian,\r\n if (p.MhswID is NULL or p.MhswID = '', '', \"<img src='img/lock.jpg' width=26 title='Sudah menjadi Mahasiswa' />\") as KUNCI,\r\n\tif (p.LulusUjian='Y', \"<img src='img/printer2.gif' />\" , '') as PRINT\r\n ";
$lst->page = $_SESSION['_pmbPage'] + 0;
$lst->pages = $pagefmt;
$lst->pageactive = $pageoff;
$lst->maxrow = $_maxbaris;
$lst->headerfmt = "<p><table class=box cellspacing=1 align=center width=1000>\r\n \r\n <tr>\r\n <th class=ttl>#</th>\r\n <th class=ttl>PMB #</th>\r\n <th class=ttl>\r\n Nama\r\n {$hr}\r\n Asal Sekolah\r\n </th>\r\n <th class=ttl>\r\n Formulir\r\n {$hr}\r\n Program\r\n {$hr}\r\n Status\r\n </th>\r\n <th class=ttl colspan=2>\r\n Pilihan\r\n <hr size=1 color=silver />\r\n (Pilihan akhir ditandai<br />dengan warna biru)\r\n </th>\r\n <th class=ttl>Prestasi Tambahan</th>\r\n <th class=ttl>Nilai Ujian\r\n\t <hr size=1 color=silver />\r\n\t Nilai Sekolah\r\n <hr size=1 color=silver />\r\n Grade\r\n </th>\r\n </tr>";
$lst->detailfmt = "<tr>\r\n <td class=inp width=10 {$rs}>=NOMER=</td>\r\n <td class=ul1 width=84 {$rs} align=center><b>=PMBID=<br />=KUNCI=</b></td>\r\n <td class=cna=LU=><b>=Nama=</b></td>\r\n <td class=cna=LU= width=100>=FRM=</td>\r\n <td class==_selP1= width=30>=Pilihan1= \r\n </td>\r\n <td class==_selP1= width=170>=P1= \r\n </td>\r\n <td class=cna=LU= width=200 {$rs}>\r\n =PT= \r\n </td>\r\n <td class=cna=LU= width=70 align=right><b>=_NilaiUjian=</b></td>\r\n </tr>\r\n \r\n <tr>\r\n <td class=cna=LU=>» =_NamaSekolah=</td>\r\n <td class=cna=LU=>=PRG= </td>\r\n <td class==_selP2=>=Pilihan2= </td>\r\n <td class==_selP2=>=P2= </td>\r\n <td class=cna=LU= align=right> <b>=NilaiSekolah=</b></td>\r\n </tr>\r\n\t\r\n <tr>\r\n <td class=cna=LU= align=right><img src='img/=Kelamin=.bmp' /></td>\r\n <td class=cna=LU=>=STA=</td>\r\n <td class==_selP3=>=Pilihan3= </td>\r\n <td class==_selP3=>=P3= </td>\r\n <td class=ul1 align=right>\r\n Lulus: <a href='#' onClick=\"javascript:EditNilai('=PMBID=')\" /><img src='img/=LU=.gif' /></a>\r\n\t\t\t <a href='#' onClick=\"javascript:CetakSuratKelulusan('=PMBID=', '=WawancaraID=')\" />=PRINT=</a>\r\n\t </td>\r\n </tr>\r\n " . $gantibrs;
$lst->footerfmt = "</table>";
$hal = $lst->TampilkanHalaman();
$ttl = $lst->MaxRowCount;
echo $lst->TampilkanData();
echo "<p align=center>Hal: {$hal} <br />(Tot: {$ttl})</p>";
}示例11: StatusMhsw
function StatusMhsw()
{
TampilkanHeader();
global $arrUrutMhsw;
$_maxbaris = 10;
include_once "class/dwolister.class.php";
// Urutan
if ($_SESSION['_LevelID'] == 1) {
$edit = "<a href='#' onClick=\"location='?mnux={$_SESSION['mnux']}&gos=StatusMhswEdt&md=0&id==ProsesStatusMhswID='\" />\n <img src='img/edit.png' /></a>";
}
$_urut = $arrUrutMhsw[$_SESSION['_statusmhswUrut']];
$__urut = explode('~', $_urut);
$urut = "order by " . $__urut[1];
// Filter formulir
$whr = array();
if (!empty($_SESSION['_statusmhswNomer'])) {
$whr[] = "psm.MhswID like '%{$_SESSION['_statusmhswNomer']}%'";
}
if (!empty($_SESSION['_statusmhswProdi'])) {
$whr[] = "m.ProdiID = '{$_SESSION['_statusmhswProdi']}' ";
}
if (!empty($_SESSION['_statusmhswPrg'])) {
$whr[] = "m.ProgramID = '{$_SESSION['_statusmhswPrg']}' ";
}
if (!empty($_SESSION['_statusmhswNama'])) {
$whr[] = "m.Nama like '%{$_SESSION['_statusmhswNama']}%'";
}
if (!empty($_SESSION['_statusmhswID'])) {
$whr[] = "psm.StatusMhswID = '{$_SESSION['_statusmhswID']}'";
}
$_whr = implode(' and ', $whr);
$_whr = empty($_whr) ? '' : 'and ' . $_whr;
$pagefmt = "<a href='?mnux={$_SESSION['mnux']}&gos=&_statusmhswPage==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 = "prosesstatusmhsw psm\n\tleft outer join mhsw m on psm.MhswID = m.MhswID\n left outer join prodi _prd on m.ProdiID = _prd.ProdiID\n\tleft outer join program _prg on m.ProgramID = _prg.ProgramID\n left outer join statusmhsw _stm on psm.StatusMhswLama = _stm.StatusMhswID\n\tleft outer join statusmhsw _stm2 on psm.StatusMhswID = _stm2.StatusMhswID\n where psm.KodeID = '" . KodeID . "' \n {$_whr}\n {$urut}";
$lst->fields = "DISTINCT(psm.ProsesStatusMhswID), psm.MhswID, m.Nama, m.Kelamin, m.ProgramID, m.ProdiID, psm.StatusMhswLama, psm.StatusMhswID, psm.NA,\n\t\t\t\t\t_prg.Nama as _PRG, \n\t\t\t\t\t_stm.Nama as NamaStatusLama, _stm2.Nama as NamaStatusBaru";
//$lst->startrow = $_SESSION['_statusmhswPage']+0;
$lst->maxrow = $_maxbaris;
$lst->pages = $pagefmt;
$lst->pageactive = $pageoff;
$lst->page = $_SESSION['_statusmhswPage'] + 0;
$lst->headerfmt = "<p><table class=box cellspacing=1 align=center width=600>\n \n <tr>\n <th class=ttl colspan=2>#</th>\n <th class=ttl>NIM</th>\n <th class=ttl colspan=2>Nama</th>\n <th class=ttl>Prodi<hr size=1 color=silver />Program</th>\n\t<th class=ttl>Status Baru<hr size=1 color=silver />Status Lama</th>\n <th class=ttl> </th>\n </tr>";
$lst->detailfmt = "<tr>\n <td class=inp width=10>=NOMER=</td>\n <td class=ul1 width=10>\n {$edit}\n </td>\n <td class=ul1 width=80>=MhswID=</td>\n <td class=cna=NA=>=Nama=</td>\n <td class=cna=NA= width=10 align=center><img src='img/=Kelamin=.bmp' /></td>\n <td class=cna=NA= width=120 align=center>\n =ProdiID= \n <hr size=1 color=silver />\n =_PRG= \n </td>\n\t<td class=cna=NA= width=120 align=center>\n\t =NamaStatusBaru= \n\t <hr size=1 color=silver />\n\t <font color=silver>=NamaStatusLama=</font> </td>\n\t<td class=cna=NA= width=15 align=center><a href='#' onClick=\"PrintSurat(=ProsesStatusMhswID=)\"><img title='Surat Keterangan' src='img/printer2.gif'></a>\n\t </td>\n </tr>" . $gantibrs;
$lst->footerfmt = "</table>\n <script>\n\t\tfunction PrintSurat(id)\n\t\t{\tlnk = '{$_SESSION['mnux']}.keterangan.php?_psmid='+id;\n\t\t\twin2 = window.open(lnk, '', 'width=600, height=500, scrollbars, status');\n\t\t\tif (win2.opener == null) childWindow.opener = self;\n\t\t}\n\t</script>";
$hal = $lst->TampilkanHalaman($pagefmt, $pageoff);
$ttl = $lst->MaxRowCount;
echo $lst->TampilkanData();
echo "<p align=center>Hal: {$hal} <br />(Tot: {$ttl})</p>";
}示例12: DftrForm
function DftrForm($gel)
{
TampilkanHeader($gel);
global $arrUrut;
$_maxbaris = 10;
include_once "class/dwolister.class.php";
// Urutan
if ($_SESSION['_LevelID'] != 33) {
$_urut = $arrUrut[$_SESSION['_pmbwebUrut']];
$__urut = explode('~', $_urut);
$urut = "order by " . $__urut[1];
// Filter formulir
$whr = array();
if (!empty($_SESSION['_pmbwebFrmID'])) {
$whr[] = "p.PMBFormulirID='{$_SESSION['_pmbwebFrmID']}'";
}
if (!empty($_SESSION['_pmbwebPrg'])) {
$whr[] = "p.ProgramID = '{$_SESSION['_pmbwebPrg']}' ";
}
if (!empty($_SESSION['_pmbwebNama'])) {
$whr[] = "p.Nama like '%{$_SESSION['_pmbwebNama']}%'";
}
if (!empty($_SESSION['_pmbwebNomer'])) {
$whr[] = "p.PMBWebID like '%{$_SESSION['_pmbwebNomer']}%'";
}
$_whr = implode(' and ', $whr);
$_whr = empty($_whr) ? '' : 'and ' . $_whr;
} else {
$_whr = "and p.PMBWebID = {$_SESSION['_Login']}";
}
$pagefmt = "<a href='?mnux={$_SESSION['mnux']}&gos=&_pmbwebPage==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 = "pmbweb p \r\n left outer join pmbformulir f on p.PMBFormulirID = f.PMBFormulirID\r\n left outer join prodi _p1 on p.Pilihan1 = _p1.ProdiID\r\n left outer join prodi _p2 on p.Pilihan2 = _p2.ProdiID\r\n left outer join prodi _p3 on p.Pilihan3 = _p3.ProdiID\r\n left outer join program _prg on p.ProgramID = _prg.ProgramID\r\n left outer join statusawal _sta on p.StatusAwalID = _sta.StatusAwalID\r\n where p.KodeID = '" . KodeID . "' \r\n {$_whr}\r\n\t and p.Diproses = 'N'\r\n {$urut}";
$lst->fields = "p.PMBWebID, p.Nama, p.Kelamin, p.ProdiID, p.Pilihan1, p.Pilihan2, p.Pilihan3,\r\n f.Nama as FRM, _p1.Nama as P1, \r\n\tif(f.JumlahPilihan <= 2, concat('<br>', _p2.Nama), '') as P2, \r\n\tif(f.JumlahPilihan <= 3, concat('<br>', _p3.Nama), '') as P3,\r\n\tif(p.StatusAwalID='S', concat('<font color=blue>',_sta.Nama,'<font>') , _sta.Nama) as STA,\r\n _prg.Nama as PRG, p.NA, p.NilaiSekolah";
//$lst->startrow = $_SESSION['_pmbwebPage']+0;
$lst->maxrow = $_maxbaris;
$lst->pages = $pagefmt;
$lst->pageactive = $pageoff;
$lst->page = $_SESSION['_pmbwebPage'] + 0;
$lst->headerfmt = "<p><table class=box cellspacing=1 align=center width=1000>\r\n \r\n <tr>\r\n <th class=ttl>#</th>\r\n <th class=ttl>PMB Web ID</th>\r\n <th class=ttl colspan=2>Nama</th>\r\n <th class=ttl>Status</th>\r\n\t<th class=ttl>Program</th>\r\n <th class=ttl>Pilihan</th>\r\n\t<th class=ttl>Nilai</br>Sekolah</th>\r\n\t<th class=ttl>Proses?</th>\r\n </tr>";
$lst->detailfmt = "<tr>\r\n <td class=inp width=10>=NOMER=</td>\r\n <td class=ul1 width=80>=PMBWebID=</td>\r\n <td class=cna=NA=>=Nama=</td>\r\n <td class=cna=NA= width=10 align=center><img src='img/=Kelamin=.bmp' /></td>\r\n <td class=cna=NA= width=70 align=center>=STA=</td>\r\n <td class=cna=NA= width=120 align=center>=PRG=</td>\r\n <td class=cna=NA= width=140 align=center>=P1==P2==P3=</td>\r\n <td class=cna=NA= width=100 align=center>=NilaiSekolah=</td>\r\n\t <td class=cna=NA= width=70 align=center><input type=button name='Proses' value='Proses' onClick=\"location='?mnux={$_SESSION['mnux']}&gos=Proses&pmbwebid==PMBWebID='\"></td>\r\n\t </tr>" . $gantibrs;
$lst->footerfmt = "</table>";
$hal = $lst->TampilkanHalaman($pagefmt, $pageoff);
$ttl = $lst->MaxRowCount;
echo $lst->TampilkanData();
echo "<p align=center>Hal: {$hal} <br />(Tot: {$ttl})</p>";
}示例13: DftrCama
function DftrCama($gels, $gel)
{
TampilkanHeader($gels, $gel);
global $_maxbaris, $arrUrut;
include_once "class/dwolister.class.php";
// Urutan
$_urut = $arrUrut[$_SESSION['_pmbUrut']];
$__urut = explode('~', $_urut);
$urut = "order by " . $__urut[1];
// Filter formulir
$whr = array();
if (!empty($_SESSION['_pmbFrmID'])) {
$whr[] = "p.PMBFormulirID='{$_SESSION['_pmbFrmID']}'";
}
if (!empty($_SESSION['_pmbPrg'])) {
$whr[] = "p.ProgramID = '{$_SESSION['_pmbPrg']}' ";
}
if (!empty($_SESSION['_pmbNama'])) {
$whr[] = "p.Nama like '%{$_SESSION['_pmbNama']}%'";
}
if (!empty($_SESSION['_pmbNomer'])) {
$whr[] = "p.PMBID like '%{$_SESSION['_pmbNomer']}%'";
}
if (!empty($_SESSION['_pmbPrd'])) {
$whr[] = "p.ProdiID = '{$_SESSION['_pmbPrd']}'";
}
$_whr = implode(' and ', $whr);
$_whr = empty($_whr) ? '' : 'and ' . $_whr;
$NIMSementara = GetaField('prodi', 'ProdiID', $pmb['ProdiID'], 'GunakanNIMSementara');
$pagefmt = "<a href='?mnux={$_SESSION['mnux']}&gos=&_pmbPage==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 = "pmb p \r\n left outer join pmbformulir f on p.PMBFormulirID = f.PMBFormulirID\r\n left outer join prodi _p on p.ProdiID = _p.ProdiID\r\n left outer join program _prg on p.ProgramID = _prg.ProgramID\r\n left outer join statusawal _sta on p.StatusAwalID = _sta.StatusAwalID\r\n\t\tleft outer join mhsw m on m.MhswID = p.MhswID\r\n where p.KodeID = '" . KodeID . "' \r\n and p.PMBPeriodID='{$gel}'\r\n {$_whr}\r\n {$urut}";
$lst->fields = "p.PMBID, p.MhswID, p.Nama, p.Kelamin, \r\n p.ProdiID, p.Pilihan1, p.Pilihan2, p.Pilihan3, \r\n f.Nama as FRM, p.LulusUjian, m.NIMSementara,\r\n _p.Nama as Prodi,\r\n _sta.Nama as STA, _prg.Nama as PRG,\r\n format(p.TotalBiaya, 0) as _TotalBiaya,\r\n format(p.TotalBayar, 0) as _TotalBayar,\r\n if (p.StatusAwalID2 = 'Y', ' - Mahasiswa Transfer', '') as _STAAWAL2,\r\n if (p.LulusUjian = 'Y', if (p.MhswID is NULL or p.MhswID = '', concat('<a href=\\'?mnux={$_SESSION['mnux']}&gos=MhswBaruEdt&PMBID=', p.PMBID, '\\'>\r\n <img src=\\'img/edit.jpg\\' width=30 title=\\'Pembayaran dan pemrosesan Cama\\' /></a>'), '<img src=\\'img/lock.jpg\\' width=30 title=\\'Sudah diproses menjadi mahasiswa\\' />'), '×') as EDT,\r\n\t if (p.LulusUjian = 'Y', concat('<a href=\\'#\\' onClick=\"javascript:CetakKartu(\\'', p.PMBID, '\\',\\'', m.NIMSementara, '\\')\" /><img src=\\'img/printer2.gif\\' /></a>'), ' ') as _ktm";
$lst->page = $_SESSION['_pmbPage'] + 0;
$lst->maxrow = $_maxbaris;
$lst->pages = $pagefmt;
$lst->pageactive = $pageoff;
$lst->headerfmt = "<p><table class=box cellspacing=1 align=center width=1000>\r\n \r\n <tr>\r\n <th class=ttl colspan=2>#</th>\r\n <th class=ttl>\r\n PMB #\r\n <hr size=1 color=silver />\r\n NIM\r\n </th>\r\n <th class=ttl colspan=2>Nama</th>\r\n <th class=ttl>\r\n Status\r\n <hr size=1 color=silver />\r\n Kelulusan\r\n </th>\r\n <th class=ttl>Formulir<hr size=1 color=silver />Program</th>\r\n <th class=ttl>Prodi</th>\r\n <th class=ttl width=100>BIPOT\r\n <a href='#' onClick=\"alert('Jumlah Biaya yg harus dibayarkan oleh Cama pada tahap 1 pembayaran')\"><img src='img/info.gif' /></a>\r\n <hr size=1 color=silver />\r\n Bayar</th>\r\n <th class=ttl> </th>\r\n </tr>";
$lst->detailfmt = "<tr>\r\n <td class=inp width=10>=NOMER=</td>\r\n <td class=ul1 width=10 align=center>\r\n =EDT=\r\n </td>\r\n <td class=ul width=80 align=center>\r\n =PMBID= \r\n <hr size=1 color=silver />\r\n <sub>=MhswID=</sub>\r\n </td>\r\n <td class=cnn=LulusUjian=>=Nama= {$gel}</td>\r\n <td class=cnn=LulusUjian= width=10 align=center><img src='img/=Kelamin=.bmp' /></td>\r\n <td class=cnn=LulusUjian= width=70 align=center>\r\n =STA=\r\n <hr size=1 color=silver />\r\n <img src='img/=LulusUjian=.gif' />\r\n </td>\r\n <td class=cnn=LulusUjian= width=120>\r\n =FRM= \r\n <hr size=1 color=silver />\r\n =PRG= =_STAAWAL2=\r\n </td>\r\n <td class=cnn=LulusUjian= width=200>\r\n =ProdiID=\r\n <hr size=1 color=silver />\r\n =Prodi= </td>\r\n <td class=cnn=LulusUjian= align=right>\r\n =_TotalBiaya=\r\n <hr size=1 color=silver />\r\n =_TotalBayar=\r\n </td>\r\n <td class=ul1 width=10 align=center>\r\n =_ktm= \r\n </td>\r\n </tr>" . $gantibrs;
$lst->footerfmt = "</table>\r\n\t<script>\r\n\t\tfunction CetakKartu(pmbid,ob)\r\n\t\t{\t\r\n\t\t\tif (ob == 'Y'){\r\n\t\t\t\talert ('Mahasiswa ini masih memiliki NIM Sementara. \\n Lakukan Konversi NIM terlebih dahulu');\r\n\t\t\t} else {\r\n\t\t\t\tlnk = \"{$_SESSION['mnux']}.ktm.php?pmbid=\"+pmbid;\r\n\t\t\t\t win2 = window.open(lnk, \"\", \"width=600, height=400, scrollbars, resizable, status\");\r\n\t\t\t\t if (win2.opener == null) childWindow.opener = self;\r\n\t\t\t }\r\n\t\t}\r\n\t</script>";
$hal = $lst->TampilkanHalaman();
$ttl = $lst->MaxRowCount;
echo $lst->TampilkanData();
echo "<p align=center>Hal: {$hal} <br />(Tot: {$ttl})</p>";
}示例14: TampilkanIsinya
function TampilkanIsinya($bipotid, $p)
{
$s = "select b2.*, bn.Nama, format(b2.Jumlah, 0) as JML,\r\n t.Nama as NMTRX, s.Nama as SAAT\r\n from bipot2 b2\r\n left outer join bipotnama bn on b2.BIPOTNamaID=bn.BIPOTNamaID\r\n left outer join saat s on b2.SaatID=s.SaatID\r\n left outer join trx t on b2.TrxID=t.TrxID\r\n where b2.BIPOTID='{$bipotid}' and KodeID='" . KodeID . "'\r\n order by b2.TrxID, b2.Prioritas, b2.GradeNilai";
$r = _query($s);
$n = 0;
$t = 6;
TampilkanHeader($p);
while ($w = _fetch_array($r)) {
$n++;
$p->SetFont('Helvetica', '', 9);
$p->Cell(12, $t, $w['Prioritas'], 'LB', 0, 'R');
$p->Cell(80, $t, $w['Nama'], 'B', 0, 'L');
$p->Cell(30, $t, $w['JML'], 'B', 0, 'R');
$p->Cell(15, $t, $w['KaliSesi'], 'B', 0, 'R');
$_GradeNilai = $w['GunakanGradeNilai'] == 'Y' ? $w['GradeNilai'] : '-';
$p->Cell(20, $t, $_GradeNilai, 'BR', 0, 'C');
$p->Ln($t);
}
}示例15: TampilkanIsinya
function TampilkanIsinya($gel, $gels, $p)
{
$s = "select p.PMBID, p.Nama, p.AsalSekolah, NilaiSekolah,\r\n p.KotaOrtu, prd.Nama as _PRD, prg.Nama as _PRG\r\n from pmb p\r\n left outer join prodi prd on prd.ProdiID = p.Pilihan1 and prd.KodeID = '" . KodeID . "'\r\n left outer join program prg on prg.ProgramID = p.ProgramID and prg.KodeID = '" . KodeID . "'\r\n where p.KodeID = '" . KodeID . "'\r\n and p.PMBPeriodID = '{$gel}'\r\n order by p.NilaiSekolah desc, p.Nama ";
$r = _query($s);
$n = 0;
$t = 6;
TampilkanHeader($p);
while ($w = _fetch_array($r)) {
$n++;
$p->SetFont('Helvetica', '', 9);
$p->Cell(12, $t, $n, 'LB', 0, 'C');
$p->Cell(17, $t, $w['NilaiSekolah'], 'B', 0, 'C');
$p->Cell(20, $t, $w['PMBID'], 'B', 0, 'C');
$p->Cell(50, $t, $w['Nama'], 'B', 0, 'L');
$p->Cell(50, $t, $w['_PRD'], 'B', 0, 'C');
$p->Cell(30, $t, $w['_PRG'], 'BR', 0, 'C');
// $p->Cell(10, $t, $w['NilaiUjian'], 'BR', 0, 'R');
$p->Ln($t);
}
}