1. Flowchart
a. Flowchart Sistem
b.
Flowchart
Admin
c. Flowchart User
2. Entity Relationship Diagram
3. Tipe
Data
a. Tabel
Pemesan
·
Id_pemesan menggunakan number dengan jumlah alokasi 12.
·
Nama_pemesan menggunakan varchar2 dengan jumlah alokasi 15.
·
Almt_pemesan menggunakan varchar2 dengan jumlah alokasi 30.
b. Tabel
Kereta
·
Id_kereta menggunakan number dengan jumlah alokasi 10.
·
Tujuan menggunakan varchar2 dengan jumlah alokasi 15.
·
Id_gerbong menggunakan number dengan jumlah alokasi 10.
c. Tabel
Gerbong
·
Id_gerbong menggunakan number dengan jumlah alokasi 10.
·
Jumlah_kursi menggunakan number dengan jumlah alokasi 3.
d. Tabel
Tiket
·
Id_tiket menggunakan number dengan jumlah alokasi 15.
·
Id_pemesan menggunakan number dengan jumlah alokasi 12.
·
Id_kereta menggunakan number dengan jumlah alokasi 10.
·
no_kursi menggunakan number dengan jumlah alokasi 3.
·
Jadwal menggunakan date.
·
Kelas menggunakan varchar2 dengan jumlah alokasi 5.
4. DDL
dan PL / SQL Oracle
a. DDL
(Data Definition Language)
Create table
pemesan(
Id_pemesan number(12) primary key,
Nama_pemesan
varchar2(15) not null,
Almt_pemesan
varchar2(30) not null
);
Create table kereta(
Id_kereta number(10) primary key,
Tujuan
varchar2(15) not null,
Id_gerbong
number(10) not null
);
Create table
gerbong(
Id_gerbong
number(10) primary key,
Jumlah_kursi
number(3) not null
);
Create table tiket(
Id_tiket number(15) primary key,
Id_pemesan number(12) not null,
Id_kereta number(10) not null,
No_kursi number(3) not null,
Jadwal date,
kelas
varchar2(5) not null
);
b. PL
/ SQL
Membuat trigger
create or
replace trigger stokKursi
after insert
or delete or update on tiket
for each row
begin
if inserting
then
update gerbong
set jumlah_kursi = jumlah_kursi - 1 where
no_kursi = :new.no_kursi;
end if;
if deleting
then
update gerbong
set jumlah_kursi = jumlah_kursi + 1 where
no_kursi = :old.no_kursi;
end if;
if updating
then
update gerbong
set jumlah_kursi = jumlah_kursi - 1
where
no_kursi = :new.no_kursi;
update gerbong
set jumlah_kursi = jumlah_kursi + 1 where
no_kursi = :old.no_kursi;
end if;
end;
/
referensi :
Handout perkuliahan sistem basis data Budi Laksono Putro, S.Si, MT
SISTEM INFORMASI PELAYANAN TIKET KERETA API DENGAN JSP, Revelin Yuanita Arifiantanti, Rengga Asmara, Yuliana Setiowati.









Follow Me
Were this world an endless plain, and by sailing eastward we could for ever reach new distances