SISTEM INFORMASI PENJUALAN CV. DIAN MOTOR …repository.usd.ac.id/33495/2/995314078_Full.pdf ·...
Transcript of SISTEM INFORMASI PENJUALAN CV. DIAN MOTOR …repository.usd.ac.id/33495/2/995314078_Full.pdf ·...
-
SISTEM INFORMASI PENJUALAN CV. DIAN MOTOR BERBASISKAN TEKNOLOGI KOMPUTER
SKRIPSI
Diajukan Untuk Memenuhi Salah Satu Syarat
Memperoleh Gelar Sarjana Teknik Jurusan Teknik Informatika
Disusun Oleh:
Wiwied Widiastanti
995314078
JURUSAN TEKNIK INFORMATIKA
FAKULTAS TEKNIK UNIVERSITAS SANATA DHARMA YOGYAKARTA
2007
-
MARKETING INFORMATION SYSTEM AT CV. DIAN
MOTOR BASED ON COMPUTER TECHNOLOGY
A Thesis
Presented as Partial Fulfillment of the Requirements
to Obtain the Sarjana Teknik Degree
in Informatic Engineering
by
Wiwied Widiastanti
995314078
DEPARTEMENT OF INFORMATIC ENGINEERING
FACULTY OF ENGINEERING
SANATA DHARMA UNIVERSITY
YOGYAKARTA
2007
-
PERNYATAAN
Dengan ini saya sebagai penulis tugas akhir menyatakan dengan
sesungguhnya bahwa skripsi yang saya tulis ini tidak memuat karya atau bagian
karya orang lain, kecuali pemikiran, metode atau hasil penelitian orang lain yang
diambil disebutkan dengan jelas sebagai acuan.
Yogyakarta, Maret 2007
Wiwied Widiastanti
Penulis
iv
-
HALAMAN PERSEMBAHAN
Kupersembahkan untuk :
Jesus Christ, For all your love and care.
I’ve got ‘Nothing’ but love for you. You’re the shepherd.
Thank you ‘coz you deserve it. And...
You’re the one who’s working overtime.
Mom & Dad, Dad ,I know we’ve been through a lot
but you’re right up there with God, I love u . Mom, deep inside my heart,
I have a mother who always believes in me. From now onwards as well,
please continue to look after me. I’m sorry to have troubled you so much.
Lukas-kun, For always being by my side, arigatou. For always encouraging me, arigatou.
You have found what you wanted to do and are now working towards it. And seeing that makes me happy. Thank u for doing so much for me.
You’re my SOUL!SOUL. For me, Anata wa "“Tatta hitotsu no koi”.
v
-
HALAMAN MOTTO
No matter what is in the past,
It’s most important to cherish the present.
(me...)
To comprehend the value of one year, just ask the students who failed the entrance exams.
To comprehend the value of one month, just ask a mother who gave birth to a premature baby.
To comprehend the value of one week, just ask the editor of a weekly newspaper. To comprehend the value of one hour,
just ask the lovers who are waiting to meet. To comprehend the value of one minute,
just ask the people who missed their stop on the train. To comprehend the value of one second,
just asked the person who managed to avoid an accident just in the time. To comprehend the value of one tenth of a second,
just ask the person who ended up with a silver medal at the olympics. The hands of the clock will continue ticking, therefore treasure every moment you have
and treat today as the utmost gift you’ll have. (yuuki)
In the blue sky, the white clouds float around. And it’s really pretty to look at.
I really don’t want say things such as “ I want to go back to how things were before”.
I recognize how I am right now, and will continue to live on. ( Ichi ritoru no namida)
vi
-
vii
-
ABSTRAKSI
Dewasa ini, dunia bisnis begitu cepat mengalami perkembangan dan setiap
saat selalu ada perubahan, terutama perubahan dalam hal strategi yang digunakan
setiap pengusaha agar mempunyai nilai lebih dibandingkan dengan pesaing-
pesaingnya. Manusia terutama para pengusaha saat ini juga semakin menyadari
pentingnya sebuah informasi yang sangat membantu dalam pengambilan
keputusan untuk masa yang akan datang. Eksekutif-eksekutif perusahaan
mengharapkan informasi yang mereka butuhkan dapat diperoleh dengan mudah
sehingga mereka dapat mengontrol perkembangan dan keputusan perusahaannya
dengan cepat berdasarkan informasi yang diperoleh. Sehingga diperlukan
teknologi informasi yang mendukung tercapainya tujuan tersebut.
CV. Dian Motor adalah salah satu perusahaan yang bergerak dibidang
penjualan mobil bekas. Dalam perusahaan ini, terdapat beberapa bagian (sub
sistem) yang saling berhubungan erat untuk mendukung kinerja perusahaan.
Dikarenakan adanya keterbatasan teknologi yang digunakan, maka CV. Dian
motor memerlukan suatu teknologi sistem informasi yang baru untuk membantu
proses bisnisnya dan juga untuk meningkatkan pelayanan penjualan kepada
customer. Salah satu cara adalah dengan menggunakan layanan sistem informasi
penjualan berbasiskan teknologi komputer.
Teknologi sistem ini memberikan kemudahan untuk mendapatkan
informasi penjualan yang akurat dan juga meningkatan kualitas penjualan bagi
perusahaan. Ruang lingkup penggunaan teknologi sistem ini dibatasi hanya untuk
sub sistem-sub sistem yang terlibat dalam perusahaan (intranet). Perangkat lunak
yang digunakan untuk merancang sistem baru adalah Visual Basic 6 untuk
perancangan antarmukanya dan SQL server 2000 sebagai databasenya.
Dengan diterapkannya sistem informasi penjualan berbasiskan teknologi
komputer, diharapkan CV. Dian Motor mampu menghasilkan laporan penjualan
yang cepat, akurat dan berkualitas untuk meningkatkan kinerja pemasaran
perusahaan.
vii
-
ABSTRACT
The growth of business world so quickly experience. Every moment
always change, especially the change in strategy to having value more compared
to competitors. Human being especially all entrepreneur is progressively realize
that it’s important a very assistive information in decision making of the future.
Company executive expect the information which they require obtainable easily
so that they can control the growth and the company decision swiftly pursuant to
obtained information. Because of that they needed a information technology to
supporting reaching of the target.
CV. Dian Motor is one of peripatetic company who having ex- car sale
bussiness. In this company, there are some part what hand in glove interaction to
support the company performance. Because of existence of used technology
limitation, hence CV. Dian Motor need a new information system technology to
assist the business process and also to increase sale service to customer. One of
the way is using service of sale information system based of technology
computer.
This Technology System can give the amenity to get the accurate sale
information and improve the sale quality for company. Technological scope of
this system is limited just to sub systems in concerned in company ( intranet).
Software used to design the new system’s are Visual Basic 6 for the scheme of
interface and SQL server 2000 as database. Appliedly of Sale information system
based of technology computer, expected CV. Dian Motor able to yield the sale
report which quickly, accurate and having good quality to increase performance of
company marketing.
viii
-
KATA PENGANTAR
Tiada kata yang pantas diucapkan selain Puji dan Syukur kehadirat
Tuhan Yang Maha Esa atas segala limpahan rahmat dan karunia-Nya, sehingga
laporan skripsi ini dapat terselesaikan dengan baik. Penulisan tugas akhir ini
diajukan untuk memenuhi salah satu syarat memperoleh gelar Sarjana Teknik
Jurusan Teknik Informatika.
Terselesaikannya penulisan tugas akhir ini tidak lepas dari peran serta
beberapa pihak. Oleh karena itu, penulis ingin menyampaikan terima kasih kepada
pihak-pihak yang telah ikut membantu dalam penulisan tugas akhir ini, baik
dalam memberikan bimbingan, petunjuk, kerjasama, kritikan, maupun saran,
antara lain kepada:
1. Ibu Agnes Maria Polina, S.Kom., M.Sc., selaku Ketua Jurusan Teknik
Informatika Universitas Sanata Dharma yang sudah banyak membantu dan
memberikan dukungan kepada penulis selama masa kuliah.
2. Bapak Alb. Agung Hadhiatma, S.T., M.T., selaku Dosen Pembimbing I
yang telah meluangkan waktu untuk membimbing dan memberi masukan
kepada penulis.
3. Bapak JB. Budi Darmawan, S.T., M.Sc., dan Bapak H.Agung Hernawan,
S.T., selaku panitia penguji pada ujian pendadaran penulis.
4. Seluruh staff dan dosen pengajar di Univeritas Sanata Dharma pada
umumnya dan Jurusan Teknik Informatika pada khususnya.
ix
-
5. Teman – teman TI’99 : Gogon, Andi, Chris ‘kakek’, Wanto, Piere, Agus
Ochay, Anna, Kyky, Irma, Wahyu, Echi dan Celeng, Sotsugyou ”Sayonara
wa ashita no tame ni”.Otsukareta sama dez ta.
6. Dotta Team “Agung, Boy, Emon”, soba ni itte kureta ‘arigatou’..kon kon!
7. Dhanie, Flora, Ella, Ucuz, Ika, Ira, Sandra, Rias, Dita, Dewi, Uus, Meta,
dan Vivi, love you all girls!
8. Dan seluruh pihak yang telah ikut ambil bagian dalam penyelesaian
laporan tugas akhir ini yang tidak dapat penulis sebutkan satu - persatu.
Pada akhirnya penulis menyadari bahwa laporan ini sangat jauh dari
sempurna, karena itu penulis sangat berterima kasih atas kritik dan saran yang
membangun dari pembaca. Semoga laporan ini dapat bermanfaat bagi kita semua.
Yogyakarta, Maret 2007
Wiwied Widiastanti
( Penulis )
x
-
DAFTAR ISI
Halaman Judul................................................................................................... i
Halaman Persetujuan........................................................................................ ii
Halaman Pengesahan ......................................................................................iii
Halaman Pernyataan........................................................................................ iv
Halaman Persembahan..................................................................................... v
Halaman Motto ............................................................................................... vi
Abstraksi ........................................................................................................vii
Abstract .........................................................................................................viii
Kata Pengantar ................................................................................................ ix
Daftar Isi ........................................................................................................xii
Daftar Gambar..............................................................................................xvii
Daftar Tabel .................................................................................................. xix
Bab I Pendahuluan ........................................................................................... 1
1.1 Latar Belakang Masalah................................................................. 1
1.2 Batasan Masalah ........................................................................... 2
1.3 Tujuan dan Manfaat Penulisan ...................................................... 3
1.4 Rumusan Masalah .......................................................................... 3
1.5 Metodologi Penelitian .................................................................... 4
1.6 Sistematika Penulisan .................................................................... 4
Bab II Landasan Teori...................................................................................... 6
2.1 Sistem Informasi ............................................................................ 6
2.2 Basis Data .................................................................................... 10
xii
-
2.2.1 Metode Perancangan Basis Data .............................................. 10
2.2.2 Konsep Entity Relationship Model .......................................... 11
2.2.3 Data Flow Diagram .................................................................. 13
2.3 Database dan Microsoft SQL Server 2000 .................................. 14
2.3.1 Database ................................................................................... 14
2.3.2 Microsoft SQL Server 2000 ..................................................... 15
2.4 Transact-SQL ............................................................................... 16
2.5 Arsitektur Client-server ............................................................... 18
2.6 Visual Basic ................................................................................. 19
Bab III Analisa dan Desain Sistem ................................................................ 23
3.1 Analisa Sistem Lama ................................................................... 23
3.1.1 Prosedur Sistem Penjualan Yang Lama .................................... 24
3.1.2 Kelemahan Sistem Yang Lama................................................. 27
3.2 Analisis Sistem Baru.................................................................... 27
3.2.1 Prosedur Sistem Penjualan Yang Baru ..................................... 27
3.2.2 Diagram Arus Data ................................................................... 30
3.2.3 ER Diagram............................................................................... 35
3.3 Desain sistem ............................................................................... 36
3.3.1 Desain Data Entry ..................................................................... 36
3.3.2 Desain Database ........................................................................ 39
3.3.3 Logical Desain .......................................................................... 40
3.3.4 Physical Desain ......................................................................... 41
xiii
-
Bab IV Implementasi Sistem ......................................................................... 43
4.1 Kebutuhan Sistem ........................................................................ 43
4.1.1 Kebutuhan Perangkat Lunak .................................................... 43
4.1.2 Kebutuhan Perangkat Keras ..................................................... 44
4.2 User Interface ............................................................................... 45
4.2.1 Input .......................................................................................... 45
4.2.1.1 Login ...................................................................................... 45
4.2.1.2 Tampilan Halaman Utama ..................................................... 47
4.2.1.3 Administrasi Penjualan .......................................................... 47
4.2.1.4 Input Data Konsumen ............................................................ 49
4.2.1.5 Master Jenis Mobil................................................................. 51
4.2.1.6 Master Merk Mobil ................................................................ 53
4.2.1.7 Master Model Mobil .............................................................. 54
4.2.1.8 Master Warna Mobil ............................................................. 55
4.2.1.9 Master Detail Mobil .............................................................. 57
4.2.1.10 Transaksi Penjualan ............................................................ 58
4.2.2 Output........................................................................................ 61
4.2.2.1 Nota Penjualan ....................................................................... 61
4.2.2.2 Laporan Penjualan.................................................................. 61
4.3 Kelebihan Sistem ......................................................................... 62
4.4 Kelemahan Sistem........................................................................ 62
Bab IV Penutup.............................................................................................. 63
5.1 Kesimpulan .................................................................................. 63
xiv
-
5.2 Saran............................................................................................. 64
DAFTAR PUSTAKA .................................................................................... 65
LAMPIRAN................................................................................................... 66
xv
-
DAFTAR GAMBAR
Gambar Keterangan Halaman 2.1 Blok komponen sistem informasi 7 2.2 Relationship One to One 12 2.3 Relationship One to Many 13 2.4 Relationship Many to Many 13 3.1 Diagram Prosedur Sistem Lama 26 3.2 Diagram Prosedur Sistem Baru 29 3.3 Context Diagram 30 3.4 Diagram Berjenjang 30 3.5 Overview Diagram 31 3.6 DAD Level 1 Proses 1 31 3.7 DAD Level 1 Proses 2 32 3.8 DAD Level 1 Proses 3 33 3.9 DAD Gabungan 34 3.10 ER Diagram 35 3.15 Logical Desain 40 4.1 Input Login 45 4.2 Halaman Utama 47 4.3 Input Administrasi Penjualan 47 4.4 Input Data Konsumen 49 4.5 Input Jenis Mobil 51 4.6 Input Merk Mobil 53 4.7 Input Model Mobil 54 4.8 Input Warna Mobil 55 4.9 Input Master Detail Mobil 57 4.10 Input Transaksi Penjualan 58 4.11 Output Nota Penjualan 61 4.12 Output Laporan Penjualan 61
xvii
-
DAFTAR TABEL
Tabel Keterangan Halaman 2.1 Simbol Konsep E-R 12 2.2 Simbol Data Flow Diagram 14 3.1 Tabel Jenis Mobil 41 3.2 Tabel Merk Mobil 41 3.3 Tabel Model Mobil 41 3.4 Tabel Warna Mobil 41 3.5 Tabel Detail Mobil 42 3.6 Tabel Konsumen 42 3.7 Tabel Administrasi Penjualan 42
xix
-
1
BAB I
PENDAHULUAN
I.1 Latar Belakang
Dewasa ini, dunia bisnis begitu cepat mengalami perkembangan dan
setiap saat selalu ada perubahan, terutama perubahan dalam hal strategi yang
digunakan setiap pengusaha agar mempunyai nilai lebih dibandingkan dengan
pesaing-pesaingnya. Banyak pengusaha yang memanfaatkan teknologi yang ada
dalam strategi bisnis mereka.
CV. Dian Motor Semarang adalah salah satu perusahaan yang bergerak
dibidang penjualan mobil bekas. Bisnis dari CV. Dian Motor Semarang adalah
memperjualbelikan mobil bekas dari berbagai jenis dan merek. Dalam perusahaan
ini, terdapat beberapa sub sistem yang saling berhubungan erat untuk mendukung
kinerja perusahaan. Namun sistem penjualan pada CV. Dian Motor Semarang
masih dikelola secara manual (non komputerisasi). Mulai dari proses transaksi
penjualan, pengolahan data, dan proses pencetakan laporan penjualan semuanya
dikerjakan secara manual. Dengan demikian dealer ini belum memiliki sistem
komputerisasi yang mendukung sistem informasinya. Dikarenakan adanya
keterbatasan sumberdaya manusia dan teknologi yang digunakan, maka CV. Dian
Motor Semarang memerlukan suatu teknologi sistem informasi terkomputerisasi
untuk membantu proses bisnisnya dan juga untuk meningkatkan pelayanan
penjualan kepada konsumen. Hal ini dikarenakan dalam dunia usaha penjualan,
pelayanan penjualan merupakan hal yang sangat penting. Salah satu cara adalah
dengan menggunakan layanan sistem informasi penjualan berbasiskan teknologi
-
2
komputer.
Dengan adanya alasan di atas, maka penulis tertarik untuk membuat suatu
sistem informasi penjualan berbasiskan teknologi komputer. Sistem Informasi ini
diharapkan akan bisa menyelesaikan masalah – masalah diatas dengan cara :
setiap transaksi penjualan akan secara langsung diinputkan ke komputer sehingga
proses pengolahan dan penyimpanan data serta pembuatan laporan penjualan
menjadi lebih efisien, efektif dan aman. Sistem ini juga diharapkan mampu
menciptakan koordinasi antar bagian, meningkatkan efisiensi kerja, dan
meminimalkan pekerjaan yang berulang-ulang.
1.2 Batasan Masalah
Masalah yang akan diangkat oleh penulis hanya pada pengolahan data
transaksi penjualan mobil secara tunai ke konsumen dengan batasan-batasan
masalah sebagai berikut :
1. Bagian dari proses pengolahan data penjualan mobil dibatasi hanya dari
proses transaksi penjualan mobil secara tunai hingga pada proses
pencetakan laporan, dalam hal ini tidak dibahas mengenai proses
pembelian mobil oleh perusahaan.
2. Proses Update data mobil dibatasi hanya pada proses input data mobil
yang ada.
3. Perangkat lunak yang akan digunakan untuk merancang sistem yang baru
adalah SQL Server sebagai database dan Visual Basic 6 untuk
perancangan antarmukanya.
-
3
4. Dalam hal ini tidak dibahas mengenai keamanan lebih lanjut dari sisi
perangkat keras atau perangkat lunak yang digunakan.
Sehingga diharapkan mampu mengatasi permasalahan- permasalahan yang ada.
I.3 Tujuan dan Manfaat Penulisan
Tujuan dan manfaat pembuatan Sistem Informasi Penjualan ini adalah
sebagai berikut :
1. Membantu menyelesaikan permasalahan – permasalahan yang berkaitan
dengan proses transaksi penjualan tunai kepada konsumen.
2. Meningkatkan efisiensi waktu dalam mengolah data transaksi penjualan
tunai, data konsumen, Update data mobil dan pembuatan laporan
penjualan.
3. Memberikan informasi yang akurat dan cepat tentang data transaksi
penjualan kepada manager.
4. Dengan adanya sistem informasi ini diharapkan pelayanan penjualan
kepada konsumen dapat dilayani dengan cepat.
1.4 Rumusan Masalah
Rumusan masalah dalam penelitian Pra Tugas Akhir ini adalah bagaimana
membangun Sistem Informasi penjualan yang efisien pada CV. Dian Motor
Semarang untuk mengatasi masalah – masalah transaksi penjualan.
-
4
I.5 Metodologi Penelitian
Metodologi yang digunakan penulis dalam pembuatan Sistem Informasi ini adalah
dengan studi kasus. Adapun langkah – langkahnya sebagai berikut :
1. Survey ke CV. Dian Motor Semarang
- Mengamati proses transaksi penjualan .
- Interview dengan Adm.Penjualan tentang permasalahan yang
sering dihadapi.
2. Studi Literatur
- Mempelajari bahasa pemrograman dan basis data yang dipakai
untuk membangun Sistem Informasi.
3. Merancang Sistem Informasi
- Merancang sistem secara umum
- Merancang basis data
- Merancang tampilan dan user interface
4. Membuat Sistem Informasi
- Mengkonversikan semua rancangan ke bentuk program
- Menguji coba program per modul maupun keseluruhan.
I.6 Sistematika Penulisan
BAB I PENDAHULUAN
Berisi latar belakang, batasan masalah, rumusan masalah,
tujuan dan manfaat, metodologi penelitian, serta sistematika
penulisan skripsi.
-
5
BAB II LANDASAN TEORI
Membahas tentang dasar – dasar teori yang akan
digunakan untuk memecahkan masalah yang telah ada.
BAB III ANALISIS DAN DESAIN SISTEM
Bab ini menjelaskan tentang sistem yang kini telah
digunakan dan sistem usulan yang diberikan. Merumuskan
masalah yang dihadapi. Perancangan berisi langkah-
langkah yang dilakukan dalam perancangan sistem yang
baru meliputi perancangan interface dan perancangan
perangkat lunaknya
BAB IV IMPLEMENTASI SISTEM
Membahas tentang pengimplentasian dari perncangan
system yang telah dibuat ke dalam bahasa pemrograman..
BAB V KESIMPULAN DAN SARAN
Bab ini berisi kesimpulan dan saran terhadap Sistem
Informasi yang telah dibuat.
-
6
BAB II
LANDASAN TEORI
2.1 Sistem Informasi
Suatu sistem dibuat dengan suatu maksud tertentu. Maksud dari pembuatan
suatu sistem yaitu untuk mencapai suatu tujuan ( goal ) atau sasaran ( objectives ).
Pengertian dari Sistem itu sendiri adalah kumpulan elemen – elemen yang saling
berinteraksi untuk mencapai suatu tujuan tertentu. 1
Informasi merupakan hal yang sangat penting bagi manajeman dalam
pengambilan keputusan. Informasi yang salah akan mengakibatkan pengambilan
keputusan yang salah pula. Informasi dapat diperoleh dari Sistem Informasi
(information system), atau disebut juga dengan processing system.
Informasi merupakan hasil dari pengolahan data menjadi bentuk yang lebih
berguna bagi yang menerimanya yang menggambarkan suatu kejadian – kejadian
nyata dan dapat digunakan sebagai alat bantu untuk pengambilan suatu keputusan. 2
Keterkaitan data dan informasi sangatlah erat sebagaimana hubungan sebab
dan akibat. Bahwa data merupakan bahan dasar dari sebuah informasi , sedangkan
informasi merupakan elemen yang dihasilkan dari suatu bentuk pengolahan data.
1 Jogiyanto HM., Analisa & Desain Sistem Informasi : Pendekatan Terstruktur Teori dan Praktek Aplikasi Bisnis, Edisi I, Andi Offset Yogyakarta, 1990. Hlm 2 2 Teguh Wahyono., SISTEM INFORMASI ( Konsep Dasar, Analisis Desain dan Implentasi ), Edisi Pertama, Penerbit Graha Ilmu, 2004. Hlm 3
-
7
Data didefinisikan sebagai kelompok teratur simbol – simbol yang mewakili
kuantitas, tindakan, benda, dan sebagainya. 3
Definisi Sistem Informasi menurut Robert A. Leith dan K. Roscoe Davis,
adalah suatu sistem dalam sebuah organisasi yang mempertemukan kebutuhan
pengolah transaksi harian, mendukung operasi, bersifat manajerial dan kegiatan
strategi dari suatu organisasi serta menyediakan pihak luar tertentu dengan laporan
– laporan yang diperlukan.4
Komponen sistem informasi menurut John Burch dan Gary Grudnitski
digambarkan seperti di bawah ini : 5
input model output technology basis data control
User User
User User
User User
Gambar 2.1. Blok Komponen Sistem Informasi
Dari gambar diatas dapat dilihat bahwa sistem informasi memiliki komponen –
komponen yang saling terintegrasi membentuk suatu kesatuan dalam mencapai
sasaran sistem.
3. Teguh Wahyono., SISTEM INFORMASI ( Konsep Dasar, Analisis Desain dan Implentasi ), Edisi Pertama, Penerbit Graha Ilmu, 2004.Hlm 2 4 Jogiyanto HM., Analisa & Desain Sistem Informasi : Pendekatan Terstruktur Teori dan Praktek Aplikasi Bisnis, Edisi I, Andi Offset Yogyakarta, 1990. Hlm 11 5. Teguh Wahyono., SISTEM INFORMASI ( Konsep Dasar, Analisis Desain dan Implentasi ), Edisi Pertama, Penerbit Graha Ilmu, 2004. Hlm 17
-
8
1. Blok Masukan ( Input Block )
Blok masukan dalam sebuah sistem informasi meliputi metode – metode
dan media untuk menangkap data yang akan dimasukkan , dapat berupa
dokumen – dokumen dasar.
2. Blok Model ( Model Block )
Blok model ini terdiri dari kombinasi prosedur, logika dan model
matematik yang berfungsi memanipulasi data untuk keluaran tertentu.
3. Blok Keluaran ( Output Block )
Blok keluaran berupa data – data keluaran seperti dokumen output dan
informasi yang berkualitas.
4. Blok Teknologi ( Technology Block )
Blok teknologi digunakan untuk menerima input, menjalankan model,
menyimpanan dan mengakses data, menghasilkan dan mengirimkan
keluaran serta membantu pengendalian dari sistem secara keseluruhan.
Blok teknologi ini merupakan komponen bantu yang memperlancar
proses pengolahan yang terjadi dalam sistem.
5. Blok Basis Data ( Database Block )
Merupakan kumpulan data yang berhubungan satu dengan lainnya,
tersimpan di perangkat keras komputer dan perangkat lunak untuk
memanipulasinya.
6. Blok Kendali ( Controls Block )
Meliputi masalah pengendalian terhadap operasional sistem yang
berfungsi mencegah dan menangani kesalahan/kegagalan sistem.
-
9
Sebuah sistem informasi yang baik haruslah memiliki kriteria – kriteria
sebagai berikut:
1. Dapat memberikan informasi yang cermat, tepat waktu dan akurat atau
berkualitas,
2. Mempunyai peranan yang kuat dalam perencanaan, analisis dan
pengendalian manajemen untuk mengoptimalisasi guna pertumbuhan
manajemen.
Pengembangan sistem informasi yang berbasis komputer dapat merupakan
tugas kompleks yang membutuhkan banyak sumber daya dan dapat memakan
waktu berbulan – bulan bahkan bertahun – tahun untuk menyelesaikannya. Proses
pengembangan sistem melewati beberapa tahapan dari mulai sistem itu
direncanakan sampai dengan sistem tersebut diterapkan, dioperasikan dan
dipelihara. Bila operasi sistem yang sudah dikembangkan masih timbul kembali
permasalahan – permasalahan yang kritis serta tidak dapat diatasi dalam tahap
pemeliharaan sistem, maka perlu dikembangkan kembali suatu sistem untuk
mengatasinya dan proses ini kembali ke tahap yang pertama, yaitu tahap
perencanaan sistem Siklus ini disebut dengan siklus hidup suatu sistem ( system life
cycle ).
Urutan – urutan siklus hidup sistem menurut Robert A. Leicth / K. Roscoe
Davis adalah sebagai berikut :
-
10
1. Analisa sistem
a. Definisi kebutuhan dan pendekatan alternatif
b. Definisi sistem secara umum atau secara konsep
2. Desain dan implementasi sistem
a. Desain sistem terinci
b. Rancang bangun program dan perencanaan implementasi
c. Pemrograman dan pengetesan
d. Pengetesan sistem
e. Konversi
f. Implementasi
3. Penilaian sistem
2.2 Basis Data
Basis data merupakan sekumpulan data yang terdiri atas satu atau lebih
tabel yang terintegrasi satu sama lain, dimana setiap pemakai (user) diberi
wewenang untuk dapat mengakses ( mengubah, menghapus, menganalisis,
menambah, memperbaiki ) data dalam tabel tersebut. 5
2.2.1 Metode Perancangan Basis data
Proses disain basis data dibagi menjadi 3 tahap utama sebagai
berikut :
1. Conceptual Design
Hasil dari tahap ini berupa conceptual schema yang mengacu pada suatu
conceptual model ( ER Model ).
5 MADCOMS, Basis data Visual Basic 6.0 dengan SQL, Edisi Pertama, Kerjasama Penerbit Andi Yogyakarta dengan MADCOMS,2003. Hal. 33
-
11
2. Logical Design
Pada tahap ini, conceptual schema akan diterjemahkan ke model data
yang sesuai dengan DBMS yang digunakan. Hasil yang didapat berupa
logical schema basis data yang mengacu pada suatu logical data model.
Logical data model merepresentasikan data dalam suatu cara yang tidak
melibatkan physical details.
3. Physical Design
Pada tahap ini, logical schema dilengkapi dengan detail – detail
implementasi secara fisik ( organisasi file dan index ). Physical schema
yang dihasilkan berupa tabel.
2.2.2 Konsep Entity Relationship Model ( ER Model )
Dalam merancang tabel, hubungan antar tabel mengidentifikasikan
primary dan foreign key dan aturannya, serta domain untuk basis data, perlu
suatu metode yang disebut diagram Entity-Relationship ( E-R ). Dua
komponen utama pembentuk ER Model adalah : Entitas ( entity ) dan Relasi
( relationship ). Komponen yang digunakan pada diagram E – R adalah
sebagai berikut :
-
12
Tabel 2.1. Simbol Konsep E-R
Entitas : sebuah objek yang nyata ada dan dapat dibedakan dari
sesuatu yang lain.Sekelompok entitas yang sejenis dan berada dalam ruang
lingkup yang sama disebut Himpunan Entitas ( Entity Set ).
Relasi : relasi / hubungan antar entity. Ada 3 tipe relasi. Tiap tipe
menunjukkan jumlah record dari setiap tabel yang dapat direlasikan ke
record pada tabel lain. Ketiga tipe tersebut adalah sebagai berikut :
One to One, satu entity hanya berelasi dengan satu entity lain.
Misal : 1 mata kuliah diajar oleh hanya 1 dosen.
Gambar Definisi
Entity Relasi Atribut
Penghubung
Mata Kuliah
Dosen Diajar
Gambar 2.2. Relationship One to One
-
13
One to Many, satu entity berelasi dengan lebih dari satu entity.
Misal : sebuah ruang kuliah bisa diisi oleh banyak mahasiswa.
Ruang Kuliah
Mahasiswa Diisi
Gambar 2.3. Relationship One to Many
Many to Many, banyak entity bisa berelasi dengan banyak entity
lainnya. Misal : Banyak mahasiswa bisa mengambil banyak mata kuliah.
Mahasiswa Mata
Kuliah Mengambil
Gambar 2.4. Relationship Many to Many
2.2.3. Data Flow Diagram
Data Flow Diagram, menjelaskan kepada user bagaimana nantinya
fungsi – fungsi di sistem informasi secara logika akan bekerja. Data Flow
Diagram akan menginterprestasikan Logical Model dari suatu sistem. Arus
dari data tersebut nantinya dapat dijelaskan dengan menggunakan kamus
data ( data dictionary ).
-
14
Manfaat digunakannya Data Flow Diagram adalah sebagai berikut :
1. Sebagai alat bantu komunikasi, dan
2. Mempermudah memahami sistem secara logika.
Tabel 2.2. Simbol Data Flow Diagram
Simbol Arti
Kesatuan Luar (Entity)
Arus data (Data Flow) Proses ( Process ) Simpanan Data ( Data Store )
2.3 Database dan Microsoft SQL Server 2000
2.3.1 Database
SQL server memakasi sebuah tipe database yang dinamakan database relational.
Database relational adalah database yang mengorganisasikan data dalam bentuk tabel.
Tabel dibentuk dengan mengelompokan data yang mrmpunyai subjek yang sama. Tabel
berisi baris - baris dan kolom – kolom informasi. Tabel – tabel dapat saling berhubungan
-
15
jika diinginkan. Database adalah sekumpulan data yang saling berhubungan. Dalam SQL
server database bukanlah sebuah file tetapi merupakan sebuah konsep logis yang berisi
sekumpulan objek – objek yang berhubungan. Objek – objek dalam sebuah database
antara lain : tabel, kolom, tipe data, stored prosedure, trigger, rule, kunci utama (primary
key), kunci tamu (foreign key), konstrain, default, view, dan index.
2.3.2 Microsoft SQL server 2000
Sistem database client/server seperti SQL server 2000 memakai sejumlah proses
server untuk memanipulasi data dan mengharuskan proses client berhubungan dengan
proses server menggunakan mekanisme IPC (inter-process communication) local atau
remote, misalnya socket TCP/IP. Proses server adalah aplikasi server yang memproses
perintah – perintah SQL. Setelah proses server menjalankan perintah – perintah, hasilnya
akan dikirim kembali ke proses client melalui mekanisme IPC. Dengan cara ini sistem
client/server memberikan pengaksesan yang lebih baik pada yang dipakai bersama –
sama oleh banyak user.
SQL server 2000 memberikan bahasa dan antarmuka yang baik untuk
pemrograman dan komunikasi pada server. Transact-SQL adalah bahasa pemrograman
server yang merupakan superset dari ANSI-SQL. ANSI-SQL mendefinisikan empat
peritah dasar untuk memanipulasi data yaitu SELECT, INSERT, UPDATE, DELETE dan
sejumlah perintah untuk mendefinisikan stuktur database. Transact-SQL menambahkan
beberapa hal pada ANSI-SQL. Penambahan tersebut adalah konstruksi pemrograman yang
memungkinkan pemakaian stored procedure untuk mengubah data dan trigger yang yang
akan dijalankan, karena terjadi event tertentu.
-
16
2.4 Transact-SQL
Transact adalah pengembangan dari bahasa sql yang dipublikasikan oleh
international Organization for Standarization (ISO) dan American National Standars
Institute (ANSI). Perintah Transact-SQL. Adalah sekumpulan program yang dijalankan
pada objek – objek atau data dalam database. SQL server mempunyai tiga jenis Transact-
SQL yaitu :
a. Data Definition Language (DDL)
DDL merupakan bagian dari sistem manajemen database, dipakai untuk
mendefinisikan dan mengatur semua atribut dan properti dari sebuah database.
Untuk setiap objek biasanya ada pernyataan – pernyataan CREATE, ALTER dan
DROP. Misalnya CREATE TABLE, ALTER TABLE dan DROP TABLE.
Bentuk umum pernyataan – pernyataan DDL :
• CREATE nama_objek
• Alter nama_objek
• DROP nama_objek
b. Data Control Language (DCL)
DCL dipakai untuk mengontrol hak – hak pada objek-objek database. Perintah –
perintah yang dapat dipakai adalah GRANT dan REVOKE (dari SQL-92).
Transact-SQL menambahkan pernyataan DENY. Perintah GRANT dipakai untuk
memberikan hak kepada user untuk mengakses sebuah database. Perintah
REVOKE dipakai untuk membuang hak yang telah diberikan (dengan perintah
-
17
GRANT) atau hak yang dilarang (dengan perintah DENY). Perintah DENY untuk
membuat sebuah entry dalam sistem sekuritas yang melarang sebuah izin pada
sebuah account melalui group atau keanggotaan role.
c. Data Manipulation Language (DML)
DML dipakai untuk menampilkan, menambah, mengubah dan menghapus data di
dalam objek – objek yang didefinisikan oleh DDL. Perintah DDL adalah SELECT,
INSERT, UPDATE dan DELETE.
1. SELECT
Dipakai untuk membaca data dari database SQL server. Pernyataan select
berisi empat properti utama dari hasilnya yaitu :
• Kolom – kolom yang dimasukan kedalam hasil
• Tabel yang akan di ambil
• Kondisi yang harus dipenuhi oleh tabel asal.
• Urutan dalam hasil
Bentuk umum pernyataan SELECT :
SELECT daftar_select
FROM daftar_tabel
[WHERE kondisi_pencarian] | GROUP BY daftar_group_by
|[HAVING kondisi_pencarian] | [ORDER BY
daftar_order[ASC|DESC]]
-
18
2. INSERT
Dipakai untuk menambahkan satu atau beberapa data ke dalam tabel. Bentuk
umum pernyataan INSERT :
INSERT INTO table(column1, column 2, [columnN])
VALUES (value1, value2, [valueN])
3. UPDATE
Dipakai untuk mengubah data pada satu baris, beberapa baris, atau semua
baris dalam tabel. Bentuk umum pernyataan UPDATE :
UPDATE table SET column1 = value1, column2 = value2, [columnN
= valueN] WHERE id_column = value]
4. DELETE
Dipakai untuk menghapus satu atau beberapa baris dalam tabel. Bentuk umum
perntaan DELETE :
DELTE FROM tablename [where field1 = value1 |AND|OR| field2 =
value2 |AND|OR| fieldN= valueN.
2.5 Arsitektur Client-Server 7
Arsitektur client – server didasarkan pada hal yang sederhana : komputer
yang berbeda melakukan tugas yang berbeda, dan setiap komputer bisa
dioptimalkan untuk tugas tertentu. Di dalam lingkungan networking , DBMS
7 Evangelos Petroutsos, Menguasai Pemrograman Basis data dengan Visual Basic 6, Penerbit PT Elex Media Komputindo Jakarta, 2002. Hal. 14.
-
19
terdapat di dalam satu komputer. Tetapi banyak aplikasi yang mengakses basis data,
dan semua client melakukan permintaan dari basis data yang sama. Program yang
menerima dan melayani permintaan ini adalah DBMS, dan komputer yang
menjalankan DBMS disebut dengan server basis data. Aplikasi client tidak
mengetahui bagaimana data disimpan pada basis data. Arsitektur client server
mempunyai 2 model yaitu Model Dua - Tingkat ( Two - Tier ) dan Model Tiga –
Tingkat ( Three – Tier ).
Pada Model Dua – Tingkat ( Two - Tier ), tingkat pertama dari aplikasi
client – server adalah client tier, atau presentation tier yang dijalankan pada client.
Tingkat ini mengandung kode yang menampilkan data dan berinteraksi dengan
user, dan biasanya berupa aplikasi VB. Tingkat kedua adalah basis data server atau
DBMS.
Model Tiga – Tingkat ( Three – Tier ), model ini sering disebut dengan
middle tier. Tingkat menengah ini merupakan suatu Class ( atau banyak Class )
yang memiliki beberapa metode dan mengisolasi client dari server. Keuntungan
utama dari middle tier adalah ia mengisolasi client dari server. Client tidak lagi
mengakses basis data, tetapi memanggil metode yang dimiliki oleh objek – objek
pada middle – tier.
2.6 Visual Basic 6.0 78
Dari sekian banyak bahasa pemrograman visual yang ada saat ini, Visual
Basic merupakan salah satu yang termudah untuk dipelajari dan handal. Visual
8. Widodo Budiharto, S.Si, Aplikasi Basis data dengan SQL Server 2000 dan Visual Basic 6, PT. Elex Media Komputindo Jakarta, 2002. Hal. 86.
-
20
Basic ialah bahasa pemrograman event – driven yang berasal dari BASIC. Event
driven artinya program menunggu sampai adanya respon dari pemakai berupa
kejadian tertentu, misalnya tombol di klik, atau menu dipilih. Ketika even
terdeteksi, even yang berhubungan akan melakukan aksi sesuai dengan kode yang
diberikan.
Struktur Aplikasi ( Proyek ) pada Visual Basic 6 terdiri dari :
• Visual Basic IDE
Visual Basic IDE (Interface Development Environment) ialah tampilan
antarmuka program dengan pengguna yang sudah bersifat GUI (
Graphical User Interface ), menyajikan banyak kemudahan bagi para
programer untuk membuat aplikasi.
• Menu Bar
Menu bar berfungsi memberikan kemudahan kepada pengguna dalam
memilih aksi – aksi yang umum seperti mengedit, mengkopi atau
menjalankan program. Beberapa fungsi yang ada di menu bar juga
tersedia di toolbar.
• Form
Form di Visual Basic ialah sebuah media tempat kita membuat aplikasi
atau antarmuka yang bersifat GUI ( Graphical User Interface ). Kita
dapat menempelkan berbagai macam objek atau kontrol di atas form
tersebut.
-
21
• Standart Toolbar
Standart toolbar berfungsi menyediakan fasilitas yang umum
digunakan para programer ketika sedang mendesain aplikasi, seperti
membuka atau menyimpan file, menjalankan program dan lain – lain.
• Project Window
Dengan adanya project window, kita dapat melihat form atau objek
apa saja yang ada di dalam suatu projek, dan kita dapat menghapusnya
dari project window tersebut.
• Toolbox
Toolbox berisi komponen – komponen standart yang diperlukan di
dalam membuat aplikasi seperti textbox, label, combo box dan lain –
lain.
• Properties Window
Setiap komponen termasuk form tentu diharapkan mempunyai
karakteristik atau sifat tersendiri. Visual Basic menyediakan properties
window untuk menetapkan properties dari tiap komponen dengan
mudah.
• Code Editor
Untuk menulis kode, kita menggunakan Code editor, biasanya dengan
mengklik view code atau mengklik ganda pada komponen tersebut.
Code editor membuat kita mudah untuk menulis program karena
fasilitas auto list yang disediakan Visual Basic.
-
22
• Fasilitas Autolist
Kelebihan lainnya dari Visual Basic ialah fasilitas autolist, program
akan otomatis menampilkan method atau properti apa saja yang
mungkin akan digunakan ketika kita mengetik dot(.). Dengan adanya
fasilitas autolist ini, memperkecil kesalahan pengguna atau programer
di dalam membuat program . Hanya saja fasilitas autolist ini akan
berjalan dengan baik jika pilihan references pada menu project yang
sesuai dengan pemrograman yang kita buat tidak dicentang pada
program.
• Form Layout Windows
Untuk menetapkan posisi tampilan program ketika dijalankan, kita
menggunakan Form Layout yang berada di bagian kanan bawah
jendela. Untuk menggunakanya, cukup kita klik form layout tersebut,
lalu kita gerakkan ke posisi mana form yang ingin kita tampilkan.
-
23
BAB III
ANALISA DAN DESAIN SISTEM
3.1 Analisis Sistem Lama
Langkah-langkah yang dilakukan untuk menganalisa sistem pada CV.
Dian Motor Semarang adalah sebagai berikut:
a. Observasi sistem
Dalam hal ini bagaimana sistem tersebut berjalan, apakah secara manual
kinerja sistem dapat menjadi efisien dan terkoordinasi dengan baik. Kemudian
bagaimana proses-proses yang terjadi dalam CV. Dian Motor Semarang
khususnya pada pelayanan penjualan. Siapa saja yang menangani proses-
proses yang dilakukan di CV. Dian Motor Semarang ini. Diantaranya untuk
proses penjualan mobil oleh Administrasi Penjualan dilakukan secara manual.
Dari hasil pengamatan bahwa dalam melakukan suatu proses pekerjaan sub
bagian yang terkait masih mengerjakannya secara manual sehingga kinerja
sistem menjadi kurang efisien dan kurang terkoordinasi dengan baik.
b. Menganalisa kebutuhan informasi
Dari proses observasi diketahui bahwa dalam dealer mobil ini terdapat proses
yang dilakukan yaitu proses penjualan mobil, proses pembayaran, proses
pembuatan laporan. Setiap proses yang terjadi dalam dealer mobil ini menjadi
suatu sistem yang akan dikembangkan menjadi sistem informasi. Kebutuhan
informasi diperlukan untuk meningkatkan kinerja antar bagian menjadi
optimal dan tidak terjadinya penumpukan pekerjaan.
-
24
c. Wawancara dan pengambilan data
Setelah mengetahui sistem yang ada dalam CV. Dian Motor Semarang maka
dilakukan wawancara untuk menjelaskan bagaimana sistem tersebut berjalan
dan apa saja yang berhubungan dengan sistem itu. Wawancara dilakukan pada
bagian Administrasi Penjualan karena semua informasi dapat diperoleh dari
bagian ini dan juga selama observasi sistem dan wawancara dilakukan pada
bagian Administrasi Penjualan, dan untuk bagian-bagian yang lain hanya
dilakukan pengamatan secara langsung untuk proses yang terjadi. Untuk
pengambilan data diambil dari bagian Administrasi Penjualan karena semua
data berada dibagian ini seperti data konsumen, data stock mobil. Adapun data
yang diberikan oleh pihak Administrasi Penjualan adalah daftar stock mobil
yang dijual, daftar syarat-syarat pembelian mobil dan formulir pembelian
mobil yang berisi data konsumen, jenis mobil yang dibeli, total harga mobil.
3.1.1 Prosedur Sistem Penjualan Yang Lama
Prosedur yang terjadi pada sistem lama penjualan mobil adalah:
1. Konsumen datang melihat dan memilih mobil yang diinginkan dan
Administrasi Penjualan memberikan syarat-syarat pembelian mobil.
2. Setelah ada kecocokan harga dengan Administrasi Penjualan, Administrasi
Penjualan menjelaskan syarat-syarat yang diperlukan untuk membeli
mobil kepada konsumen sekaligus memberikan formulir pembelian mobil.
3. Konsumen menunjukan kartu identitas kepada Administrasi Penjualan
untuk dicatat.
-
25
4. Administrasi Penjualan mencatat data pembeli secara manual dan
menyimpannya pada arsip konsumen. Semua proses transaksi disimpan
dalam bentuk arsip penjualan.
5. Konsumen melakukan pembayaran tunai pada kasir ( bagian keuangan).
6. Kasir menerima pembayaran dari pembeli, kemudian memberikan
kwitansi pembelian kepada konsumen.
7. Administrasi Penjualan membuatkan bukti pembelian dan menyimpannya
pada arsip bukti pembelian.
8. Administrasi Penjualan mencopy Bukti Pembelian sebanyak 3 rangkap.
Satu untuk konsumen, satu untuk arsip, dan satu untuk kasir.
9. Administrasi Penjualan memberikan BPKB, STNK beserta surat-surat
kelengkapan mobil lainnya(faktur dan kwitansi kosong atas nama di
STNK) kepada konsumen.
10. Administrasi Penjualan memberikan surat pengambilan mobil kepada
konsumen.
11. Konsumen menyerahkan surat pengambilan mobil kepada bagian bengkel.
12. Bagian Bengkel/Service menyerahkan mobil kepada konsumen.
13. Konsumen meninggalkan dealer
14. Administrasi Penjualan membuat dan memberikan Laporan Pembelian &
Laporan Penjualan ke Manager.
-
26
KONSUMEN
ADM. PENJUALAN BENGKEL/SERVICE KASIR MANAGER
Mulai
Melihat dan
memilih
Membayar tunai/cash
Mengisi formulir & Memberi
Kartu
Formulir pembelian
mobil
1Bukti Penjualan
Menerima BPKB dan
STNK
Surat Pengambilan
mobil
Menerima Surat
pengambilan mobil
Menyerahkan surat
pengambilan mobil
Terima Mobil
Konsumen pulang
Memberi penjelasan
Memberi formulir & brosur type
A
Formulir & Kartu
Identitas
Memberi BPKP dan
STNK
Surat
Pengambilan mobil
Menyerah
kan mobil
Terima uang
A
BPKB dan
STNK
Laporan Penjualan
Selesai
Mencatat data konsumen
Media PenyimpananArsip Konsumen
Membuat Lap. Penjualan
Media penyimpananArsip Penjualan
2Bukti Penjualan
1
MenyerahkanLap. Penjualan
Membuat Lap. Penjualan
Mencopy Bukti Penjualan
Membuat Bukti Penjualan
Medaia Penyimpanan Arsip Bukti Penjualan
Memberi Surat
Pengambilan
bil
2 3
Bukti Penjualan
Laporan Penjualan
Gambar 3.1 Diagram Prosedur Yang Lama
-
27
3.1.2 Kelemahan Sistem yang Lama
Dari hasil pengamatan dan analisis yang telah dilakukan ada beberapa
kekurangan dari sistem yang lama. Kekurangan tersebut dapat menyebabkan
permasalahan dan menggangu kinerja aktivitas dari pihak CV. Dian Motor
Semarang. Kekurangan tersebut antara lain:
1. Kurang efisiennya proses pengisian dan penyimpanan data-data konsumen
maupun mobil yang dilakukan dengan manual (non komputerisasi),
sehingga juga mengakibatkan kurangnya keamanan data-data yang
tersimpan.
2. Sulitnya pihak dealer dalam melakukan pencarian data konsumen yang
dibutuhkan, karena terdapat dalam bentuk arsip.
3. Dibutuhkan waktu yang cukup lama dalam pembuatan laporan penjualan
dan laporan stok harian.
4. Terlalu banyaknya bukti/laporan pembelian maupun penjualan dalam
bentuk arsip-arsip, sehingga cukup merepotkan karyawan dalam
melakukan pengolahan data.
3.2 Analisis Sistem Baru
Dari beberapa kelemahan sistem yang lama, maka diusulkan sistem baru
yang terkomputerisasi. Adapun prosedur sistem tersebut adalah sebagai berikut:
3.2.1 Prosedur Sistem Penjualan Yang Baru
Prosedur sistem baru penjualan mobil:
1. Konsumen datang melihat dan memilih mobil.
2. Konsumen melihat kondisi fisik mobil dengan bantuan bagian bengkel
(kondisi mesin, body mobil, dll) didampingi oleh Administrasi
Penjualan.
-
28
3. Konsumen menentukan mobil yang diinginkan. Setelah ada kecocokan
harga, administrasi Penjualan menjelaskan syarat-syarat yang
diperlukan untuk membeli mobil kepada konsumen
4. Konsumen memberikan kartu identitas (KTP,SIM) kepada
Administrasi Penjualan.
5. Administrasi penjualan menginputkan data konsumen melalui form
Data Konsumen.
6. Administrasi Penjualan melengkapi form Penjualan yang telah berisi
data konsumen, dengan data mobil yang dibeli dan harga yang
dibayarkan.
7. Administrasi penjualan mencetak nota penjualan.
8. Konsumen melakukan pembayaran tunai pada kasir. Konsumen akan
memperoleh nota penjualan.
9. Administrasi Penjualan memberikan BPKB, STNK beserta surat-surat
kelengkapan mobil lainnya (faktur dan kwitansi kosong atas nama di
STNK) kepada konsumen.
10. Administrasi Penjualan menyerahkan mobil kepada konsumen.
11. Konsumen meninggalkan dealer.
12. Administrasi Penjualan mencetak laporan penjualan yang nantinya
akan diserahkan ke Manager.
-
29Gambar 3.2 Diagram Prosedur Yang Baru
Melihat Kesesuaian no.rangka & no.mesin
NP
1 Nota Penjualan
1Nota penjuala
STNK
BPKB
Start
Melihat & memilih mobil
Menentukan pilihan
Melihat kondisi mobil
Mengisi form data konsumen
Media Penyimpanan data konsumen
Memberikan SIM/KTP
SIM/KTP
Membayar Tunai
Konsumen pulang
End
Tidak
ya
Beri Penjelasan
Menunjukkan mobil
SIM/KTP
Memberikan BPKB& STNK
STNK
BPKB
Melengkapi form Penjualan
Media Penyimpanan data penjualan
2
Cetak Lap.Penjualan
Terima mobil
Menyerahkan mobil
Lap.Penjualan
Nota Penjualan
Memeriksa Kondisi Mobil
Rp.
NP
Nota Penjualan
1
2
2 Nota penjuala
Lap.Penjualan
ManagerKasir BengkelAdministrasi PenjualanKonsumen
Mencetak nota penjualan
-
30
3.2.2 Diagram Arus Data (DAD)
2.2P Memasukkan Data Penjualan
- Nota Penjualan
- Data konsumen - Nota penjualan
- Update data mobil - Laporan Penjualan
Administrasi Penjualan
BPKB,STNK,Surat-surat kelengkapan mobil,Nota Penjualan
Manager.Konsumen
0
Sistem Informasi Penjualan
CV.Dian Motor
KTP/SIM,Mobil yang dibeli, Pembayaran
Laporan Penjualan, Nota Penjualan
- Pendapatan
Kasir
Gambar 3.3 Context Diagram
Diagram berjenjang dari sistem diatas dapat dilihat pada gambar di bawah ini :
2
Memproses Order
Konsumen
2.1P
Memasukkan Data
Konsumen
2.3P
Membuat Nota
Penjualan
1.P
Login
0
Sistem Informasi Penjualan
CV.Dian Motor
3.P
Mencetak Laporan
Gambar 3.4 Diagram Berjenjang
-
31
Overview Diagram dari sistem diatas dapat dilihat pada gambar dibawah ini :
D1 Konsumen
2
Proses order konsumen
Manager
Laporan Penjualan
3.P CetakLaporan
Penjualan
Administrasi Penjualan
1.P Login
D2 Penjualan
D2 Penjualan Nota penjualan Kasir
Pesan mobil
Data konsumen Konsumen
Gambar 3.5. Overview Diagram
Diagram Level 1 untuk proses 1
1.P
1 Login
Login
Hak akses ke sistem
Adm penjualan
Detail proses
2
Gambar 3.6. Desain DAD pada level 1 untuk proses 1
-
32
Diagram Level 1 untuk proses 2
2
D2 Penjualan
2.3P
Membuat Nota Penjualan
Konsumen Data konsumen Pesan mobil
3
Detail Penjualan
Kasir
2.1P
Memasukkan Data konsumen
Detail Penjualan
2.2P
Memasukkan data
Penjualan
D1 Data Konsumen
Nota penjualan
Administrasi penjualan
Gambar 3.7. Desain DFD pada level 1 untuk proses 2
-
33
Diagram Level 1 untuk proses 3
D3 Laporan Penjualan
Laporan penjualan
Laporan Penjualan
Detail Penjualan
2
3.P
Mencetak Laporan
Penjualan
Detail Data konsumen
D1 Konsumen
3.P
Manager
Gambar 3.8. Desain DAD pada level 1 untuk proses 3
-
34
Diagram Gabungan
Gambar 3.9. Desain DAD Gabungan
2.3P
Membuat Nota Penjualan
1.P
Login
Konsumen Data konsumen Pesan mobil
Detail Penjualan
D2 Penjualan
Data konsumen
Data Konsumen
Kasir
2.1P
Memasukkan Data
Konsumen
Detail Penjualan
2.2P
Memasukkan data penjualan
D1 Konsumen
Nota Penjualan
3P
Mencetak Laporan
Penjualan
Detail penjualan
Detail Data konsumen
ManagerNota
Penjualan
Laporan penjualan
D3 Laporan Penjualan
Administrasi penjualan Password
Kode Admin
-
35
DetailMobil Kodemobil (PK) KodeJenis KodeMerk KodeModel KodeWarna Tahun Pembuatan No. Polisi BPKB STNK Jumlah
MerkMobil KodeMerk (PK) MerkMobil
JenisMobil Kodejenis (PK) JenisMobil
ModelMobil KodeModel(PK) ModelMobil
WarnaMobil KodeWarna(PK) WarnaMobil
Transaksi Penjualan
KodePebjualan (PK) KodeKonsumen KodeMobil NomorRangka NomorMesin HargaJual TanggalPenjualan
Konsumen KodeKonsumen (PK) NamaLengkap Alamat JenisKelamin NomorTelpon JanisKartu NomorKartu
Administrasi Penjualan
KodeAdmin (PK) Nama Password MenuTransaksi MenuMaster MenuLaporan MenuAdmin
1n
Gambar 3.10 ER Diagram
n1
n
Punya
n
n
n
Punya
Punya
Punya
1
3.2.3 ER Diagram
1
1
1
-
36
3.3 Desain Sistem 3.3.1 Desain Data Entry
Dalam Desain data entry, diperlukan adanya pengkodean dengan maksud agar
data yang dimasukkan lebih akurat dan lebih efisien. Pada sistem informasi penjualan
mobil secara tunai yang diusulkan untuk CV. Dian Motor Semarang ini digunakan
Alphabetic Derivation Code (Kode dengan singkatan huruf) dan Simple Sequence
Code (Urutan kode sederhana dengan angka) untuk pengkodean data mobil dan
pengkodean data konsumen/pembeli. Aturan Penulisannya adalah sebagai berikut :
a. Pengkodean data mobil
Tabel data mobil mempunyai Primary Key yaitu ID Mobil . Aturan :
- Digit ke 1 dan 2 adalah kode jenis mobil dan penulisan ID mobil
adalah sebagai berikut :
Jenis mobil Kode Penulisan
Jeep 01
Station Wagon 02 Sedan 03
Misal : 01 untuk jenis Jeep, 02 untuk jenis Station Wagon, 03 untuk
jenis Sedan, dll.
- Digit 3 dan 4 untuk mobil adalah kode merk mobil dan
penulisannya sebagai berikut :
Merk Mobil Kode Penulisan
Suzuki 01 Daihatsu 02 Toyota 03 Isuzu 04 Mitsubishi 05 Honda 06
-
37
- Digit 5 dan 6 untuk mobil adalah kode model mobil dan
penulisannya sebagai berikut :
Merk Model Kode
Penulisan
Suzuki
- Escudo
- Sidekick
- Katana GX
- Carreta
- 01
- 02
- 03
- 04
Daihatsu - Espass
- Taruna
- Feroza
- Taft
- Classy
- Charade CS
- 01
- 02
- 03
- 04
- 05
- 06
Toyota - Kijang NSC
- Kijang LSX
- Soluna GLi
- Corolla
- 01
- 02
- 03
- 04
Isuzu - Panther Miyabi - Panther SGR
- 01
- 02
Mitsubishi - Colt T120 - 01
Honda - Prestige
- 01
- Maestro - 02 - Civic LX - 03
- City - 04
misal : 0101 untuk Suzuki Escudo, 0104 untuk Suzuki Carreta, 0304
untuk Toyota Corolla, 0603 untuk Honda Civic ,dll.
- Digit 7 dan 8 untuk mobil adalah kode warna mobil dan penulisannya
sebagai berikut :
-
38
Warna Mobil Kode Penulisan
Putih 01 Hitam 02
Silver 03 Hitam Metalik 04
Merah Metalik 05 Hijau Metalik 06
Ungu Metalik 07
misal : 01 untuk mobil warna Putih, 07 untuk mobil warna Ungu
Metalik, 11 untuk mobil warna Smoke Silver, 13 untuk mobil warna
Biru Turquis, dll.
- Digit 9 dan 10 untuk mobil adalah kode tahun pembuatan mobil misal
: 95 untuk tahun pembuatan 1995, 01 untuk tahun pembuatan 2001,dll.
Abu-abu Metalik 08
Biru Tua Metalik 09
Merah Silver 10
Smoke Silver 11
Hijau Abu-abu Metalik 12
Biru Turquis 13
- Digit 11 dan 12 untuk mobil adalah kode wilayah nomor polisi
misalnya : H untuk nomor polisi wilayah kota Semarang, B untuk
wilayah kota Jakarta, AB untuk wilayah kota Yogyakarta, dll.
Di bawah ini adalah penjelasan dari kode penulisan mobil secara
lengkap :
Contoh Penulisan Keterangan
0101010495 01 01 01 04 95 H Kode Nomor Polisi : H Kode Tahun Pembuatan : 1995 Kode Warna : Hitam Metalik Kode Model : Escudo Kode Merk : Suzuki Kode Jenis : Jeep
-
39
b. Pengkodean data Penjualan
Kode Penjualan Keterangan kode
DM : adalah ID untuk penjualan mobil
DM0001 0001 : Nomor urut penjualan mobil, 0001-9999.
c. Pengkodean data Administrasi Penjualan
Kode Admin Keterangan kode
AP 01 AP : adalah kode administrasi penjualan
01 : nomor urut admin
d. Pengkodean data Konsumen
Kode Konsumen Keterangan kode
KS 001 KS : adalah kode konsumen
001 : nomor urut konsumen dari 001-999.
3.3.2 Desain Database
Pada tahap ini akan ditentukan file atau tabel yang menjadi sumber data
untuk Sistem Informasi Penjualan. Tabel – tabel tersebut berisi informasi data
jenis mobil, data merk mobil, data model mobil, data warna mobil, data detail
mobil, data konsumen dan data penjualan yang digunakan untuk merekam setiap
data transaksi yang terjad
-
40
3.3.3 Logical Desain (Relasi Antar tabel)
Setelah dilakukan pengindentifikasian file-file yang diperlukan
oleh sistem informasi kemudian file tersebut diuraikan menjadi tabel
dan direlasikan dan dapat dilihat pada Gambar 3.11 berikut ini :
DetailMobil Konsumen JenisMobil KodeMobil * KodeKonsumen *
KodeJenis KodeMerk KodeModel KodeWarna TahunPembuatan NomorPolisi BPKB STNK Jumlah HargaBeli KodePenjualan TanggalPenjualan KodeKonsumen **
KodeJenis *
NomorRangka NomorMesin HargaJual
JenisMobil NamaLengkap Alamat JenisKelamin
MerkMobil NomorTelepon KodeMerk* MerkMobil
Jeniskartu NomorKartu
ModelMobil KodeModel* ModelMobil
WarnaMobil KodeWarna*
Tabel AdministrasiPenjualan Kode Admin * Nama Password HakMenuMaster
HakMenuTransaksi WarnaMobil HakMenuLaporan
HakMenuAdmin
Gambar 3.11 Logical Desain
-
41
3.3.4 Physical Desain
Dari desain basis data pada gambar diatas, kemudian
dibuat sebuah rancangan tabel yang nantinya akan digunakan untuk
basis data pada sistem ini.Tabel–tabel tersebut adalah sebagai
berikut:
TabelJenisMobil
KodeJenis varchar 2 pk JenisMobil varchar 20
Tabel 3.1 Tabel Jenis Mobil
TabelMerkMobil KodeMerk varchar
2 pk MerkMobil varchar
20
Tabel 3.2 Tabel Merk Mobil
TabelModelMobil KodeModel varchar 2 pk ModelMobil char 20
Tabel 3.3 Tabel Model Mobil
TabelWarnaMobil
KodeWarna varchar
2 pk WarnaMobil char 30
Tabel 3.4 Tabel Warna Mobil
-
42
TabelDetailMobil KodeMobil varchar 8 pk KodeJenis varchar 2 fk KodeMerk varchar 2 fk KodeModel varchar 2 fk TahunPembuatan datetime 8 KodeWarna varchar 2 fk NomorPolisi
varchar 10
BPKB varchar 15 STNK
varchar 15
Jumlah int 4 HargaBeli
varchar 10
KodePenjualan varchar 7 KodeKonsumen
varchar 5 fk
TanggalPenjualan datetime 8 NomorRangka
varchar 25
NomorMesin varchar 20 HargaJual varchar 10
Tabel 3.5 Tabel Detail Mobil
TabelKonsumen KodeKonsumen
varchar 5 Pk
NamaLengkap
char 50 Alamat varchar 50 JenisKelamin char
1 NomorTelpon varchar 15 JenisKartu char 10 NomorKartu
varchar 50
Tabel 3.6 Tabel Konsumen
TabelAdministrasiPenjualan
KodeAdmin varchar 4 pk Nama varchar 50 Password varchar 10 menuMaster varchar 5 menuTransaksi varchar 5 menuLaporan varchar 5 menuAdmin varchar 5
Tabel 3.7 Tabel AdministrasiPenjualan
-
43
BAB IV
IMPLEMENTASI SISTEM
Setelah melakukan analisa dan rancangan, tahap berikutnya adalah
mengimplementasikan hasil dan rancangan yang sudah dibuat sebelumnya. Bab ini
membahas implementasi sistem berdasarkan analisa dan rancangan yang telah dibuat.
Penulis mengimplementasikan hasil dari analisa dan rancangan ke dalam bentuk
aplikasi.
4.1 KEBUTUHAN SISTEM
Program bantu yang akan dirancang merupakan sebuah perangkat lunak yang
dapat digunakan untuk menunjang proses transaksi penjualan tunai mobil. Pada
bagian ini akan dijelaskan beberapa kebutuhan dalam perancangan program bantu
tersebut.
4.1.1 Kebutuhan Perangkat Lunak
Adapun kebutuhan minimal perangkat lunak yang dibutuhkan antara lain :
antara lain :
• Sistem Operasi:
Client : Windows 98 / Windows 2000
Server : Windows 2000 Professional
• Server Basisdata : Microsoft SQLServer 2000 Profesional Edition.
• Microsoft SQLServer 2000 Client Driver.
-
44
4.1.2 Kebutuhan Perangkat Keras
Adapun kebutuhan minimal perangkat keras yang dibutuhkan antara lain :
• Server
PC dengan prosessor setara Intel Pentium III 700 MHz.
Memori 128 MB atau lebih.
Harddisk dengan kapasitas 10 GB atau lebih.
Kartu jaringan
• Client
PC dengan prosessor setara dengan Intel Pentium 200 MHz.
Memori 128 MB.
Harddisk dengan kapasitas 10 GB.
Kartu jaringan.
• Jaringan
Hub/Switch
Router
Kabel UTP
Printer
-
45
4.2 USER INTERFACE
User interface terdiri dari 2 bagian yaitu user interface untuk input dan user
interface untuk output.
4.2.1 Input
User interface untuk input dapat dilihat pada gambar 4.1 sampai gambar 4.10
User interface untuk input meliputi :
4.2.1.1 Login
Gambar 4.1 merupakan gambar user interface untuk login.
Gambar 4.1 Gambar Login
Untuk menggunakan sistem ini user harus melakukan proses login. User akan
memasukan nama dan password untuk di otentikasi. Jika valid maka akan menuju ke
halaman utama. Proses login dapat dilihat pada perintah berikut ini :
Script :
Private Sub CommandLogin_Click() i = 0 If TextNama = "" Then rusak = MsgBox("User name belum Terisi!", vbExclamation + vbOKOnly, "Informasi") ElseIf TextPassword = "" Then rusak = MsgBox("Password belum Terisi!", vbExclamation + vbOKOnly, "Informasi") Else Strsql = "Select * from TabelAdministrasiPenjualan where nama ='" & TextNama & "' and password ='" & TextPassword & "'" RSAdmin.Open Strsql, cn, adOpenDynamic, adLockOptimistic If Not RSAdmin.EOF Then i = 1 TextMenumaster = RSAdmin.Fields("MenuMaster") '--- menu master TextMenuTransaksi = RSAdmin.Fields("MenuTransaksi") '--- menu transaksi
-
46
TextMenuLaporan = RSAdmin.Fields("MenuLaporan") '--- menu laporan TextMenuPegawai = RSAdmin.Fields("MenuPegawai") '--- menu pegawai Text8 = TextNama Else rusak = MsgBox("Nama / Password Salah!", vbExclamation + vbOKOnly, "Informasi") End If RSAdmin.Close If i = 1 Then If TextMenumaster.Text = "Ya" Then FrameLogin.Visible = False TextNama = "" TextPassword = "" mnuMaster.Visible = True Else End If If TextMenuTransaksi.Text = "Ya" Then FrameLogin.Visible = False TextNama = "" TextPassword = "" mnuTransaksi.Visible = True Else End If If TextMenuLaporan.Text = "Ya" Then FrameLogin.Visible = False TextNama = "" TextPassword = "" mnuLaporan.Visible = True Else End If If TextMenuPegawai.Text = "Ya" Then FrameLogin.Visible = False TextNama = "" TextPassword = "" mnuPegawai.Visible = True Else End If mnuLogin.Enabled = False mnuLogout.Enabled = True End If End If
-
47
4.2.1.2 Tampilan halaman utama
Gambar 4.2 merupakan gambar halaman utama.
Halaman ini merupakan menu utama dari program penjualan mobil. Pada
halaman ini tidak menampilkan gambar, hanya tampilan menu.
4.2.1.3 Administrasi Penjualan
Gambar 4.3 merupakan gambar user interface untuk admin.
Gambar 4.3 Tampilan halaman Administrasi Penjualan
-
48
Untuk penginputan data kode admin, nama dan password yang akan
digunakan sebagai hak akses pribadi saat melakukan login. Setiap penginputan data
akan di simpan pada Tabel AdministrasiPenjualan. Proses ini dapat dilihat pada
perintah berikut :
script :
Private Sub TextKodeAdmin_keypress(keyascii As Integer) If keyascii = 13 Then TextNama.SetFocus End If End Sub
Private Sub TextKodeAdmin_LostFocus() TextNama.SetFocus End Sub Private Sub TextNama_keypress(keyascii As Integer) If keyascii = 13 Then TextPassword.SetFocus End If End Sub Private Sub TextPassword_keypress(keyascii As Integer) If keyascii = 13 Then CommandSimpan.SetFocus End If End Sub Private Sub CommandSimpan_Click() If CommandTambah.Caption = "&Batal" Then RSAdmin.Filter = "kodeadmin='" & Trim(TextKodeAdmin.Text) & "'" If RSAdmin.EOF Then Set RSAdmin = New ADODB.Recordset Strsql = "insert into TabelAdministrasiPenjualan values ('" & Trim(TextKodeAdmin.Text) & "','" & Trim(TextNama.Text) & "','" & Trim(TextPassword.Text) & "')" RSAdmin.Open Strsql, cn, adOpenDynamic, adLockOptimistic CommandTambah_Click CommandTambah.SetFocus Else MsgBox "Kode Admin Telah Ada, Ganti Kode Baru", vbOKOnly + vbCritical, "Konfirmasi" TextKodeAdmin.SetFocus End If End If If CommandHapus.Caption = "&Batal" Then Set RSAdmin = New ADODB.Recordset MsgBox "Yakin Data Ini Akan Dihapus ???", vbYesNo, "Konfirmasi" Strsql = "delete from TabelAdministrasiPenjualan where kodeadmin='" & Trim(TextKodeAdmin.Text) & "'" RSAdmin.Open Strsql, cn, adOpenDynamic, adLockOptimistic CommandHapus_Click CommandTambah.SetFocus End If If CommandEdit.Caption = "&Batal" Then
-
49
Set RSAdmin = New ADODB.Recordset Strsql = "update TabelAdministrasiPenjualan set kodeadmin='" & Trim(TextKodeAdmin.Text) & "', nama='" & Trim(TextNama.Text) & "',password='" & Trim(TextPassword.Text) & "' where kodeadmin='" & Trim(TextKodeAdmin.Text) & "'"
RSAdmin.Open Strsql, cn, adOpenDynamic, adLockOptimistic CommandEdit_Click CommandTambah.SetFocus End If End Sub
4.2.1.4 Input Data Konsumen
Gambar 4.4 merupakan gambar user interface untuk konsumen.
Gambar 4.4 Tampilan halaman Konsumen
Gambar 4.4 adalah form untuk menambah, mengubah atau menghapus data
konsumen. Tombol simpan untuk menyimpan data konsumen baik menambah,
mengubah atau menghapus. Proses tersebut dapat dilihat pada perintah berikut ini :
Script :
Private Sub CommandExit_Click() Unload Me Utama.Show End Sub Private Sub TextNamaKonsumen_keypress(keyascii As Integer) If keyascii = 13 Then TextAlamat.SetFocus
-
50
End If End Sub Private Sub TextAlamat_keypress(keyascii As Integer) If keyascii = 13 Then Option1.SetFocus End If End Sub Private Sub Option1_keypress(keyascii As Integer) If keyascii = 13 Then TextNoTelp.SetFocus End If End Sub Private Sub Option2_keypress(keyascii As Integer) If keyascii = 13 Then TextNoTelp.SetFocus End If End Sub Private Sub TextNoTelp_keypress(keyascii As Integer) If keyascii = 13 Then TextJenisIdentitas.SetFocus End If End Sub Private Sub TextJenisIdentitas_keypress(keyascii As Integer) If keyascii = 13 Then TextNomorIdentitas.SetFocus End If End Sub Private Sub TextNomorIdentitas_keypress(keyascii As Integer) If keyascii = 13 Then CommandSimpan.SetFocus End If End Sub Private Sub CommandSimpan_Click() If CommandTambah.Caption = "&Batal" Then RSKonsumen.Filter = "kodekonsumen='" & Trim(TextKodeKonsumen.Text) & "'" If RSKonsumen.EOF Then Set RSKonsumen = New ADODB.Recordset Strsql = "insert into TabelKonsumen values ('" &
Trim(TextKodeKonsumen.Text) & "','" & Trim(TextNamaKonsumen.Text) & "','" & Trim(TextAlamat.Text) & "','" & Trim(TextJenisKelamin.Text) & "','" & Trim(TextNoTelp.Text) & "','" & Trim(TextJenisIdentitas.Text) & "','" & Trim(TextNomorIdentitas.Text) & "')" RSKonsumen.Open Strsql, cn, adOpenDynamic, adLockOptimistic CommandTambah_Click CommandTambah.SetFocus Else MsgBox "Kode Konsumen Telah Ada, Ganti Kode Baru", vbOKOnly +
vbCritical, "Konfirmasi" TextKodeKonsumen.SetFocus End If End If If CommandHapus.Caption = "&Batal" Then Set RSKonsumen = New ADODB.Recordset MsgBox "Yakin Data Ini Akan Dihapus ???", vbYesNo, "Konfirmasi"
-
51
Strsql = "delete from tabelkonsumen where kodeKonsumen='" &
Trim(TextKodeKonsumen.Text) & "'" RSKonsumen.Open Strsql, cn, adOpenDynamic, adLockOptimistic CommandHapus_Click CommandHapus.SetFocus End If If CommandEdit.Caption = "&Batal" Then Set RSKonsumen = New ADODB.Recordset Strsql = "update TabelKonsumen set kodekonsumen='" &
Trim(TextKodeKonsumen.Text) & "',NamaLengkap='" & Trim(TextNamaKonsumen.Text) & "',Alamat='" & Trim(TextAlamat.Text) & "',JenisKelamin='" & Trim(TextJenisKelamin.Text) & "',NomorTelpon='" & Trim(TextNoTelp.Text) & "',JenisKartu='" & Trim(TextJenisIdentitas.Text) & "',NomorKartu='" & Trim(TextNomorIdentitas.Text) & "' where kodekonsumen='" & Trim(TextKodeKonsumen.Text) & "'" RSKonsumen.Open Strsql, cn, adOpenDynamic, adLockOptimistic CommandEdit_Click CommandEdit.SetFocus End If End Sub '--------------------- Option Value Radio Button ---------------------' Private Sub Option1_Click() TextJenisKelamin.Text = "L" End Sub Private Sub Option2_Click() TextJenisKelamin.Text = "P" End Sub
4.2.1.5 Master Jenis Mobil
Gambar 4.5 merupakan gambar user interface untuk jenis mobil.
Gambar 4.5 Tampilan halaman Jenis Mobil
-
52
Gambar 4.5 adalah form untuk menambah, mengubah atau menghapus data
jenis mobil. Tombol simpan untuk menyimpan data jenis mobil baik menambah,
mengubah atau menghapus. Proses tersebut dapat dilihat pada perintah berikut ini :
Script :
Private Sub CommandSimpan_Click() If CommandTambah.Caption = "&Batal" Then RSJenisMobil.Filter = "kodejenis='" & Trim(TextKodejenisMobil.Text) & "'" If RSJenisMobil.EOF Then Set RSJenisMobil = New ADODB.Recordset
Strsql = "insert into TabelJenisMobil values ('" & Trim(TextKodejenisMobil.Text) & "','" & Trim(TextJenisMobil.Text) & "')"
RSJenisMobil.Open Strsql, cn, adOpenDynamic, adLockOptimistic CommandTambah_Click CommandTambah.SetFocus Else MsgBox "Kode Barang Telah Ada, Ganti Kode Baru", vbOKOnly + vbCritical, "Konfirmasi" TextKodejenisMobil.SetFocus End If End If If CommandHapus.Caption = "&Batal" Then Set RSJenisMobil = New ADODB.Recordset MsgBox "Yakin Data Ini Akan Dihapus ???", vbYesNo, "Konfirmasi" Strsql = "delete from tabeljenismobil where kodejenis='" & Trim(TextKodejenisMobil.Text) & "'" RSJenisMobil.Open Strsql, cn, adOpenDynamic, adLockOptimistic CommandHapus_Click CommandTambah.SetFocus End If If CommandEdit.Caption = "&Batal" Then Set RSJenisMobil = New ADODB.Recordset Strsql = "update TabelJenisMobil set kodejenis='" & Trim(TextKodejenisMobil.Text) & "', jenismobil='" & Trim(TextJenisMobil.Text) & "' where kodejenis='" & Trim(TextKodejenisMobil.Text) & "'" RSJenisMobil.Open Strsql, cn, adOpenDynamic, adLockOptimistic CommandEdit_Click CommandTambah.SetFocus End If End Sub
-
53
4.2.1.6 Master Merk Mobil
Gambar 4.6 merupakan gambar user interface untuk merk mobil.
Gambar 4.6 Tampilan halaman Merk Mobil
Gambar 4.6 adalah form untuk menambah, mengubah atau menghapus data
merk mobil. Tombol simpan untuk menyimpan data merk mobil baik menambah,
mengubah atau menghapus. Proses tersebut dapat dilihat pada perintah berikut ini :
Script :
Private Sub CommandSimpan_Click() If CommandTambah.Caption = "&Batal" Then RSMerkMobil.Filter = "kodeMerk='" & Trim(TextKodeMerkMobil.Text) & "'" If RSMerkMobil.EOF Then Set RSMerkMobil = New ADODB.Recordset Strsql = "insert into TabelMerkMobil values ('" & Trim(TextKodeMerkMobil.Text) & "','" & Trim(TextMerkMobil.Text) & "')" RSMerkMobil.Open Strsql, cn, adOpenDynamic, adLockOptimistic CommandTambah_Click CommandTambah.SetFocus Else MsgBox "Kode Barang Telah Ada, Ganti Kode Baru", vbOKOnly + vbCritical, "Konfirmasi" TextKodeMerkMobil.SetFocus End If End If If CommandHapus.Caption = "&Batal" Then Set RSMerkMobil = New ADODB.Recordset MsgBox "Yakin Data Ini Akan Dihapus ???", vbYesNo, "Konfirmasi" Strsql = "delete from tabelMerkMobil where kodeMerk='" & Trim(TextKodeMerkMobil.Text) & "'" RSMerkMobil.Open Strsql, cn, adOpenDynamic, adLockOptimistic CommandHapus_Click CommandHapus.SetFocus End If
-
54
If CommandEdit.Caption = "&Batal" Then Set RSMerkMobil = New ADODB.Recordset Strsql = "update TabelMerkMobil set kodeMerk='" & Trim(TextKodeMerkMobil.Text) & "', MerkMobil='" & Trim(TextMerkMobil.Text) & "' where kodeMerk='" & Trim(TextKodeMerkMobil.Text) & "'" RSMerkMobil.Open Strsql, cn, adOpenDynamic, adLockOptimistic CommandEdit_Click CommandEdit.SetFocus End If End Sub
4.2.1.7 Master Model Mobil
Gambar 4.7 merupakan gambar user interface untuk model mobil.
Gambar 4.7 Tampilan halaman Model Mobil
Gambar 4.7 adalah form untuk menambah, mengubah atau menghapus data
model mobil. Tombol simpan untuk menyimpan data model mobil baik menambah,
mengubah atau menghapus. Proses tersebut dapat dilihat pada perintah berikut ini :
Script :
Private Sub TextKodeModelMobil_keypress(keyascii As Integer) If keyascii = 13 Then TextModelMobil.SetFocus End If End Sub Private Sub TextModelMobil_keypress(keyascii As Integer) If keyascii = 13 Then CommandSimpan.SetFocus End If End Sub Private Sub CommandSimpan_Click()
-
55
If CommandTambah.Caption = "&Batal" Then RSModelMobil.Filter = "kodeModel='" & Trim(TextKodeModelMobil.Text) & "'" If RSModelMobil.EOF Then Set RSModelMobil = New ADODB.Recordset Strsql = "insert into TabelModelMobil values ('" & Trim(TextKodeModelMobil.Text) & "','" & Trim(TextModelMobil.Text) & "')" RSModelMobil.Open Strsql, cn, adOpenDynamic, adLockOptimistic CommandTambah_Click CommandTambah.SetFocus Else MsgBox "Kode Barang Telah Ada, Ganti Kode Baru", vbOKOnly + vbCritical, "Konfirmasi" TextKodeModelMobil.SetFocus End If End If If CommandHapus.Caption = "&Batal" Then Set RSModelMobil = New ADODB.Recordset MsgBox "Yakin Data Ini Akan Dihapus ???", vbYesNo, "Konfirmasi" Strsql = "delete from tabelModelMobil where kodeModel='" & Trim(TextKodeModelMobil.Text) & "'" RSModelMobil.Open Strsql, cn, adOpenDynamic, adLockOptimistic CommandHapus_Click CommandHapus.SetFocus End If If CommandEdit.Caption = "&Batal" Then Set RSModelMobil = New ADODB.Recordset Strsql = "update TabelModelMobil set kodeModel='" & Trim(TextKodeModelMobil.Text) & "', ModelMobil='" & Trim(TextModelMobil.Text) & "' where kodeModel='" & Trim(TextKodeModelMobil.Text) & "'" RSModelMobil.Open Strsql, cn, adOpenDynamic, adLockOptimistic CommandEdit_Click CommandEdit.SetFocus End If End Sub
4.2.1.8 Master Warna Mobil
Gambar 4.8 merupakan gambar user interface untuk warna mobil.
Gambar 4.8 Tampilan halaman Warna Mobil
-
56
Gambar 4.8 adalah form untuk menambah, mengubah atau menghapus data
warna mobil. Tombol simpan untuk menyimpan data warna mobil baik menambah,
mengubah atau menghapus. Proses tersebut dapat dilihat pada perintah berikut ini :
Script :
Private Sub TextKodeWarnaMobil_keypress(keyascii As Integer) If keyascii = 13 Then TextWarnaMobil.SetFocus End If End Sub Private Sub TextWarnaMobil_keypress(keyascii As Integer) If keyascii = 13 Then CommandSimpan.SetFocus End If End Sub Private Sub CommandSimpan_Click() If CommandTambah.Caption = "&Batal" Then RSWarnaMobil.Filter = "kodeWarna='" & Trim(TextKodeWarnaMobil.Text) & "'" If RSWarnaMobil.EOF Then Set RSWarnaMobil = New ADODB.Recordset Strsql = "insert into TabelWarnaMobil values ('" & Trim(TextKodeWarnaMobil.Text) & "','" & Trim(TextWarnaMobil.Text) & "')" RSWarnaMobil.Open Strsql, cn, adOpenDynamic, adLockOptimistic CommandTambah_Click CommandTambah.SetFocus Else MsgBox "Kode Barang Telah Ada, Ganti Kode Baru", vbOKOnly + vbCritical, "Konfirmasi" TextKodeWarnaMobil.SetFocus End If End If If CommandHapus.Caption = "&Batal" Then Set RSWarnaMobil = New ADODB.Recordset MsgBox "Yakin Data Ini Akan Dihapus ???", vbYesNo, "Konfirmasi" Strsql = "delete from tabelWarnaMobil where kodeWarna='" & Trim(TextKodeWarnaMobil.Text) & "'" RSWarnaMobil.Open Strsql, cn, adOpenDynamic, adLockOptimistic CommandHapus_Click CommandHapus.SetFocus End If If CommandEdit.Caption = "&Batal" Then Set RSWarnaMobil = New ADODB.Recordset Strsql = "update TabelWarnaMobil set kodeWarna='" & Trim(TextKodeWarnaMobil.Text) & "', WarnaMobil='" & Trim(TextWarnaMobil.Text) & "' where kodeWarna='" & Trim(TextKodeWarnaMobil.Text) & "'" RSWarnaMobil.Open Strsql, cn, adOpenDynamic, adLockOptimistic CommandEdit_Click CommandEdit.SetFocus End If End Sub
-
57
4.2.1.9 Master Detail Mobil
Gambar 4.9 merupakan gambar user interface untuk detail mobil.
Gambar 4.9 Tampilan halaman Detail Mobil
Untuk memasukkan data mobil secara lengkap. Setiap penginputan data akan
disimpan dalam tabel detailmobil melalui tombol simpan. Proses update data mobil
baik menambah, mengubah, menyimpan atau menghapus dapat dilihat pada perintah
berikut ini :
Script :
Private Sub CommandSimpan_Click() If CommandTambah.Caption = "&Batal" Then RSDetailMobil.Filter = "kodeMobil='" & Trim(TextKodeMobil.Text) & "'" If RSDetailMobil.EOF Then Set RSDetailMobil = New ADODB.Recordset Strsql = "insert into TabelDetailMobil values ('" & Trim(TextKodeMobil.Text) & "','" & Trim(TextKodeJenis.Text) & "','" & Trim(TextKodeMerk.Text) & "','" & Trim(TextKodeModel.Text) & "','" & Trim(TextKodeWarna.Text) & "','" & Trim(TextTahunPembuatan.Text) & "','" & Trim(TextNomorPolisi.Text) & "','" & Trim(TextBPKB.Text) & "','" & Trim(TextSTNK.Text) & "','" & Trim(TextJumlah.Text) & "','" & Trim(TextHargaBeli.Text) & "')" RSDetailMobil.Open Strsql, cn, adOpenDynamic, adLockOptimistic CommandTambah_Click CommandTambah.SetFocus
-
58
Else MsgBox "Kode DetailMobil Telah Ada, Ganti Kode Baru", vbOKOnly + vbCritical, "Konfirmasi" DataComboJenisMobil.SetFocus End If End If If CommandHapus.Caption = "&Batal" Then Set RSDetailMobil = New ADODB.Recordset MsgBox "Yakin Data Ini Akan Dihapus ???", vbYesNo, "Konfirmasi" Strsql = "delete from tabelDetailMobil where kodeDetailMobil='" & Trim(TextKodeMobil.Text) & "'" RSDetailMobil.Open Strsql, cn, adOpenDynamic, adLockOptimistic CommandHapus_Click CommandHapus.SetFocus End If If CommandEdit.Caption = "&Batal" Then Set RSDetailMobil = New ADODB.Recordset St