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(); }