Perintah Prosedur dan Fungsi (Procedure and Function) pada PL/SQL

Prosedur pada PL/SQL

Prosedure pada PL/SQL adalah sebuah block yang dapat berdiri sendiri serta dikompilasi untuk selanjutnya masuk ke dalam skema database.

Bentuk umum dari prosedur pada PL/SQL

Bentuk umum dari prosedure adalah :

CREATE OR REPLACE PROCEDURE
nama_prosedure;
(parameter1 tipe_data,...) AS
...
BEGIN
statement;
...
END;

Contoh Program Prosedure pada PL/SQL

1:  create or replace procedure tambah_dua(a integer) as  
2:  hasil number (5);  
3:  begin  
4:  hasil:=a+2;  
5:  dbms_output.put_line('Hasilnya :'||hasil);  
6:  end;  
7:  /  

Fungsi pada PL/SQL

Fungsi pada PL/SQL adalah block yang dapat mengembalikan nilai. Dalam pembuatanya menggunakan statement RETURN untuk proses pengembalian nilai.

Bentuk umum dari fungsi pada PL/SQL

Bentuk umum dari fungsi adalah :

CREATE OR REPLACE FUNCTION nama_fungsi
(parameter1 tipe_data,...)
RETURN tipedata_fungsi IS
variable_lokal
BEGIN
statement;
...
RETURN nilai_fungsi;
END;

Contoh Program Fungsi pada PL/SQL

1:  create or replace function  
2:  pangkat (bil integer, n integer)  
3:  return integer as  
4:  hasil integer (10);  
5:  i integer;  
6:  begin  
7:  hasil :=1;  
8:  for i in 1..n loop  
9:  hasil:= hasil*bil;  
10:  end loop;  
11:  retunr hasil;  
12:  end;  
13:  /  

Setelah fungsi terbuat. maka kini kita dapat memanggilnya, seperti contoh di bawah ini :

1:  declare   
2:  h integer;  
3:  begin  
4:  h:=pangkat(2,3);  
5:  dbms_output.put_line('Hasil:'||to_char(h));  
6:  end;  
7:  /  

Read More

Perintah Perulangan pada PL/SQL

Pada PL/SQL ada 3 jenis perulangan yaitu :

1. LOOP

Perulangan LOOP adalah perintah untuk melakukan perulangan dari suatu block statement yang terdapat di dalam block statement loop.

Bentuk umum dari perulangan LOOP pada PL/SQL ini adalah :

LOOP
statement;
END LOOP;

Contoh program perulangan LOOP pada PL/SQL

1:  declare  
2:  k integer;  
3:  jumlah integer:=0;  
4:  begin  
5:  k:=2;  
6:  loop  
7:  jumlah:=jumlah+k;  
8:  k:=k+2;  
9:  exit when k>18;  
10:  end loop;  
11:  dbms_output.put_line('jumlah :'||jumlah);  
12:  end;  
13:  /  

2. WHILE LOOP

Perulangan WHILE LOOP adalah perintah untuk melakukan perulangan dari suatu block statement yang terdapat di dalam block statement loop dengan kondisi yang terdapata pada kluasa WHILE. Jadi klausa WHILE ini berfungsi sebagai pembatas dari looping atau pengulangan yang dilakukan.

Bentuk umum dari perulangan WHILE LOOPpada PL/SQL ini adalah :

WHILE kondisi LOOP

statement;
END LOOP;

Contoh program perulangan WHILE LOOP pada PL/SQL

1:  declare  
2:  hitung number := 0;  
3:  begin  
4:  while hitung < 5  
5:  loop  
6:  dbms_output.put_line('No ke: '||hitung);  
7:  hitung := hitung + 1;  
8:  end loop;  
9:  dbms_output.put_line('no terakhir adalah: '||hitung);  
10:  end;  

3. FOR LOOP

Perulangan FOR LOOP adalah perintah untuk melakukan perulangan dari suatu block statement yang terdapat di dalam block statement loop dengan kondisi atau perhitungan yang ada pada klausa FOR. Jadi klausa FOR ini berfungsi sebagai pembatas dari looping atau pengulangan yang dilakukan.

Bentuk umum dari perulangan FOR LOOP pada PL/SQL ini adalah :

FOR counter IN [REVERSE] lower_bound..higher_bound LOOP
statements;
END LOOP;

Contoh program perulangan FOR LOOP pada PL/SQL

1:  declare  
2:  hitung number := 0;  
3:  begin  
4:  for hitung IN 1..15  
5:  loop  
6:  hitung := hitung * 31;  
7:  end loop;  
8:  dbms_output.put_line('no terakhir adalah: '||hitung);  
9:  end;  

Read More

Pengenalan PL/SQL ( PL/SQL adalah ? )

Pengenalan PL/SQL (penjelasan)

Sebelum kita menggunakan atau memakai bahasa pemrograman ada baiknya kita mengetahui terlebih dahulu apa dan bagaimana bahasa pemrograman tersebut.

PL/SQL yang merupakan singkatan dari Procedural Language/Structured Query Language yang merupakan sebuah penggabungan antara bahasa pemrograman prosedural (PL) dan SQL syntax. Bahasa ini digunakan pada database Oracle.

