Panduan:
1. Bagian declare diisi dengan daftar variabel dan tipe datanya masing-masing
2. Bagian inti program selalu diawali dengan BEGIN dan diakhiri dengan END; serta /
3. PL/SQL dapat disimpan sebagai file *.sql dan di-run sebagai script dengan perintah @ fullpath, dimana fullpath tidak boleh mengandung spasi
contoh: @ D:\BelajarOracle\Pertemuan3\anu.sql;
4. Jika blok PL/SQL menmapilkan output ke layar maka setelah login kita harus mengaktifkan screen output dengan cara menjalankan perintah SET SERVEROUTPUT ON setelah login (cukup satu kali tiap login)
5. Aturan nama variabel: tidak boleh pakai spasi, diawali selain huruf atau mengandung simbol tanda baca
Format Deklarasi Variabel:
Nama_Var Tipe_data;
atau
Nama_Var Nama_Tabel.Nama_Kolom%Type;
Format Pembacaan Single Row Data:
SELECT daftar_kolom
INTO daftar_variabel
FROM daftar_tabel
WHERE syarat;
(*) Format di atas tidak bisa digunakan jika hasil query lebih dari 1 baris, kecuali jika dilengkapi dengan exception
Format Penerimaan Input Dari User:
Nama_Var := &prompt;
atau
Nama_Var := ‘&prompt’;
Note: Prompt bebas namun tidak boleh menggunakan spasi dan simbol selain alfanumerik. Jika Input bertipe selain tipe data number maka &prompt harus diapit petik tunggal (‘)
Contoh1: Menerima input jari-jari dan menampilkan luas serta keliling lingkaran
Declare
jari2 number(5,2);
keliling number(7,2);
luas number(7,2);
begin
jari2 := &jari2;
keliling := 2 * 3.14 * jari2;
luas := 3.14 * power(jari2,2);
dbms_output.put_line('Jari-jari lingkaran = '||jari2);
dbms_output.put_line('keliling lingkaran = '||keliling);
dbms_output.put_line('luas lingkaran = '||luas);
end;
/
Contoh2: Menerima input nama anggota dan menampilkan alamatnya
Declare
cari varchar(30);
nama anggota.nama_anggota%type;
alamat anggota.alamat_anggota%type;
begin
cari := '&nama_yang_dicari';
select nama_anggota, alamat_anggota
into nama, alamat
from anggota
where nama_anggota = cari;
dbms_output.put_line(nama||' tinggal di '||alamat);
end;
/
PL/SQL WITH CONDITIONAL
IF... THEN...
IF... THEN... ELSE...
IF... THEN... ELSIF... ELSE...
PL/SQL WITH LOOPING
FOR... LOOP
WHILE... LOOP
LOOP... EXIT WHEN...
Tidak ada komentar:
Posting Komentar