Oracle Database

LISTING PROGRAM

Listing 1

declare
a integer;
b integer;
begin
a :=5-3;
b :=6-4;
dbms_output.put_line(to_char(a));
dbms_output.put_line(to_char(b));
end;

diatas adalah sebuah perintah untuk membuat hasil pengurangan. Dimana kita harus mendeklarasikan bahwa a dan b adalah sebuah nilai integer. Lalu kita buat pengurangannya, setelah itu dbms_output.put_line adalah sebuah perintah untuk memunculkan hasil pengurangan di outputnya.

Listing 2

declare
i integer ;
begin
for i in 0..4 loop
if i mod 2=2 then
dbms_output.put_line(i*2-i);
else
dbms_output.put_line(i*2);
end if;
end loop;
end;

diatas sebuah perintah pengulangan. Dimana kita akan memasukkan nilai dari 0 sampai 4. dbms_output.put_line(i*2-i); Adalah sebuah perintah rumus yang nantinya nilai 0 sampai 4 dimasukkan. Setelah itu hasil dari dbms_output.put_line(i*2-i); langsung diteruskan dan dimasukkan kedalam rumus dbms_output.put_line(i*2);

Listing 3

declare
type siswa is table of varchar(5)
index by binary_integer;
s siswa;
i integer;
j integer;
temp varchar(10);
begin
s(1):='DODI';
s(2):='DODO';
s(3):='DODE';
s(4):='DODA';
s(5):='DODU';
for i in 1..5 loop
for j in 1..5 loop
if(s(i)=s(j)) then
temp:=s(i);
s(j):=temp;
end if;
end loop;
end loop;
for i in 1..5 loop
dbms_output.put_line(s(i));
end loop;
end;

diatas adalah sebuah perintah perulangan, dimana statement tersebut akan mengulang sebuah kata-kata yang sudah kita tuliskan sebelumnya. Jadi kita akan membuat sebuah output 5 baris dimana setiap barisnya akan diisi dengan 5 kata

OUTPUT PROGRAM

OUTPUT  1

 

OUTPUT  2

 

OUTPUT  3