18151673 Oracle PLSQL Study MaterialFull description
Descripción completa
plsql
ORACLE PLSQL Midterm SEM 2 3 SOLUTIONSFull description
Full description
PLSQLDescripción completa
Full description
plsqlFull description
Descripción: ORACLE
Full description
plsqlDescripción completa
Apuntes de PL SQLDescripción completa
Deskripsi lengkap
Description complète
Full description
Hal. 1 dari 5
Fakultas Teknologi Informasi Universitas Budi Luhur Ujian Akhir Semester Tahun Tahun Ajaran Genap 2012/2013 Mata Kuliah Kelom"ok (osen
: Oracle Fundamental PL/!L : KU TI #$%&&' : )endri Ira*an+ , Kom+ M,T,I, M,T,I,
Tanggal -aktu ifat
: elasa+ $. uni $%&0 : &$% Menit : Buka Buka 1ote 1oted d & Lem2 Lem2ar ar 34
a*a2lah soal ini #& #& 5 &% Bo2ot .%6': .%6': 1. Jela Jelask skan an fun funs sii dari dari COMMIT dan ROLLBACK Ja!a"an# $%mmit && 'erfunsi untuk memastikan transaksi kita "eru"ah se(ara permanen )%ll"a( )%ll"a(k k && 'erfuns 'erfunsii untuk untuk menem"a menem"alika likan n ke p%sisi a!al kita setelah (%mmit terdekat 2. Jela Jelask skan an persa persama maan an dan per" per"ed edaa aan n dari dari Ba Basi sic c Loop Loop #Loop'+ While While Loop+ For Loop Ja!a"an# 'asi( *%%p && diunakan jika statement didalam l%%p harus dieksekusi minimal satu kali +hile *%%p &&diunakan jika k%ndisi perlu di e,aluasi pada a!al setiap kali iterasi dilakukan -%r *%%p &&diunakan jika iterasi sudah diketahui 3. Jelask Jelaskan an apak apakah ah per"e per"edaa daan n antara antara !L denan !L denan PL/!L Ja!a"an# S*# &&dapat mem"uat data"ase relati%nal struktur &&"isa diunakan %leh 'As &&(%mmand mudah dipelajari &&dapat diterapkan di"er"aai 'S lain &&menampilkan simple/(%mple uer4 */S*# &&mudah dimenerti %leh setiap penuna &&dapa &&dapatt didesa didesain in khusus khusus untuk untuk data"a data"ase se %ra(le %ra(le dalam dalam menu menunak nakan an pr%r pr%ram am aplikasi &&dapat ditulis dalam "e"erapa "aris &&dapat "erupa nested "l%k &&6arakter dan literal diapit %leh tanda kutip 7. Jelask Jelaskan an per"ed per"edaan aan antara antara Function dan Procedure Ja!a"an# r%(edure# && merup merupaka akan n pr%se pr%sedur dur seper seperti ti su"pr su"pr%ra %ram m dalam dalam "ahasa "ahasa pem%r pem%rama aman n 4an 4an disimpan didalam data"ase && eksekusi akan le"ih (epat &&tidak ada k%mpilasi k%mpilasi && -un(ti%n# &&merupakan su"r%utine 4an diunakan untuk mem"uat transa(t8S* &&jika pr%(edure tidak "isa diunakan untuk men4impan hasil pr%ses sedankan pada fun(ti%n hasil dari pr%ses dapat dikem"alikan "erupa se"uah nilai atau ta"le. Jika di em%raman 9isual 'asi( maka per"edaann4a seperti antara fun(ti%n dan su". 5. :aut :aut% % (%m (%mmi mitt ; %<= %<= 3*al Transaksi Ta"le Ta"le )ei%ns )ei%ns enampilkan ta"le )ei%ns
Hal. 2 dari 5
Time
enam"ah data )ei%n id ; 5 nama ; Australias ave"oint to 3 enhapus seluruh re(%rd di ta"le )ei%ns 7oll2ack to 3 enu"ah data Australias menjadi Australia ave"oint to B enhapus data 4an >d )ei%nn4a 5 7oll2ack to 3 8ommit9 7oll2ack9 3khir Transaksi Tuliskan isi re(%rd apa saja 4an ada pada Ta"le )ei%ns setelah akhir transaksi diatas Ja!a"an#
TULIK31 SELECT STATEMENT U1TUK O3L 5 &% #;ntit< 8lass )7 "ada 3khir oal' ?. erintah untuk enam"ah re(%rd "aru di ta"le )ei%ns 4aitu Australia
Ja!a"an# >nsert int% rei%ns ,alues:5@Australia@= B. erintah untuk eru"ah n% telep%n kar4a!an 102 menjadi 515.123.1237 Se"elum
Sesudah
Ja!a"an# Update empl%4ees set HCDEFDU'E);@515.123.1237@ !here empl%4eeFid;@102@ . erintah untuk enhapus data rei%n di ta"le )ei%ns 4an tidak memiliki hu"unan atau tidak ada :rei%nFid= di ta"le (%untries Ja!a"an# elete fr%m rei%ns !here rei%nFid n%t in :sele(t (%untries.rei%nFid fr%m (%untries=
Hal. 3 dari 5
. erintah untuk mem"uat ta"le (%p4Fempl%4ee100 "eserta isin4a. Ta"le terse"ut "erisi Dama email n% telep%n id pekerjaan id departemen dari kar4a!an 4an "ekerja di departemen 100 Ta"le co"<=em"lo
Ja!a"an# $reate ta"le (%pFempl%4ees100 as sele(t IrstFname@ @lastFname departmentFid fr%m empl%4ees !here departmentFid;100
as
name
email
ph%neFnum"er
j%"Fid
10. erintah untuk mem"uat ,ie! denan nama ,empSAFAD 4an "erisi Dama Email D% Telep%n >d ekerjaan >d epartemen dan salar4 dari kar4a!an 4an memiliki salar4 diatas 10000 dan memiliki >d ekerjaan SAFAD 9ie! vem"3=M31
Ja!a"an# $reate ,ie! ,empSAFAD as sele(t IrstFname@ @lastFname as name email ph%neFnum"er j%"Fid departmentFid salar4 -r%m empl%4ees +here salar4 & 10000 and j%"Fid;@SAFAD@ 11. 'uatlah se"uah funsi untuk menampilkan rade dan status kelulusan denan ketentuan se"aai "erikut #Bo2ot 0%6' # Dama -unsi # -Grade:DilA"sen DilUts DilUas= arameter T%tal ; :0.1 K DilA"sen= L :0.7 K DilUts= L :0.5 K DilUas= Grade A #; 0 M; T%tal M; 100 Grade ' #; B0 M; T%tal M 0 Grade $ #; ?0 M; T%tal M B0 Grade #; 70 M; T%tal M ?0 Grade E #; 0 M; T%tal M 70 Status A ' dan $ ; *ulus Status dan E ; Tidak *ulus $%nt%h jika dijalankan# elect F>rade#?%+?+@0' from (ual9 )esult 4an diminta akan menem"alikan nilai# >rade B tatus Lulus Ja!a"an# $reate fun(ti%n %neGrade:DilA"sen num"er DilUts num"er DilUas num"er= )eturn ,ar(har2 is T%tal num"er#; :0.1 K DilA"sen= L :0.7 K DilUts= L :0.5 K DilUas= Grade ,ar(har2:75= 'ein >f T%talM70 Then rade #; NGrade E Status Tidak *ulusO
Hal. 7 dari 5
Elseif T%tal &;70 and T%tal M?0 Then rade #; NGrade Status Tidak *ulusO Elseif T%tal &;?0 and T%tal MB0 Then rade #; NGrade $ Status *ulusO Elseif T%tal &;B0 and T%tal M0 Then rade #; NGrade ' Status *ulusO Elseif T%tal &;0 and T%tal M;100 Then rade #; NGrade A Status *ulusO Else Grade #; NTidak emiliki Grade dan StatusO End if )eturn rade End 12. erintah */S* :Epli(it $urs%r= untuk menampilkan Dama 6ar4a!an Dama ekerjaan Dama epartemen aji dari kar4a!an 4an memiliki aji diatas 12000 urut "erdasarkan naman4a. Eksepsi# Jika tidak ditemukan maka akan menampilkan Pata Tidak AdaQ #Bo2ot $%6' Hasil#
