function daftar()
{
$s = "select * from pmb where\r\n PMBPeriodID = '{$_SESSION['tahun']}'\r\n order by LulusUjian, PMBID";
$r = _query($s);
$n = 0;
echo "<table class=box cellpadding=4 cellspacing=1><tr>\r\n <th class=ttl>No.</th><th class=ttl>PMBID</th>\r\n <th class=ttl>NIM/NPM</th>\r\n <th class=ttl>Surat Pembayaran</th>\r\n <th class=ttl>Bipot</th>\r\n <th class=ttl>Bayar</th>\r\n <th class=ttl>Prodi</th>\r\n <th class=ttl>Program</th>\r\n <th class=ttl>Status</th>\r\n <th class=ttl>Lulus?</th></tr>";
while ($w = _fetch_array($r)) {
$n++;
//$tot = 0;
$bipot2 = GetBipot2($w, $w['BIPOTID'], $tot);
$byrmhsw = TampilkanBIPOTCAMA1($w['PMBID'], $_SESSION['tahun']);
$arr = explode('|', $byrmhsw);
$cl = $bipot2 != $arr[0] && $arr[0] > 0 ? "class = wrn" : "class = ul";
echo "<tr><td class=inp>{$n}</td>\r\n <td {$cl}><a href=?mnux=mhswbaru&gos=ImprtPMB&trm={$w['PMBID']} target=_blank>{$w['PMBID']}</td>\r\n <td {$cl}>{$w['NIM']}</td>\r\n <td {$cl} align=right>{$bipot2}</td>\r\n <td {$cl} align=right>{$arr['0']}</td>\r\n <td {$cl} align=right>{$arr['1']}</td>\r\n <td {$cl} align=center>{$w['ProdiID']}</td>\r\n <td {$cl} align=center>{$w['ProgramID']}</td>\r\n <td {$cl} align=right>{$w['StatusAwalID']}</td>\r\n <td {$cl} align = center>{$w['LulusUjian']}</td>\r\n </tr>";
}
echo "</table>";
}
function TampilkanModulDiskonCAMA($pmb)
{
TampilkanBIPOTCAMA1($pmb);
TampilkanFormulirDiskon($pmb);
}
function TampilkanBIPOTCAMA(&$mhsw)
{
echo "<p><a name='stp1'></a><h3>Step 1. Cek Daftar Biaya/Potongan Mahasiswa</h3></p><hr size=1 color=silver />";
echo "<blockquote><a href='?mnux=mhswbaru.diskon&pmbid={$mhsw['PMBID']}'>Input Diskon/Potongan</a></blockquote>";
TampilkanBIPOTCAMA1($mhsw);
}