function JdwlSav()
{
$md = $_REQUEST['md'];
$JadwalID = $_REQUEST['JadwalID'];
$JadwalRef = $_REQUEST['JadwalRef'];
$KodeID = $_SESSION['KodeID'];
$TahunID = $_SESSION['tahun'];
// array prodi
$arrProdiID = $_REQUEST['ProdiID'];
$ProdiID = empty($arrProdiID) ? '' : '.' . implode('.', $arrProdiID) . '.';
// array program
$arrProgramID = $_REQUEST['ProgramID'];
$ProgramID = empty($arrProgramID) ? '' : '.' . implode('.', $arrProgramID) . '.';
$NamaKelas = $_REQUEST['NamaKelas'];
$MKID = $_REQUEST['MKID'];
$matakuliah = GetFields('mk', 'MKID', $MKID, '*');
$JadwalJenisID = $_REQUEST['JadwalJenisID'];
$MKKode = $matakuliah['MKKode'];
$Nama = $matakuliah['Nama'];
$HariID = $_REQUEST['HariID'];
$JamMulai = $_REQUEST['JamMulai'];
$JamSelesai = $_REQUEST['JamSelesai'];
$SKSAsli = $matakuliah['SKS'];
$SKS = empty($_REQUEST['SKS']) ? $SKSAsli : $_REQUEST['SKS'];
$DosenID = $_REQUEST['DosenID'];
$RencanaKehadiran = $_REQUEST['RencanaKehadiran'] + 0;
$Kehadiran = $_REQUEST['Kehadiran'] + 0;
$JumlahMhsw = $_REQUEST['JumlahMhsw'];
$RuangID = $_REQUEST['RuangID'];
$HargaStandar = empty($_REQUEST['HargaStandar']) ? 'N' : $_REQUEST['HargaStandar'];
$Harga = $_REQUEST['Harga'];
$NA = empty($_REQUEST['NA']) ? 'N' : $_REQUEST['NA'];
// Simpan
if ($md == 0) {
$s = "update jadwal set JadwalRef='{$JadwalRef}',\r\n ProdiID='{$ProdiID}', ProgramID='{$ProgramID}', NamaKelas='{$NamaKelas}', MKID='{$MKID}',\r\n JadwalJenisID='{$JadwalJenisID}', MKKode='{$MKKode}', Nama='{$Nama}',\r\n HariID='{$HariID}', JamMulai='{$JamMulai}', JamSelesai='{$JamSelesai}',\r\n SKSAsli='{$SKSAsli}', SKS='{$SKS}', DosenID='{$DosenID}',\r\n RencanaKehadiran='{$RencanaKehadiran}', RuangID='{$RuangID}',\r\n HargaStandar='{$HargaStandar}', Harga='{$Harga}', NA='{$NA}'\r\n where JadwalID='{$JadwalID}' ";
$r = _query($s);
DftrJdwl();
} else {
$s = "insert into jadwal (JadwalRef, ProdiID, ProgramID, KodeID, TahunID,\r\n NamaKelas, MKID, JadwalJenisID, MKKode, Nama,\r\n HariID, JamMulai, JamSelesai,\r\n SKSAsli, SKS, DosenID,\r\n RencanaKehadiran, RuangID,\r\n HargaStandar, Harga, NA)\r\n values ('{$JadwalRef}', '{$ProdiID}', '{$ProgramID}', '{$KodeID}', '{$TahunID}',\r\n '{$NamaKelas}', '{$MKID}', '{$JadwalJenisID}', '{$MKKode}', '{$Nama}',\r\n '{$HariID}', '{$JamMulai}', '{$JamSelesai}',\r\n '{$SKSAsli}', '{$SKS}', '{$DosenID}',\r\n '{$RencanaKehadiran}', '{$RuangID}',\r\n '{$HargaStandar}', '{$Harga}', '{$NA}') ";
$r = _query($s);
TampilkanPesan("Sudah Disimpan. <hr size=1 color=silver>");
DftrJdwl();
}
}
function JdwlTtp1()
{
$JadwalID = $_REQUEST['JadwalID'];
$jdwl = GetFields('jadwal', 'JadwalID', $JadwalID, '*');
// Parameter
$NoSurat = sqling($_REQUEST['NoSurat']);
$Tgl = "{$_REQUEST['Tgl_y']}-{$_REQUEST['Tgl_m']}-{$_REQUEST['Tgl_d']}";
$Keterangan = sqling($_REQUEST['Keterangan']);
// Tutup
$st = "insert into jadwaltutup (TahunID, ProgramID, ProdiID,\r\n JadwalID, MKID, MKKode, Nama, DosenID,\r\n NamaKelas, JenisJadwalID, \r\n HariID, JamMulai, JamSelesai,\r\n NoSurat, Tanggal, Keterangan,\r\n LoginBuat, TanggalBuat)\r\n values ('{$jdwl['TahunID']}', '{$jdwl['ProgramID']}', '{$jdwl['ProdiID']}',\r\n '{$JadwalID}', '{$jdwl['MKID']}', '{$jdwl['MKKode']}', '{$jdwl['Nama']}', '{$jdwl['DosenID']}',\r\n '{$jdwl['NamaKelas']}', '{$jdwl['JenisJadwalID']}',\r\n '{$jdwl['HariID']}', '{$jdwl['JamMulai']}', '{$jdwl['JamSelesai']}',\r\n '{$NoSurat}', '{$Tgl}', '{$Keterangan}',\r\n '{$_SESSION['_Login']}', now())";
$rt = _query($st);
// set semua krs menjadi tutup
echo "<p>KRS Mahasiswa yg dibatalkan:</p>";
echo "<ol>";
$s = "select * from krs where JadwalID={$JadwalID}";
$r = _query($s);
while ($w = _fetch_array($r)) {
// batalkan KRS
$sk = "update krs set StatusKRSID='M', NA='Y', CatatanError='Jadwal dihapus'\r\n where KRSID={$w['KRSID']} ";
$rk = _query($sk);
// update pembayaran
$_REQUEST['khsid'] = $w['KHSID'];
$_REQUEST['mhswid'] = $w['MhswID'];
$_REQUEST['pmbmhswid'] = 1;
PrcBIPOTSesi();
echo "<li>{$w['MhswID']}</li>";
}
echo "</ol>";
// Hapus
$sh = "update jadwal set NA='Y' where JadwalID={$JadwalID} ";
$rh = _query($sh);
DftrJdwl();
}
function JdwlDel1()
{
$s = "delete from jadwal where JadwalID='{$_REQUEST['JadwalID']}' ";
$r = _query($s);
DftrJdwl();
}
function JdwlTutup1()
{
echo "TUTUP";
DftrJdwl();
}
