function BuatIsinya($p)
{
global $lbr;
$s = "select w.MhswID, w.Judul, w.Predikat, w.Prasyarat, \r\n k.IP, m.ProdiID, m.Nama as NamaMhsw, m.Kota\r\n from wisudawan w\r\n left outer join mhsw m on w.MhswID = m.MhswID and m.KodeID = '" . KodeID . "'\r\n\t left outer join khs k on k.MhswID = m.MhswID\r\n where w.KodeID = '" . KodeID . "'\r\n and w.TahunID = '{$_SESSION['TahunID']}'\r\n\t and k.TahunID = '{$_SESSION['TahunID']}'\r\n order by m.Kota, m.ProdiID, w.MhswID";
$r = _query($s);
$prd = ';alskdjf;asd';
$kota = 'al;skjdfalsdhfa';
$t = 6;
$p->setFillColor(230, 230, 0);
while ($w = _fetch_array($r)) {
if ($kota != $w['Kota']) {
$kota = $w['Kota'];
$p->Ln($t);
$p->SetFont('Helvetica', 'BI', 12);
$p->Cell($lbr, $t, "Kota/Kabupaten: {$kota}", 'B', 1, 'C');
$prd = 'a;lsdkjfa;sdflkj';
}
if ($prd != $w['ProdiID']) {
$prd = $w['ProdiID'];
$NamaProdi = GetaField('prodi', "KodeID='" . KodeID . "' and ProdiID", $prd, 'Nama');
$p->SetFont('Helvetica', 'B', 10);
$p->Cell($lbr, $t, $NamaProdi, 'B', 1, '', true);
BikinHeadernya($p);
}
$p->SetFont('Helvetica', '', 9);
$p->Cell(20, $t, $w['MhswID'], 'B', 0);
$p->Cell(60, $t, $w['NamaMhsw'], 'B', 0);
$p->Cell(12, $t, $w['IP'], 'B', 0, 'R');
$p->Cell(30, $t, $w['Predikat'], 'B', 0);
$p->Cell(68, $t, $w['Prasyarat'], 'B', 0);
$p->Ln($t);
}
}
function BuatIsinya($p)
{
global $lbr;
$s = "select w.MhswID, w.Judul, w.Predikat, w.Prasyarat, \r\n m.IPK, m.ProdiID, m.Nama as NamaMhsw\r\n from wisudawan w\r\n left outer join mhsw m on w.MhswID = m.MhswID and m.KodeID = '" . KodeID . "'\r\n where w.KodeID = '" . KodeID . "'\r\n and w.TahunID = '{$_SESSION['TahunID']}'\r\n order by m.ProdiID, w.MhswID";
$r = _query($s);
$prd = ';alskdjf;asd';
$t = 6;
while ($w = _fetch_array($r)) {
if ($prd != $w['ProdiID']) {
$prd = $w['ProdiID'];
$NamaProdi = GetaField('prodi', "KodeID='" . KodeID . "' and ProdiID", $prd, 'Nama');
$p->SetFont('Helvetica', 'B', 10);
$p->Cell($lbr, $t, $NamaProdi, 'B', 1);
BikinHeadernya($p);
}
$p->SetFont('Helvetica', '', 9);
$p->Cell(20, $t, $w['MhswID'], 'B', 0);
$p->Cell(60, $t, $w['NamaMhsw'], 'B', 0);
$p->Cell(12, $t, $w['IPK'], 'B', 0, 'R');
$p->Cell(30, $t, $w['Predikat'], 'B', 0);
$p->Cell(68, $t, $w['Prasyarat'], 'B', 0);
$p->Ln($t);
}
}