Penggabungan kedua bahasa PL dan SQL dapat diilustrasikan dengan gambar dibawah ini :

Penggabungan PL/SQL

Contoh program PL/SQL perhitungan.

1:  set severoutput on  
2:  declare  
3:  a integer;  
4:  b integer;  
5:  begin   
6:  a:=5-3;  
7:  b:=6-4;  
8:  dbms_output.put_line(to_char(a));  
9:  dbms_output.put_line(to_char(b));  
10:  end;  
11:  /  

Array pada PL/SQL

Array merupakan tipe data bentukan yang dapat menyimpan sekumpulan nilai dari tipe data yang sama.

Bentuk umum dari array pada PL/SQL adalah :

TYPE nama_tipe IS
TABLEOF tipe_data
INDEX BY BINARY_INTEGER;

Contoh program array pada PL/SQL

1:  declare  
2:  type array_ku is  
3:  table of char(10)  
4:  index by binary_integer;  
5:  x array_ku;
6:  / 

Pada PL/SQL juga kondisi, perulangan, prosedure dan fungsi. Pembahasan mengenai itu akan dijelaskan disni:

• Perintah Perulangan pada PL/SQL
• Perintah Kondisi pada PL/SQL
• Perintah Prosedur dan Fungsi (Procedure and Function) pada PL/SQL

Read More

Perintah Kondisi pada PL/SQL

Pada PL/SQL ada empat jenis statement / perintah kondisi yaitu :

1. Kondisi IF THEN

Kondisi IF THEN merupakan perintah yang mengijinkan program untuk mengeksekusi perintah-perintah berdasarkan kondisi tertentu.

Bentuk umum dari kondisi IF THEN pada PL/SQL ini adalah :

IF kondisi THEN
statement1;
statement2;
......
END IF;

Contoh program kondisi IF pada PL/SQL

1:  declare  
2:  h integer;  
3:  berhasil varchar(2);  
4:  begin  
5:  h:=&h;  
6:  if h=1 then berhasil:='ya';  
7:  end if;  
8:  dbms_output.put_line('hari ke ='||h);  
9:  end;  
10:  /  

2. Kondisi IF THEN ELSE

Kondisi IF THEN ELSE merupakan perintah yang mengijinkan program untuk mengeksekusi perintah-perintah berdasarkan kondisi tertentu dan juka pun kondisi tidak terpenuhi maka akan menjalankan statment pada klausa ELSE. Jadi klausa ELSE ini memastikan perintah-perintah tersebut dieksekusi atau dijalankan.

Bentuk umum dari kondisi IF THEN ELSE pada PL/SQL ini adalah :

IF kondisi THEN
statement1;
ELSE
statement2;END IF;

Contoh program kondisi IF THEN ELSE pada PL/SQL

1:  declare  
2:  h integer;  
3:  berhasil varchar(5);  
4:  begin  
5:  h:=&h;  
6:  if h=1 then berhasil:='ya';  
7:  else berhasil:='tidak';
8:  end if;  
9:  dbms_output.put_line('hari ke ='||h);  
10:  end;  
11:  /  

3. Kondisi IF THEN ELSEIF

Kondisi IF THEN ELSEIF merupakan perintah yang mengijinkan program untuk mengeksekusi perintah-perintah berdasarkan kondisi tertentu dan juka pun kondisi tidak terpenuhi maka akan menjalankan statment pada klausa ELSE. Jadi klausa ELSE ini memastikan perintah-perintah tersebut dieksekusi atau dijalankan.

Bentuk umum dari kondisi IF THEN ELSEIF pada PL/SQL ini adalah :

IF kondisi THEN statement1;
ELSEIF kondisi THEN statement2;
ELSEIF kondisi THEN statement3;
.....
ELSE statement;
END IF;

Contoh program kondisi IF THEN ELSEIF pada PL/SQL

1:  declare  
2:  h integer;  
3:  hari varchar(6);  
4:  begin  
5:  h:=&h;  
6:  if h=1 then hari:='minggu';  
7:  elseif h=2 then hari:='senin';  
8:  elseif h=3 then hari:='selasa';  
9:  elseif h=4 then hari:='rabu';  
10:  elseif h=5 then hari:='kamis';  
11:  elseif h=6 then hari:='jumat';  
12:  else hari:='sabtu';  
13:  end if;  
14:  dbms_output.put_line('hari ke ='||h||'adalah hari '||hari);  
15:  end;  
16:  /  

4. Case

Kondisi Case merupakan cara yang ringkas untuk mengevaluasi kondisi tunggal dan memiliki diantara banyak alternatif tindakan.

Bentuk umum dari kondisi Case pada PL/SQL ini adalah :

CASE statement
WHEN kondisi ! THEN result1
WHEN kondisi " THEN result2
.......
ELSE result
END

Contoh program kondisi Case pada PL/SQL

1:  select nama_tabel,  
2:  CASE pengguna  
3:  WHEN 'SYS' THEN 'Pengguna adalah sys'  
4:  WHEN 'SYSTEM' THEN 'Pengguna adalah system'  
5:  ELSE 'Pengguna adalah bukan mereka'  
6:  END  
7:  from all_tables;  

Read More