Semalam ditemenin om moel, ma shandy gw naikin data peserta ujian saringan masuk yang dah lulus biar bisa diakses dari web n berjalan dengan lancar tanpa hambatan huehuehuehue... giliran software registrasi ulangnya di jalanin beuuuhhhh, data pembayaran gak keluar cing... waduh berabe neh... berhubung neh program bukan gw yang buat akhirnya tracing dehhhh (seperti biasa)... sampai jam 11 malam tuh program blm jalan2 juga ampe om moel dah gak tenang n berniat membuat software yang baru (susah coy, beberapa jam lagi tuh software kudu dipake hehehehehehe)... akhirnya setelah tracing sana sini kayak ngejar maling ketahuan dah troublenya di mana n tinggal bikin script troubleshooting, jalan deh... Om moel bisa tenang skrg n bisa bobo dgn nyenyak hehehehehe... Berikut script yang menyelamatkan muka, kinerja dan integritas kantor gw... Smoga bisa dilihat dan dihargai perdjoangan kita-kita di IT. (minus si "itu").. Soalnya dengan apa yang kita dapat selalu berbanding terbalik dengan apa yang kita berikan hehehehehehe... ini hanya salah satunya... Finish jam 00.00... dengan menghabiskan bergelas-gelas kopi dan kawan-kawan... hehehehehehe...
Berikut script penyelamat tersebut :
//SQL lulus
$sqllulus = "select * from ****** where tahun='2009' and gelombang='1'";
$hasillulus = mysql_query($sqllulus,$mysql);
while($datalulus = mysql_fetch_array($hasillulus)){
// Get data from master
$sqlpmb = "select *,year(tgl) as tahun, day(tgl_lahir) as tgllahir, month(tgl_lahir) as bulanlahir, year(tgl_lahir) as tahunlahir from ****** where year(tgl) = '2009' and no_usm = '$datalulus[no_usm]'";
$hasilpmb = mysql_query($sqlpmb,$mysql);
$datapmb = mysql_fetch_array($hasilpmb);
//insert into ******
$sqlins01 = "insert into ******(thn,no_usm,nm_mahasiswa,kd_agama,tpt_lahir,tgl_lahir,kd_jenis_kelamin,warga_negara,gol_darah,status_diterima,prodi_diterima) values ('$datapmb[tahun]','$datapmb[no_usm]','$datapmb[nama]','$datapmb[agama]','$datapmb[tmp_lahir]','$datapmb[tgl_lahir]','$datapmb[kelamin]','','$datapmb[gol_darah]','1','$datalulus[kd_jurusan]')";
$hasilins01 = mssql_query($sqlins01,$mssql);
//insert into ******_alamat
$sqlins02 = "insert into ******_alamat (thn,no_usm,alamat_asal,kota_asal,prop_asal,kdpos_asal,tlp_asal,fax_asal) values ('$datapmb[tahun]','$datapmb[no_usm]','$datapmb[alamat]','$datapmb[kota]','$datapmb[propinsi]','$datapmb[kodepos]','$datapmb[telepon]','')";
$hasilins02 = mssql_query($sqlins02,$mssql);
//insert into ******_asal_sekolah
$sqlins03 = "insert into ******_asal_sekolah (thn,no_usm,thn_lulus,asal_sekolah,jurusan_sekolah,alamat_sekolah,kota_sekolah,prop_sekolah,kdpos_sekolah,tlp_sekolah,fax_sekolah,no_sttb,nilai_sttb,nilai_nem,asal_npm,asal_pti,asal_jenjang,asal_prodi,sks_diakui) values ('$datapmb[tahun]','$datapmb[no_usm]','$datapmb[aka_lulus]','$datapmb[sekolah_asal]','$datapmb[sekolah_jurusan]','$datapmb[sekolah_alamat]','$datapmb[sekolah_kota]','$datapmb[sekolah_propinsi]','$datapmb[sekolah_kodepos]','','','$datapmb[aka_sttb]','$datapmb[aka_jml_sttb]','','','','','','')";
$hasilins03 = mssql_query($sqlins03,$mssql);
//insert into ******_formulir
$sqlbeli = "select tgl from pmb_pembelian where no_usm = '$datapmb[no_usm]'";
$hasilbeli = mysql_query($sqlbeli,$mysql);
$databeli = mysql_fetch_array($hasilbeli);
$sqlins04 = "insert into ******_formulir (thn,no_usm,gelombang,nm_pembeli,tlp_pembeli,tgl_terjual,tgl_kembali) values ('$datapmb[tahun]','$datapmb[no_usm]','$datapmb[gelombang]','$datapmb[nama]','$datapembeli[telepon]','$databeli[tgl]','$datapmb[tgl]')";
$hasilins04 = mssql_query($sqlins04,$mssql);
//insert into ******_orang_tua
$sqlref = "select referensi from pmb_pembelian where no_usm = '$datapmb[no_usm]'";
$hasilref = mysql_query($sqlref,$mysql);
$dataref = mysql_fetch_array($hasilref);
$sqlins05 = "insert into ******_orang_tua (thn,no_usm,nm_orang_tua,alamat_orang_tua,kota_orang_tua,prop_orang_tua,kdpos_orang_tua,tlp_orang_tua,ibu_kandung,nm_referensi,alamat_referensi,no_referensi,tlp_referensi,hub_referensi) values ('$datapmb[tahun]','$datapmb[no_usm]','$datapmb[ortu_nama]','$datapmb[ortu_alamat]','$datapmb[kota]','$datapmb[propinsi]','$datapmb[kodepos]','$datapmb[telepon]','$datapmb[ibu_kandung]','$dataref[referensi]','','','','')";
$hasilins05 = mssql_query($sqlins05,$mssql);
//insert into ******_pilihan
for($i=1;$i<=3;$i++){ $pilihan = $datapmb['pilihan'.$i]; $sumbangan = $datapmb['sumbangan'.$i]; $sqlins06 = "insert into ******_pilihan (thn,no_usm,pilihan,kd_prodi,sumbangan) values ('$datapmb[tahun]','$datapmb[no_usm]','$i','$pilihan','$sumbangan')"; $hasilins06 = mssql_query($sqlins06,$mssql); } //insert into ******.tt_mhsbayarwajib $sqlrinci = "select PRinciID,tgljtempo from ******.dbo.tm_pasalrincian where kd_prodi = '$datalulus[kd_jurusan]' and angkatan = '$datalulus[tahun]' and gelombang = '$datapmb[gelombang]'"; $hasilrinci = mssql_query($sqlrinci,$mssql); $datarinci = mssql_fetch_array($hasilrinci); $sqlttlwajib = "select sum(valpasal) as ttlwajib from ******.dbo.tm_pasalrinciandet where princiid = '$datarinci[0]'"; $hasilttlwajib = mssql_query($sqlttlwajib,$mssql); $datattlwajib = mssql_fetch_array($hasilttlwajib); $sqlsukarela = "select sumbangan from ******_pilihan where no_usm = '$datalulus[no_usm]' and kd_prodi = '$datalulus[kd_jurusan]'"; $hasilsukarela = mssql_query($sqlsukarela,$mssql); $datasukarela = mssql_fetch_array($hasilsukarela); $sqlmhswajib = "insert into ******.dbo.tt_mhsbayarwajib (npm,usm,smtr,thn,princiid,tgljtempo,ttlwajib,ttlbayar,sisa,gelombang,usukarela) values ('0','$datalulus[no_usm]','1','$datalulus[tahun]','$datarinci[0]','$datarinci[1]','$datattlwajib[0]','0','0','$datalulus[gelombang]','$datasukarela[0]')"; $hasilmhswajib = mssql_query($sqlmhswajib,$mssql); //insert into ******.tt_mhsbayar //insert into ******_pilihan_awal //$sqlins07 = "insert into ******_pilihan_awal (thn,no_usm,) values ('$datapmb[tahun]','$datapmb[no_usm]')"; //$hasilins07 = mssql_query($sqlins07,$mssql); } echo "Transfer Successfull...";
Demikian script ini dibuat agar dapat digunakan dengan bebas... Semoga bisa dihargai perdjoangan om shandy, om moel n om david... Minimal naik gaji ah...
Coba perhatikan bytes/sec-nye... Minus coy !!!... Mampus dah tuh downloadan... beresnya ntar tahun 1945... Gak tahu tuh napa inet di ktr akhir2 ini tambah parah... tanya kenapa ??? i don't know... tanya sapa ??? Ma Network Administrator-nye Dunk !!!.... Sampai2 si om rusdan bilang (di GTalk):
Coba perhatikan bytes/sec-nye... Minus coy !!!... Mampus dah tuh downloadan... beresnya ntar tahun 1945... Gak tahu tuh napa inet di ktr akhir2 ini tambah parah... tanya kenapa ??? i don't know... tanya sapa ??? Ma Network Administrator-nye Dunk !!!.... Sampai2 si om rusdan bilang (di GTalk):
