TUGAS
|
PL-SQL
Mngontrol Data
Stok Barang Dengan Menggunakan Syntax Trigger
Dosen
: Badrudin Hadibrata, S.T, M.Kom
Disusun
oleh :
Teknik
Informatika TKJ-B1 Semester V
Irwan
Irnawan / NIM 41132578
Yani
Daryani / NIM 41132430
Sadar
/ NIM 41132595
SEKOLAH
TINGGI MANAJEMEN INFORMATIKA DAN KOMPUTER
STMIK IKMI CIREBON
Jl. Perjuangan No. 10 B Majasem Cirebon
Telp. (0321) 490480 – 490481
====================================
Trigger PL-SQL
Trigger adalah
1.Mengupdate tabel-tabel lain jika
ada perubahan (Insert, update atau delete) pada tabel yang sedang aktif.
2.Untuk mengimplementasikan suatu
sistem log. Setiap terjadi perubahan, secara otomatis akan menyimpan ke tabel
log.
3.untuk melakukan validasi dan
verifikasi data sebelum data tersebut disimpan.
Syntax Struktur Trigger:
CREATE [or replace] TRIGGER nama_trigger
( BEFORE|AFTER )
( INSERT|UPDATE [OF
nama_kolom,..]|DELETE )ON nama_tabel
[FOR EACH ROW]
[WHEN (kondisi)]
DECLARE
Deklarasi tipe
data
BEGIN
Trigger body
END;
Keterangan :
CREATE di gunakan untuk membuat trigger baru
REPLACE di gunakan untuk mengganti ini trigger yang telah dibuat
sebelumnya
Parameter dan variabel
hanya bersifat opsional, artinya tidak harus dituliskan pada setiap trigger.
1.membuat tabel
create table barang1 (kode_barang
varchar2(4) primary key, nama_barang varchar2(20), stok number);
2.menginput data tabel
insert into barang1 values ('T001',
'CIKI', 80);
insert into barang1 values ('T002',
'ROTI', 70);
insert into barang1 values ('T001',
'ULAR RINGAN', 90);
3.menampilkan tabel
select * from barang1;
4.membuat trigger stok barang
Create or replace trigger
aft_upd_row_barang
after
update of stok on barang1
for each row
declare
jum number :=0;
begin
jum := :old.stok;
if jum <= 5 then
dbms_output.put_line('jumlah barang
sudah limit');
else
dbms_output.put_line('jumlah barang
masih mencukupi');
end if;
end;
5.pengujian :
update barang1 set stok=50 where kode_barang='T001';
6.menampilkan tabel
select * from barang1;
Terima Kasih
