Pada mata kuliah PBD (Pemrograman Basis
Data) pertemuan ke-4 minggu lalu, telah menjelaskan tentang Procedure dan
Fuction.
Procedure adalah sebuah block yang dapat berdiri sendiri serta dikompilasi untuk selanjutnya masuk ke dalam skema database.
Procedure adalah sebuah block yang dapat berdiri sendiri serta dikompilasi untuk selanjutnya masuk ke dalam skema database.
Bentuk
umum dari prosedur pada SQL
Bentuk umum:
CREATE OR REPLACE PROCEDURE
nama_prosedure;
(parameter1 tipe_data,...) AS
...
BEGIN
statement;
...
END;
nama_prosedure;
(parameter1 tipe_data,...) AS
...
BEGIN
statement;
...
END;
Contoh Program Prosedure pada 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:
/
Function adalah suatu blok SQL yang memiliki konsep sama dengan
procedure, hanya saja pada function terdapat pengembalian nilai (return
value).Karena function dapat mengembalikan sebuah nilai, function dapat
diakses seperti layaknya sebuah variabel biasa.
Bentuk Umum :
CREATE OR REPLACE FUNCTION nama_function (parameter_1, …)
RETURN tipe_data AS
variabel_1 tipe_data;
…
BEGIN
statemen_1;
…
RETURN nilai_yang_dikembalikan;
END;
Statemen RETURN tipe_data diatas menunjukkan bahwa function akan mengembalikan nilai dengan tipe data tertentu
Statemen RETURN nilai_yang_dikembalikan berfungsi untuk mengembalikan nilai yang telah diproses dalam function
Contoh Function Tanpa Parameter :
(1)
CREATE OR REPLACE FUNCTION tulis_teks RETURN VARCHAR2 AS
S VARCHAR2(20)
BEGIN
S := ‘HALLO SEMUA’;
RETURN S;
END;
/
(2)
SET SERVEROUTPUT ON
DECLARE
X VARCHAR2(20);
BEGIN
X := tulis_teks;
DBMS_OUTPUT.PUT_LINE(X);
END;
/
Contoh Function Dengan Parameter :
(1)
CREATE OR REPLACE FUNCTION
pangkat (bil INTEGER, n INTEGER)
RETURN INTEGER AS
HASIL INTEGER(10);
I INTEGER;
BEGIN
HASIL := 1;
FOR I IN 1..n LOOP
HASIL := HASIL * bil;
END LOOP;
RETURN HASIL;
END;
/
CREATE OR REPLACE FUNCTION nama_function (parameter_1, …)
RETURN tipe_data AS
variabel_1 tipe_data;
…
BEGIN
statemen_1;
…
RETURN nilai_yang_dikembalikan;
END;
Statemen RETURN tipe_data diatas menunjukkan bahwa function akan mengembalikan nilai dengan tipe data tertentu
Statemen RETURN nilai_yang_dikembalikan berfungsi untuk mengembalikan nilai yang telah diproses dalam function
Contoh Function Tanpa Parameter :
(1)
CREATE OR REPLACE FUNCTION tulis_teks RETURN VARCHAR2 AS
S VARCHAR2(20)
BEGIN
S := ‘HALLO SEMUA’;
RETURN S;
END;
/
(2)
SET SERVEROUTPUT ON
DECLARE
X VARCHAR2(20);
BEGIN
X := tulis_teks;
DBMS_OUTPUT.PUT_LINE(X);
END;
/
Contoh Function Dengan Parameter :
(1)
CREATE OR REPLACE FUNCTION
pangkat (bil INTEGER, n INTEGER)
RETURN INTEGER AS
HASIL INTEGER(10);
I INTEGER;
BEGIN
HASIL := 1;
FOR I IN 1..n LOOP
HASIL := HASIL * bil;
END LOOP;
RETURN HASIL;
END;
/
