LAMPIRAN 1 LIST CODE DATABASE TRIGGER
L1
DELIMITER $$; DROP TRIGGER `bis`.`transaksidelete1`$$ CREATE TRIGGER `bis`.`transaksidelete1` AFTER DELETE on `bis`.`trn_transict` FOR EACH ROW BEGIN update trn_transaksiheader h set vat=(select case isnull(sum((price-discount)*((100+tax)/100))) then sum((pricediscount)*((100+tax)/100)) when 1 then 0 end from trn_transisp d WHERE d.id_transaksi = h.id_transaksi); update trn_transaksiheader h set vat=vat+(select case isnull(sum((price-discount)*((100+tax)/100))) when 0 then sum((quantity*price-discount)*((100+tax)/100)) when 1 then 0 end from trn_transict d WHERE d.id_transaksi = h.id_transaksi); update trn_transaksiheader h set vat=vat+(select case isnull(sum((price-discount)*((100+tax)/100))) when 0 then sum((pricediscount)*((100+tax)/100)) when 1 then 0 end from trn_transinstallation d WHERE d.id_transaksi = h.id_transaksi); END$$ DELIMITER ;$$
DELIMITER $$; DROP TRIGGER `bis`.`transaksidelete2`$$ CREATE TRIGGER `bis`.`transaksidelete2` AFTER DELETE on `bis`.`trn_transisp` FOR EACH ROW BEGIN update trn_transaksiheader h set vat=(select case isnull(sum((price-discount)*((100+tax)/100))) when 0 then sum((pricediscount)*((100+tax)/100)) when 1 then 0 end from trn_transisp d WHERE d.id_transaksi = h.id_transaksi); update trn_transaksiheader h set vat=vat+(select case isnull(sum((price-discount)*((100+tax)/100))) when 0 then sum((quantity*price-discount)*((100+tax)/100)) when 1 then 0 end from trn_transict d WHERE d.id_transaksi = h.id_transaksi); update trn_transaksiheader h set vat=vat+(select case isnull(sum((price-discount)*((100+tax)/100))) when 0 then sum((pricediscount)*((100+tax)/100)) when 1 then 0 end from trn_transinstallation d WHERE d.id_transaksi = h.id_transaksi); END$$ DELIMITER ;$$
DELIMITER $$; DROP TRIGGER `bis`.`transaksidelete3`$$ CREATE TRIGGER `bis`.`transaksidelete3` `bis`.`trn_transinstallation` FOR EACH ROW BEGIN
L2
AFTER
DELETE
on
update trn_transaksiheader h set vat=(select case isnull(sum((price-discount)*((100+tax)/100))) when 0 then sum((pricediscount)*((100+tax)/100)) when 1 then 0 end from trn_transisp d WHERE d.id_transaksi = h.id_transaksi); update trn_transaksiheader h set vat=vat+(select case isnull(sum((price-discount)*((100+tax)/100))) when 0 then sum((quantity*price-discount)*((100+tax)/100)) when 1 then 0 end from trn_transict d WHERE d.id_transaksi = h.id_transaksi); update trn_transaksiheader h set vat=vat+(select case isnull(sum((price-discount)*((100+tax)/100))) when 0 then sum((pricediscount)*((100+tax)/100)) when 1 then 0 end from trn_transinstallation d WHERE d.id_transaksi = h.id_transaksi); END$$ DELIMITER ;$$
DELIMITER $$; DROP TRIGGER `bis`.`transaksiinsert1`$$ CREATE TRIGGER `bis`.`transaksiinsert1` AFTER INSERT on `bis`.`trn_transict` FOR EACH ROW BEGIN update trn_transaksiheader h set vat=(select case isnull(sum((price-discount)*((100+tax)/100))) when 0 then sum((pricediscount)*((100+tax)/100)) when 1 then 0 end from trn_transisp d WHERE d.id_transaksi = h.id_transaksi); update trn_transaksiheader h set vat=vat+(select case isnull(sum((price-discount)*((100+tax)/100))) when 0 then sum((quantity*price-discount)*((100+tax)/100)) when 1 then 0 end from trn_transict d WHERE d.id_transaksi = h.id_transaksi); update trn_transaksiheader h set vat=vat+(select case isnull(sum((price-discount)*((100+tax)/100))) when 0 then sum((pricediscount)*((100+tax)/100)) when 1 then 0 end from trn_transinstallation d WHERE d.id_transaksi = h.id_transaksi); END$$ DELIMITER ;$$
DELIMITER $$; DROP TRIGGER `bis`.`transaksiinsert2`$$ CREATE TRIGGER `bis`.`transaksiinsert2` AFTER INSERT on `bis`.`trn_transisp` FOR EACH ROW BEGIN update trn_transaksiheader h set vat=(select case isnull(sum((price-discount)*((100+tax)/100))) when 0 then sum((pricediscount)*((100+tax)/100)) when 1 then 0 end from trn_transisp d WHERE d.id_transaksi = h.id_transaksi); update trn_transaksiheader h set vat=vat+(select case isnull(sum((quantity*price-discount)*((100+tax)/100))) when 0 then sum((quantity*price-discount)*((100+tax)/100)) when 1 then 0 end from trn_transict d WHERE d.id_transaksi = h.id_transaksi);
L3
update trn_transaksiheader h set vat=vat+(select case isnull(sum((price-discount)*((100+tax)/100))) when 0 then sum((pricediscount)*((100+tax)/100)) when 1 then 0 end from trn_transinstallation d WHERE d.id_transaksi = h.id_transaksi); END$$ DELIMITER ;$$
DELIMITER $$; DROP TRIGGER `bis`.`transaksiinsert3`$$ CREATE TRIGGER `bis`.`transaksiinsert3` AFTER INSERT on `bis`.`trn_transinstallation` FOR EACH ROW BEGIN update trn_transaksiheader h set vat=(select case isnull(sum((price-discount)*((100+tax)/100))) when 0 then sum((pricediscount)*((100+tax)/100)) when 1 then 0 end from trn_transisp d WHERE d.id_transaksi = h.id_transaksi); update trn_transaksiheader h set vat=vat+(select case isnull(sum((quantity*price-discount)*((100+tax)/100))) when 0 then sum((quantity*price-discount)*((100+tax)/100)) when 1 then 0 end from trn_transict d WHERE d.id_transaksi = h.id_transaksi); update trn_transaksiheader h set vat=vat+(select case isnull(sum((price-discount)*((100+tax)/100))) when 0 then sum((pricediscount)*((100+tax)/100)) when 1 then 0 end from trn_transinstallation d WHERE d.id_transaksi = h.id_transaksi); END$$ DELIMITER ;$$
DELIMITER $$; CREATE TRIGGER `outsourcingheadervatinsert` AFTER INSERT ON `trn_transoutsourcingdetail` FOR EACH ROW BEGIN update trn_transoutsourcingheader h set vat=(select sum(pricediscount) from trn_transoutsourcingdetail d WHERE d.id_transoutsourcing = h.id_transoutsourcing); END$$
CREATE TRIGGER `outsourcingheadervatdelete` AFTER DELETE ON `trn_transoutsourcingdetail` FOR EACH ROW BEGIN update trn_transoutsourcingheader h set vat=(select sum(pricediscount) from trn_transoutsourcingdetail d WHERE d.id_transoutsourcing = h.id_transoutsourcing); END$$
DELIMITER ;$$
L4
LAMPIRAN 2 TAMPILAN LAYAR
L5
Tampilan layar Master Outsourcing untuk pengisian data Applicant:
L6
L7
L8
L9
Tampilan layar Master ISP untuk pengisian data Bandwidth:
L10
Tampilan layar Master ICT untuk pengisian data Item:
L11
Tampilan layar Master General untuk pengisian data Customer:
L12
Tampilan layar Transaction ISP and ICT untuk pengisian Project:
L13
L14
Tampilan layar Transaction ISP and ICT untuk pengisian data Delivery:
L15
Tampilan layar Create Invoice untuk Transaction ISP and ICT:
L16
L17
Tampilan layar Transaction Outsourcing untuk pengisian Outsourcing:
L18
Tampilan layar Invoice untuk Transaction Outsourcing:
L19
T ampilan layar Master ICT untuk penambahan Stock baru:
Tampilan layar Master ICT untuk penambahan jenis unit:
L20
Tampilan layar Master ICT untuk konversi unit:
L21
Tampilan layar Master General untuk menambah user baru:
L22
Tampilan layar User Profile untuk mengedit data user yang sedang logged-in:
Tampilan layar Note untuk membuat catatan dan to-do-list:
L23
Tampilan layar Stock Adjustment untuk menyesuaikan stock yang ada di gudang dan di pembukuan:
L24
Tampilan layar Laporan untuk menggenerate report beserta tampilan reportnya:
L25
L26
L27
L28
L29
LAMPIRAN 3 DOKUMENTASI WAWANCARA
L30
Wawancara terhadap General Manager dari PT Bina Indonusa System : Bpk Temmy Jaury
T : PT Bina Indonusa System ini bergerak di bidang apa? J : PT Bina Indonusa System ini bergerak dalam bidang IT, perdagangan, dan outsourcing yaitu sebagai penjual software-software E-Learning dan peralatan networking, serta penyedia bandwidth internet, dan juga pengadaan tenaga kerja.
T : Siapakah yang menjadi pelanggan dari PT Bina Indonusa System ? J : Pelanggan PT Bina Indonusa System terdiri dari kalangan universitas, perusahaan-perusahaan pengguna jasa internet, perusahaan-perusahaan yang membutuhkan tenaga kerja outsource dan pelanggan perorangan.
T : Bagaimana proses perdagangan dilakukan? J : Untuk ISP (penyedia internet), biasanya membeli paket bandwidth beserta dengan instalasi, untuk ICT dapat membeli produk yang sudah jadi ataupun meminta dibuatkan dengan requirement sendiri, lalu untuk Outsourcing, pelanggan dapat meminta tenaga kerja yang dibutuhkan dari daftar tenaga kerja yang kami miliki.
T : Apakah ada retur dalam penjualan ? J :Dalam penjualan dapat dilakukan oleh pelanggan namun jarang terjadi di perusahaan kami.
T : Dilakukan dalam mata uang apa transaksi yang dilakukan oleh PT Bina Indonusa System ? J : Untuk saat ini kami masih menggunakan Rupiah sebagai mata uang utama dari transaksi-transaksi kami, karena memang sangat sulit untuk menyesuaikan kurs yang berlaku pada saat transaksi, maka kami memutuskan untuk melakukan transaksi dalam rupiah. Namun untuk kedepannya tidak menutup kemungkinan untuk menggunakan mata uang lain.
L31
T : Apakah pelanggan dapat memesan banyak jenis transaksi sekaligus dalam satu kali pemesanan ? J : Bisa, ini terjadi apabila pelanggan memesan paket internet. Tentu paket internet tidak hanya bandwidth, namun juga dengan hardware-hardware pendukungnya seperti kabel,
switch, dan hardware-hardware lainnya. Bisa juga pelanggan
meminta suatu project yang memerlukan software dan juga hardware pendukung.
T : Apa saja jenis transaksi yang dapat dilakukan apabila sebuah perusahaan ingin outsource tenaga kerja dari PT Bina Indonusa System ? J: Perusahaan pelanggan dapat memilih untuk mengontraknya secara permanen, menyewanya dari perusahaan kami untuk jangka waktu tertentu, atau juga kontrak untuk satu project.
T : Apa kendala yang dihadapi perusahaan sampai saat ini ? J : Kendala yang masih dirasakan perusahaan adalah kesulitan mengolah data yang sudah disimpan karena masih belum memiliki sistem database yang terkomputerisasi, juga kendala lainnya adalah kesulitan mengolah transaksi secara cepat ketika tidak berada di dalam kantor karena tidak adanya sistem yang terhubung ke internet. Oleh karena itu kami memerlukan suatu aplikasi yang dapat diterapkan pada perusahaan kami.
L32