function Cetak()
{
global $_HeaderPrn, $_lf;
$mhswid = $_REQUEST['mhswid'];
$mhsw = GetFields("mhsw m\n left outer join program prg on m.ProgramID=prg.ProgramID\n left outer join prodi prd on m.ProdiID=prd.ProdiID\n left outer join fakultas f on prd.FakultasID=f.FakultasID", 'm.MhswID', $mhswid, "m.MhswID, m.Nama, m.TempatLahir, m.TanggalLahir, m.PenasehatAkademik, \n m.Alamat, m.Kota, m.KodePos, \n m.ProdiID, m.ProgramID, m.BIPOTID,\n prd.Nama as PRD, prg.Nama as PRG, f.Nama as FAK");
$tahun = $_REQUEST['tahun'];
$khsid = $_REQUEST['khsid'];
$khs = GetFields("khs", 'KHSID', $khsid, '*');
//if ($khs['Cetak'] == 'N') CetakKSS1($tahun, $mhsw, $khs);
//else GagalCetak($mhsw, $khs);
// Hapus Data KRS
HapusKRS($tahun, $mhsw, $khs);
// Import dari KRSTEMP
ImportKRS($tahun, $mhsw, $khs);
CetakKSS1($tahun, $mhsw, $khs);
}
function SetKHSAktif($khsid, $mhswid, $tahun)
{
//$khsid = $_REQUEST['khsid'];
$khs = GetFields('khs', 'KHSID', $khsid, '*');
$stm = GetFields('statusmhsw', 'StatusMhswID', $khs['StatusMhswID'], '*');
if ($stm['Nilai'] == 0) {
} else {
$status = $khs['StatusMhswID'] != 'A' ? ", StatusMhswID='A' " : '';
// Set kalau sudah dicetak
$s = "update khs set Cetak='Y', KaliCetak=KaliCetak+1 {$status}\r\n where KHSID='{$khsid}'";
$r = _query($s);
}
$sb = "update bipotmhsw set Draft='N' \r\n where MhswID='{$mhswid}' and TahunID='{$tahun}' and Draft='Y' ";
$rb = _query($sb);
HapusKRS($tahun, $mhswid, $khsid);
ImportKRS($tahun, $mhswid, $khsid);
}