function ApplyOtomatis()
{
$Pilihan = $_REQUEST['Pilihan'];
$JumlahMahasiswa = $_REQUEST['JumlahMahasiswa'];
$CheckKelamin = $_REQUEST['CheckKelamin'];
$CheckProdi = $_REQUEST['CheckProdi'];
$CheckNilai = $_REQUEST['CheckNilai'];
if (!empty($Pilihan)) {
// Buat Array untuk Prodi
$s = "select ProdiID from prodi where KodeID='" . KodeID . "'";
$r = _query($s);
while ($w = _fetch_array($r)) {
$prodilist[] = $w[ProdiID];
}
$JumlahProdi = _num_rows($r);
// Buat Array untuk Kelamin
$kelaminlist = array('P', 'W');
$countMahasiswa = 0;
foreach ($Pilihan as $terpilih) {
$KapasitasSkrg = GetaField('matrikulasi', "MatriID='{$terpilih}' and KodeID", KodeID, 'KapasitasSekarang');
$Kapasitas = GetaField('matrikulasi', "MatriID='{$terpilih}' and KodeID", KodeID, 'KapasitasMaksimum');
if ($KapasitasSkrg < $Kapasitas) {
$count = $KapasitasSkrg;
while ($count < $Kapasitas) {
//echo "$count.";
if ($countMahasiswa == $JumlahMahasiswa) {
break;
}
if ($count % $JumlahProdi == 0) {
$prodilist = ShuffleArray($prodilist, $JumlahProdi, 12);
$kelaminlist = ShuffleArray($kelaminlist, 2, 5);
}
$tahunstring = empty($_SESSION['matri_tahun_filter']) ? "" : "and TahunID='{$_SESSION['matri_tahun_filter']}'";
$nilaistring = "and NilaiUjian>='{$_SESSION['nilai_dari']}' and NilaiUjian<='{$_SESSION['nilai_sampai']}'";
$kelaminstring = empty($_SESSION['kelamin_by']) ? "" : "and Kelamin='{$_SESSION['kelamin_by']}'";
$prodistring = empty($_SESSION['prodi']) ? "" : "and ProdiID='{$_SESSION['prodi']}'";
if ($CheckNilai == 'TopScore') {
$nilaiorder = "order by NilaiUjian DESC";
// Cari nilai Ujian yang Maksimum
$s = "select MhswID, NilaiUjian\tfrom mhsw\r\n\t\t\t\t\t\t\t\t\twhere KodeID='" . KodeID . "' and MatriID='0' {$kelaminstring} {$prodistring} {$nilaistring} {$tahunstring} {$nilaiorder} \r\n\t\t\t\t\t\t\t ";
$r = _query($s);
$w = _fetch_array($r);
$nilaistring = "and NilaiUjian='{$w['NilaiUjian']}'";
}
if ($CheckKelamin == 'HalfHalf') {
$countkelamin = $count % 2;
$kelaminstring = "and Kelamin='{$kelaminlist[$countkelamin]}'";
}
if ($CheckProdi == 'Evenly') {
$countprodi = $count % $JumlahProdi;
$prodistring = "and ProdiID='{$prodilist[$countprodi]}'";
}
// List semua mahasiswa yang memenuhi kriteria
$s = "select MhswID\r\n\t\t\t\t\t\t\tfrom mhsw\r\n\t\t\t\t\t\t\t\twhere KodeID='" . KodeID . "' and MatriID='0' {$kelaminstring} {$prodistring} {$nilaistring} {$tahunstring} {$nilaiorder}\r\n\t\t\t\t\t\t ";
$r = _query($s);
$n = _num_rows($r);
if ($n != 0) {
//select one of the entries at random
$random = rand(0, $n - 1);
$s = "select MhswID\r\n\t\t\t\t\t\t\tfrom mhsw\r\n\t\t\t\t\t\t\t\twhere KodeID='" . KodeID . "' and MatriID='0' {$kelaminstring} {$prodistring} {$nilaistring} {$tahunstring} {$nilaiorder}\r\n\t\t\t\t\t\t\t\tlimit {$random}, 1";
$r = _query($s);
$w = _fetch_array($r);
//echo "Try random $random, Put $w[MhswID] to $terpilih<br>";
$ss = "update mhsw set MatriID='{$terpilih}' where MhswID = '{$w['MhswID']}'";
$rr = _query($ss);
$sss = "select MhswID from `mhsw` where MatriID='{$terpilih}'";
$rrr = _query($sss);
$nnn = _num_rows($rrr);
$ss = "update matrikulasi set KapasitasSekarang='{$nnn}' where MatriID='{$terpilih}'";
$rr = _query($ss);
$count++;
$countMahasiswa++;
} else {
$count++;
$Kapasitas++;
}
//echo "<br>";
}
}
if ($countMahasiswa == $JumlahMahasiswa) {
break;
}
}
}
ClosingScript();
}
function WawancaraSav()
{
$md = $_REQUEST['md'] + 0;
$wid = $_REQUEST['wid'];
$Tanggal = "{$_REQUEST['Tanggal_y']}-{$_REQUEST['Tanggal_m']}-{$_REQUEST['Tanggal_d']}";
$JamMulaiWawancara = "{$_REQUEST['JamMulai_h']}:{$_REQUEST['JamMulai_n']}";
$JamSelesaiWawancara = "{$_REQUEST['JamSelesai_h']}:{$_REQUEST['JamSelesai_n']}";
$Pewawancara = $_REQUEST['Pewawancara'];
$Pewawancara2 = $_REQUEST['Pewawancara2'];
$NoPMB = $_REQUEST['NoPMB'];
$WNama = sqling($_REQUEST['WNama']);
$JenisPendamping = $_REQUEST['JenisPendamping'];
$NamaPendamping = sqling($_REQUEST['NamaPendamping']);
$AnakKe = $_REQUEST['AnakKe'] + 0;
$DariKe = $_REQUEST['DariKe'] + 0;
$PekerjaanPendamping = sqling($_REQUEST['PekerjaanPendamping']);
$CatatanKeluarga = sqling($_REQUEST['CatatanKeluarga']);
$BeratBadan = $_REQUEST['BeratBadan'] + 0;
$TinggiBadan = $_REQUEST['TinggiBadan'] + 0;
$Cacat = $_REQUEST['Cacat'];
$KeteranganCacat = sqling($_REQUEST['KeteranganCacat']);
$CheckRokok = $_REQUEST['CheckRokok'];
$CheckMiras = $_REQUEST['CheckMiras'];
$CheckNarkoba = $_REQUEST['CheckNarkoba'];
$CheckJudi = $_REQUEST['CheckJudi'];
$KecanduanLainnya = sqling($_REQUEST['KecanduanLainnya']);
$KegiatanSetelahKelulusan = sqling($_REQUEST['KegiatanSetelahKelulusan']);
$AlasanMasuk = sqling($_REQUEST['AlasanMasuk']);
$Harapan = sqling($_REQUEST['Harapan']);
$HarapanPendamping = sqling($_REQUEST['HarapanPendamping']);
$SaranProgram = $_REQUEST['SaranProgram'];
$Keuangan = $_REQUEST['Keuangan'];
$RencanaPembayaran = sqling($_REQUEST['RencanaPembayaran']);
$PatuhTataTertib = $_REQUEST['PatuhTataTertib'];
$CatatanAkhir = sqling($_REQUEST['CatatanAkhir']);
$Proporsional = $_REQUEST['Proporsional'];
$Mengganggu = $_REQUEST['Mengganggu'];
$Membahayakan = $_REQUEST['Membahayakan'];
$Rasional1 = $_REQUEST['Rasional1'];
$Rasional2 = $_REQUEST['Rasional2'];
$Rasional3 = $_REQUEST['Rasional3'];
$Rasional4 = $_REQUEST['Rasional4'];
$Rekomendasi = $_REQUEST['Rekomendasi'];
$gelombang = GetaField('pmbperiod', "KodeID='" . KodeID . "' and NA", 'N', "PMBPeriodID");
// Save data
if ($md == 0) {
$s = "update `wawancara`\r\n\t\t\tset Tanggal = '{$Tanggal}', JamMulaiWawancara = '{$JamMulaiWawancara}', JamSelesaiWawancara = '{$JamSelesaiWawancara}',\r\n\t\t\t\tPewawancara = '{$Pewawancara}', Pewawancara2 = '{$Pewawancara2}',\r\n\t\t\t\tJenisPendamping = '{$JenisPendamping}', NamaPendamping = '{$NamaPendamping}', AnakKe = '{$AnakKe}', \r\n\t\t\t\tDariKe = '{$DariKe}', PekerjaanPendamping = '{$PekerjaanPendamping}', \r\n\t\t\t\tCatatanKeluarga = '{$CatatanKeluarga}', BeratBadan = '{$BeratBadan}', TinggiBadan = '{$TinggiBadan}',\r\n\t\t\t\tCacat = '{$Cacat}', KeteranganCacat = '{$KeteranganCacat}',\r\n\t\t\t\tCheckRokok = '{$CheckRokok}', CheckMiras = '{$CheckMiras}', CheckNarkoba = '{$CheckNarkoba}',\r\n\t\t\t\tCheckJudi = '{$CheckJudi}', KecanduanLainnya = '{$KecanduanLainnya}', \r\n\t\t\t\tKegiatanSetelahKelulusan = '{$KegiatanSetelahKelulusan}', AlasanMasuk = '{$AlasanMasuk}', Harapan = '{$Harapan}',\r\n\t\t\t\tHarapanPendamping = '{$HarapanPendamping}', \r\n\t\t\t\tSaranProgram = '{$SaranProgram}', Keuangan = '{$Keuangan}', RencanaPembayaran = '{$RencanaPembayaran}',\r\n\t\t\t\tPatuhTataTertib = '{$PatuhTataTertib}', CatatanAkhir = '{$CatatanAkhir}',\r\n\t\t\t\tProporsional = '{$Proporsional}', Mengganggu = '{$Mengganggu}', Membahayakan = '{$Membahayakan}',\r\n\t\t\t\tRasional1 = '{$Rasional1}', Rasional2 = '{$Rasional2}', Rasional3 = '{$Rasional3}', Rasional4 = '{$Rasional4}',\r\n\t\t\t\tHasilWawancara = '{$Rekomendasi}', TanggalEdit=now(), LoginEdit='{$_SESSION['_Login']}'\r\n\t\t\twhere WawancaraID = '{$wid}' ";
$r = _query($s);
} else {
if ($md == 1) {
$s = "insert into `wawancara`\r\n\t\t\t\t(Tanggal, JamMulaiWawancara, JamSelesaiWawancara, Pewawancara, PMBID,\r\n\t\t\t\tPewawancara2, \r\n\t\t\t\tJenisPendamping, NamaPendamping, AnakKe, DariKe, \r\n\t\t\t\tPekerjaanPendamping, CatatanKeluarga, BeratBadan, TinggiBadan, \t\t\t\t\r\n\t\t\t\tCacat, KeteranganCacat, CheckRokok, CheckMiras, CheckNarkoba, \r\n\t\t\t\tCheckJudi, KecanduanLainnya, KegiatanSetelahKelulusan, AlasanMasuk, \r\n\t\t\t\tHarapan, HarapanPendamping, SaranProgram, Keuangan, \r\n\t\t\t\tRencanaPembayaran, PatuhTataTertib, CatatanAkhir,\r\n\t\t\t\tProporsional, Mengganggu, Membahayakan,\r\n\t\t\t\tRasional1, Rasional2, Rasional3, Rasional4,\r\n\t\t\t\tHasilWawancara, KodeID, PMBPeriodID, TanggalBuat, LoginBuat)\r\n\t\t\t\tvalues ('{$Tanggal}', '{$JamMulaiWawancara}', '{$JamSelesaiWawancara}', '{$Pewawancara}', '{$NoPMB}', \r\n\t\t\t\t'{$Pewawancara2}', \r\n\t\t\t\t'{$JenisPendamping}', '{$NamaPendamping}', '{$AnakKe}', '{$DariKe}',\r\n\t\t\t\t'{$PekerjaanPendamping}', '{$CatatanKeluarga}', '{$BeratBadan}', '{$TinggiBadan}', \r\n\t\t\t\t'{$Cacat}', '{$KeteranganCacat}', '{$CheckRokok}', '{$CheckMiras}', '{$CheckNarkoba}', \r\n\t\t\t\t'{$CheckJudi}', '{$KecanduanLainnya}', '{$KegiatanSetelahKelulusan}', '{$AlasanMasuk}', \r\n\t\t\t\t'{$Harapan}', '{$HarapanPendamping}', '{$SaranProgram}', '{$Keuangan}', \r\n\t\t\t\t'{$RencanaPembayaran}', '{$PatuhTataTertib}', '{$CatatanAkhir}',\r\n\t\t\t\t'{$Proporsional}', '{$Mengganggu}', '{$Membahayakan}',\r\n\t\t\t\t'{$Rasional1}', '{$Rasional2}', '{$Rasional3}', '{$Rasional4}',\r\n\t\t\t\t'{$Rekomendasi}', '" . KodeID . "', '{$gelombang}', now(), '{$_SESSION['_Login']}')\t\r\n\t\t\t";
$r = _query($s);
}
}
echo Konfirmasi("Berhasil", "Data berhasil disimpan.<br>");
ClosingScript();
}
