25. = 1){ //Seandainya bantu_relasi tidak kosong //SQL ambil data pertanyaan yang tidak ada di dalam //tabel bantu pertanyaan (NOT IN....) 30. $sqlg="SELECT pertanyaan.* FROM pertanyaan,bantu_relasi WHERE pertanyaan.id_pertanyaan=bantu_relasi.id_pertanyaan AND bantu_relasi.id_br=$ID AND NOT bantu_relasi.id_pertanyaan IN(SELECT id_pertanyaan FROM bantu_pertanyaan WHERE id_bp=$ID) ORDER BY pertanyaan.id_pertanyaan LIMIT 1";
143
31. $qryg=mysql_query($sqlg); 32. $datag=mysql_fetch_array($qryg); 33. $idpertanyaan=$datag['id_pertanyaan']; 34. $pertanyaan=$datag['pernyataan']; 35. }else{ //Seandainya tabel bantu kosong //Ambil data pertanyaan dari tabel pertanyaan 36. $sqlg="SELECT * FROM pertanyaan ORDER BY id_pertanyaan LIMIT 1"; 37. $qryg=mysql_query($sqlg); 38. $datag=mysql_fetch_array($qryg); 39. $idpertanyaan=$datag['id_pertanyaan']; 40. $pertanyaan=$datag['pernyataan']; 41. }?> 42.
'; $hsl_pertanyaan1 = ""; $sql2="SELECT pernyataan FROM bantu_relasi,pertanyaan WHERE bantu_relasi.id_pertanyaan = pertanyaan.id_pertanyaan"; $qry2=mysql_query($sql2); while($hsl_pertanyaan=mysql_fetch_array($qry2)){ $hsl_pertanyaan1 .= $hsl_pertanyaan['pernyataan'] .', ';} //PERINTAH UNTUK MEMINDAHKAN DATA $sql_in='INSERT INTO hasil (id_tipe, nama_tipe, descr, subtipe1, subtipe2, subtipe3, pengaruh, pergaulan, dukungan, karir, saran, tokoh) VALUES ("'.$data["id_tipe"].'", "'.$data["nama_tipe"].'", "'.$data["descr"].'", "'.$data["subtipe1"].'", "'.$data["subtipe2"].'", "'.$data["subtipe3"].'", "'.$data["pengaruh"].'", "'.$data["pergaulan"].'", "'.$data["dukungan"].'", "'.$data["karir"].'", "'.$data["saran"].'", "'.$data["tokoh"].'", "'.$datap["id_user"].'", "'.$datap["nama"].'", "'.$datap["telepon"].'")'; mysql_query($sql_in);}} //REDIREKSI SETELAH PEMINDAHAN DATA echo "<meta http-equiv='refresh' content='0; url=hasil.php'>"; exit;} #FUNGSI UNTUK MENAMBAH BANTU RELASI function AddBantuRelasi($idpertanyaan, $ID){ //SQL untuk ambil data relasi dengan ketentuan //id_tipe=id tipe yang ada di dalam Bantu Tipe //Query dilakukan pada ID yang sesuai $sql_tipe= "SELECT relasi.* FROM relasi,bantu_tipe WHERE relasi.id_tipe=bantu_tipe.id_tipe AND id_bt=$ID ORDER BY relasi.id_tipe,relasi.id_pertanyaan"; $qry_tipe=mysql_query($sql_tipe); while ($data_tipe=mysql_fetch_array($qry_tipe)){ //Data yang didapatkan dari Query di atas //Dimasukkan ke dalam bantu_relasi
146
50.
51. 52. 53. 54. 55. 56. 57.
58. 59. 60. 61. 62.
63.
64. 65. 66.
67. 68. 69.
70. 71. 72. 73. 74.
$sqlbnt='INSERT INTO bantu_relasi (id_br, id_tipe, id_pertanyaan) VALUES ('.$ID.', "'.$data_tipe["id_tipe"].'", "'.$data_tipe["id_pertanyaan"].'")'; mysql_query($sqlbnt);}} #FUNGSI UNTUK MENGOSONGKAN TABEL BANTU TIPE function DelBantuTipe($ID){ $sql_del="DELETE FROM bantu_tipe WHERE id_bt=$ID"; mysql_query($sql_del);} #FUNGSI UNTUK MENGOSONGKAN TABEL BANTU RELASI function DelBantuRelasi($ID){ $sql_del="DELETE FROM bantu_relasi WHERE id_br=$ID"; mysql_query($sql_del);} ## PEMERIKSAAN JAWABAN PENELUSURAN 1 ## APABILA PILIH JAWABAN YA/BENAR if ($RbPilih=="YA"){ // Periksa apakah ada data di bantu_relasi $sql_analisis="SELECT * FROM bantu_relasi WHERE id_br=$ID"; $qry_analisis=mysql_query($sql_analisis,$koneksi); $data_cek=mysql_num_rows($qry_analisis); if ($data_cek >= 1){ #PERINTAH APABILA bantu_relasi TIDAK KOSONG //Kosongkan dulu daftar tipe DelBantuTipe($ID); //SQL Untuk mengambil data bantu_relasi //Yang ID pertanyaannya dipilih oleh Klien $sql_bnt="SELECT * FROM bantu_relasi WHERE id_pertanyaan='$idpertanyaan' AND id_br=$ID"; $qry_bnt=mysql_query($sql_bnt,$koneksi); while ($data_bnt=mysql_fetch_array($qry_bnt)){ // SQL untuk ambil data relasi yang // ID TIPE ada di dalam tabel bantu_relasi $sql_rtipe="SELECT * FROM relasi WHERE id_tipe='$data_bnt[id_tipe]' GROUP BY id_tipe"; $qry_rtipe=mysql_query($sql_rtipe); while ($data_rtipe=mysql_fetch_array($qry_rtipe)){ // Hasil Query di atas dipindahkan ke // Tabel BANTU_TIPE // Jadi, hanya tipe yng memungkinkan $sql_input='INSERT INTO bantu_tipe (id_bt, id_tipe) VALUES ('.$ID.', "'.$data_rtipe["id_tipe"].'")'; mysql_query($sql_input,$koneksi);}} //Memanggil fungsi DelBantuRelasi($ID); //Fungsi Mengisi data BANTU RELASI AddBantuRelasi($idpertanyaan, $ID); AddBantuPertanyaan($idpertanyaan, $ID);
147
75.
76. 77. 78.
79. 80. 81. 82. 83. 84. 85. 86.
87. 88. 89. 90. 91.
92. 93. 94. 95. 96.
}else{ #PERINTAH APABILA BANTU_RELASI MASIH KOSONG //SQL untuk mengambil data relasi yang ID pertanyaannya dipilih oleh Klien $sql_rpertanyaan="SELECT * FROM relasi WHERE id_pertanyaan='$idpertanyaan'"; $qry_rpertanyaan=mysql_query($sql_rpertanyaan); while ($data_rpertanyaan=mysql_fetch_array($qry_rpertanyaan)){ //Ambil data relasi yang Id_tipe sesuai dengan query sebelumnya (relasi) $sql_rtipe="SELECT * FROM relasi WHERE id_tipe='$data_rpertanyaan[id_tipe]' GROUP BY id_tipe"; $qry_rtipe=mysql_query($sql_rtipe); while ($data_rtipe=mysql_fetch_array($qry_rtipe)){ //Hasil dari Query disimpan dalam tabel bantu_tipe $sql_input='INSERT INTO bantu_tipe (id_bt, id_tipe) VALUES ('.$ID.', "'.$data_rtipe["id_tipe"].'")'; mysql_query($sql_input,$koneksi);}} //Fungsi menambah data ke BANTU RELASI AddBantuRelasi($idpertanyaan, $ID); //Fungsi menambah data ke BANTU PERTANYAAN AddBantuPertanyaan($idpertanyaan, $ID);} //Redireksi echo "<meta http-equiv='refresh' content='0; url=tes1.php'>";} ## PEMERIKSAAN JAWABAN PENELUSURAN 2 ## APABILA MEMILIH TOMBOL TIDAK if ($RbPilih=="TIDAK"){ //Ambil semua data dari BANTU_RELASI $sql_analisis="SELECT * FROM bantu_relasi WHERE id_br=$ID"; $qry_analisis=mysql_query($sql_analisis, $koneksi); $data_cek=mysql_num_rows($qry_analisis); if ($data_cek >= 1) { # APABILA DATA BANTU_RELASI TIDAK KOSONG # Hapus bantu_relasi yang tidak sesuai // Ambil data Id_tipe yang dipilih dari tabel bantu_relasi, syarat yang pertanyaannya telah terpilih $sql_relasi="SELECT * FROM bantu_relasi WHERE id_pertanyaan='$idpertanyaan' AND id_br=$ID"; $qry_relasi=mysql_query($sql_relasi, $koneksi); while ($hsl_relasi=mysql_fetch_array($qry_relasi)){ // Perintah hapus bantu_relasi dari data Id_tipe yang didapat $sql_delbnt="DELETE FROM bantu_relasi WHERE id_tipe='$hsl_relasi[id_tipe]' AND id_br=$ID"; mysql_query($sql_delbnt, $koneksi); // Hapus juga daftar tipe kepribadian dari tabel bantu_tipe syarat ikuti SQL di atas
$sql_delbnt2="DELETE FROM bantu_tipe WHERE id_tipe='$hsl_relasi[id_tipe]' AND id_bt=$ID"; mysql_query($sql_delbnt2, $koneksi);} }else { # APABILA DATA BANTU RELASI KOSONG # Pindahkan data relasi ke bantu_relasi // Ambil daftar data dulu dari relasi $sql_relasi="SELECT * FROM relasi ORDER BY id_tipe, id_pertanyaan"; $qry_relasi=mysql_query($sql_relasi, $koneksi); while ($hsl_relasi=mysql_fetch_array($qry_relasi)){ // Perintah SQL untuk memindah data ke bantu_relasi $sql_inbnt='INSERT INTO bantu_relasi(id_br, id_tipe, id_pertanyaan) VALUES ('.$ID.', "'.$hsl_relasi["id_tipe"].'", "'.$hsl_relasi["id_pertanyaan"].'")'; mysql_query($sql_inbnt, $koneksi); // Masukkan juga info tipe ke tabel bantu_tipe $sql_inbnt2='INSERT INTO bantu_tipe(id_bt, id_tipe) VALUES ('.$ID.', "'.$hsl_relasi["id_tipe"].'")'; mysql_query($sql_inbnt2, $koneksi);} # Hapus bantu_relasi yang tidak sesuai $sql_relasi2="SELECT * FROM relasi WHERE id_pertanyaan='$idpertanyaan'"; $qry_relasi2=mysql_query($sql_relasi2); while($hsl_relasi2=mysql_fetch_array($qry_relasi2)){ // Perintah hapus bantu_relasi $sql_delbnt="DELETE FROM bantu_relasi WHERE id_tipe='$hsl_relasi2[id_tipe]' AND id_br=$ID"; mysql_query($sql_delbnt, $koneksi); // Perintah hapus data bantu_tipe $sql_delbnt2="DELETE FROM bantu_tipe WHERE id_tipe='$hsl_relasi2[id_tipe]' AND id_bt=$ID"; mysql_query($sql_delbnt2, $koneksi);} } // Redireksi echo "<meta http-equiv='refresh' content='0; url=tes1.php'>";}?>
Enneagram 15.