LAPORAN SEMENTARA PRAKTIKUM DATA
MINING
MODUL 5
TRIGGER
1. Mengimport Database yang telah di buat pada praktikum sebelumnya.
SQL : imp namauser/password full=y file=c:\infotuban.dmp
2. Membuat sebuah trigger dimana ketika id_jenis pada
tabel jenis diubah, maka id_jenis pada tabel buku juga ikut berubah.
SQL
: CREATE TABLE jenis_infotuban(
id_jenis VARCHAR2(15),
kategori varchar2(100),
CONSTRAINT id_jenis_pk PRIMARY
KEY(id_jenis));
Memasukkan data pada tabel jenis
SQL :
INSERT
INTO jenis_infotuban (id_jenis,kategori) VALUES ('AD','Agama');
INSERT
INTO jenis_infotuban (id_jenis,kategori) VALUES ('AK','Akutansi');
INSERT
INTO jenis_infotuban (id_jenis,kategori) VALUES ('BH','Bahasa');
INSERT
INTO jenis_infotuban (id_jenis,kategori) VALUES ('BI','Biologi');
INSERT
INTO jenis_infotuban (id_jenis,kategori) VALUES ('EK','Ekonomi');
INSERT
INTO jenis_infotuban (id_jenis,kategori) VALUES ('FL','Filsafat');
INSERT
INTO jenis_infotuban (id_jenis,kategori) VALUES ('FI','Fisika');
INSERT
INTO jenis_infotuban (id_jenis,kategori) VALUES ('IT','Komputer dan Internet');
INSERT
INTO jenis_infotuban (id_jenis,kategori) VALUES ('MN','Manajemen');
INSERT
INTO jenis_infotuban (id_jenis,kategori) VALUES ('UM','Umum');
3. Buatlah trigger dimana trigger tersebut akan menjamin nilai stok pada tabel buku berkisar antara 0 sampai 100.
SQL :
CREATE OR REPLACE TRIGGER STOK_BUKU_infotuban
BEFORE INSERT OR UPDATE OF STOCK ON BUKU_infotuban
FOR EACH ROW
BEGIN
IF NOT (:NEW.STOCK < 100)
THEN
RAISE_APPLICATION_ERROR (-20202, 'MAAF STOK YANG ANDA MASUKKAN TERLALU BESAR..!!! STOK TAK BOLEH LEBIH DARI 100..!!!');
END IF ;
END;
/
BEFORE INSERT OR UPDATE OF STOCK ON BUKU_infotuban
FOR EACH ROW
BEGIN
IF NOT (:NEW.STOCK < 100)
THEN
RAISE_APPLICATION_ERROR (-20202, 'MAAF STOK YANG ANDA MASUKKAN TERLALU BESAR..!!! STOK TAK BOLEH LEBIH DARI 100..!!!');
END IF ;
END;
/
Demikian yang dapat saya bagikan pada kesempatan kali ini, tunggu update informasi serta tutorial selanjutnya. Terima Kasih dan Semoga Bermanfaat...
By : Adjie_ss
0 komentar:
Post a Comment