Bahasa Pemerograman PL/SQL

Catatan Praktikum LAB. SI 2010 :

PL/SQL umumnya sama dengan bahasa pemrograman lain seperti pascal & bahasa C.

Kondisi pada PL/SQL (pertemuan ke-2)

Umumnya kondisi pada PLSQL adalah struktur yang terdiri dari perintah-perintah IF dan CASE. Terdapat tiga bentuk perintah-perintah IF: IF-THEN, IF-THEN-ELSE, dan IF-THEN-ELSIF.

• Perintah IF-THEN

Rangkaian perintah-perintah dieksekusi hanya jika kondisi adalah true. Jika kondisi bernilai false atau null, perintah IF tidak melakukan apa-apa. Dalam salah satu kasus, kontrol berlalu kepada perintah selanjutnya.

Bentuk umum :
IF condition THEN
sequence_of_statements
END IF;

• Perintah IF-THEN-ELSE

Rangkaian perintah-perintah dalam klausa ELSE dieksekusi hanya jika kondisi bernilai false atau null. Jadi, klausa ELSE memastikan bahwa rangkaian perintah-perintah tersebut dieksekusi.

Bentuk umum :
IF condition THEN
sequence_of_statements1
ELSE
sequence_of_statements2
END IF;

• Perintah IF-THEN-ELSIF

Jika kondisi pertama bernilai false atau null, klausa ELSIF akan menguji kondisi lainnya. Perintah IF dapat memiliki sejumlah klausa ELSIF; klausa final ELSE bersifat opsional (bisa digunakan atau tidak). Kondisi-kondisi dievaluasi satu demi satu dari atas ke bawah. Jika suatu kondisi bernilai true, rangkaian perintah-perintah yang ada di dalamnya dieksekusi dan kontrol akan menuju ke perintah selanjutnya. Jika seluruh kondisi bernilai false atau null, maka rangkaian perintah-perintah di dalam klausa ELSE yang akan dieksekusi.

Bentuk umum :
IF condition1 THEN
sequence_of_statements1
ELSIF condition2 THEN
sequence_of_statements2
ELSE
sequence_of_statements3
END IF;

• Perintah CASE

Seperti halnya perintah IF, perintah CASE menyeleksi satu rangkaian perintah-perintah untuk dieksekusi. Namun, untuk menyeleksi rangkain perintah-perintah tersebut, perintah CASE menggunakan penyeleksi, bukannya menggunakan banyak ekspresi-ekspresi Boolean.

Bentuk umum :
[<>]
CASE selector
WHEN expression1 THEN sequence_of_statements1;
WHEN expression2 THEN sequence_of_statements2;
…
WHEN expressionN THEN sequence_of_statementsN;
[ELSE sequence_of_statementsN+1;]
END CASE [label_name];

Contoh program sederhana :

SET SERVEROUTPUT ON
DECLARE
a varchar (20);
b varchar (2);
begin
a:='&nama';
b:='&jekel';
if(b='P')or(b='L') then
DBMS_OUTPUT.PUT_LINE('silahkan masuk bapak '||a);
else if(b='p')or(b='P') then
DBMS_OUTPUT.PUT_LINE('silahkan masuk ibu '||a);
end if;
end if;
DBMS_OUTPUT.PUT_LINE('terimakasih');
end;