Oleh : Uus Rusmawan http://www.konsultasivb.com Harga program Rp. 50.000 (Lima Puluh Ribu Rupiah) Bagi yang berminat silakan transfer ke nomor rekening : 066 - 0525 - 947 (Bank BCA) an: Uus Rusmawan 156 - 00 - 0250214 - 6 (Bank Mandiri) an: Uus Rusmawan 0139 - 01- 063038 - 50 - 4 (Bank BRI) an: Uus Rusmawan Kemudian segera lakukan konfirmasi melalui email :
[email protected]
PROGRAM PENJUALAN Dengan menggunakan pola yang sama seperti program pembelian, kita dapat membuat program penjualan. Perbedaannya hanya sedikit saja, yaitu pada program pembelian jumlah barang akan bertambah sedangkan pada program penjualan jumlah barang berkurang. Jika diperlukan kita dapat menambahkan tabel palanggan.
6.1 Normalisasi File Model normalisasi file program penjualan dapat dilihat pada gambar di bawah ini, dengan asumsi penjualan ini sifatnya bebas (bukan hanya pada pelanggan) maka tabel pelanggan tidak dibuat.
Gambar 6.1 Normalisasi Program Penjualan
6.2 Database Dan Tabel Untuk mengetahui file database dan struktur masing-masing tabel berikut type data dan kunci primer maupun kunci tamunya silakan buka CD pendukung buku ini.
1
Oleh : Uus Rusmawan http://www.konsultasivb.com Harga program Rp. 50.000 (Lima Puluh Ribu Rupiah) Bagi yang berminat silakan transfer ke nomor rekening : 066 - 0525 - 947 (Bank BCA) an: Uus Rusmawan 156 - 00 - 0250214 - 6 (Bank Mandiri) an: Uus Rusmawan 0139 - 01- 063038 - 50 - 4 (Bank BRI) an: Uus Rusmawan Kemudian segera lakukan konfirmasi melalui email :
[email protected]
Gambar 6.2 Database dan tabel
Asumsi – asumsi Karena model program penjualan hampir sama dengan program pembelian maka disini kami ambil beberapa asumsi, antara lain: 1.
Pengolahan data barang telah dibuat
2.
Pengolahan data kasir telah dibuat
3.
Form login telah dibuat
4.
Anda dapat melihat semua program yang disebutkan di atas dalam CD pendukung buku.
6.3 Membuat Module Langkah awal pembuatan program penjualan kita mulai dengan pembuatan module dengan coding di bawah ini. Public Conn As New ADODB.Connection Public RSBarang As ADODB.Recordset
2
Oleh : Uus Rusmawan http://www.konsultasivb.com Harga program Rp. 50.000 (Lima Puluh Ribu Rupiah) Bagi yang berminat silakan transfer ke nomor rekening : 066 - 0525 - 947 (Bank BCA) an: Uus Rusmawan 156 - 00 - 0250214 - 6 (Bank Mandiri) an: Uus Rusmawan 0139 - 01- 063038 - 50 - 4 (Bank BRI) an: Uus Rusmawan Kemudian segera lakukan konfirmasi melalui email :
[email protected] Public Public Public Public Public
RSkasir As ADODB.Recordset RSPenjualan As ADODB.Recordset RSDetailJual As ADODB.Recordset RSTR1 As ADODB.Recordset RSTR2 As ADODB.Recordset
Public Sub BukaDB() Set Conn = New ADODB.Connection Set RSBarang = New ADODB.Recordset Set RSkasir = New ADODB.Recordset Set RSPenjualan = New ADODB.Recordset Set RSDetailJual = New ADODB.Recordset Set RSTR1 = New ADODB.Recordset Set RSTR1 = New ADODB.Recordset Conn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data App.Path & "\ADOJual.mdb" End Sub
Source="
&
6.4 Transaksi Penjualan Ilustrasi pada program ini adalah sebagai berikut: 1.
Nomor faktur muncul secara otomatis, berubah setiap hari dan setiap ganti transaksi setelah faktur sebelumnya disimpan.
2.
Nama kasir dan kode kasir muncul secara otomatis dari hasil login. Kode kasir tidak ditampilkan dalam form (LblKodeKsr.Visible = False).
3.
Tanggal dan jam muncul secara otomatis diambil dari sistem komputer, oleh karena itu diharapkan mengecek kembali validasi tanggal dan jam komputer sebelum program dijalankan.
4.
Saat melakukan transaksi, kode barang dapat diketik di kolom kode atau mengambil dari list. Jika kode barang ditemukan maka datanya akan ditampilkan dan kita tinggal mengisi jumlah penjualannya.
5.
Jumlah total item barang dan total harga muncul otomatis setelah mengisi kode barang dan jumlah barang yang dibeli, begitupun dengan jumlah total harga.
3
Oleh : Uus Rusmawan http://www.konsultasivb.com Harga program Rp. 50.000 (Lima Puluh Ribu Rupiah) Bagi yang berminat silakan transfer ke nomor rekening : 066 - 0525 - 947 (Bank BCA) an: Uus Rusmawan 156 - 00 - 0250214 - 6 (Bank Mandiri) an: Uus Rusmawan 0139 - 01- 063038 - 50 - 4 (Bank BRI) an: Uus Rusmawan Kemudian segera lakukan konfirmasi melalui email :
[email protected]
6.
Terakhir
kita
tinggal
mengisi
jumlah
pembayaran
dan
menyimpannya. Data yang dihasilkan oleh program penjualan terlihat pada kedua tabel berikut. Penjualan Faktur
Tanggal
Jam
Total Item Dibayar Kembali KodeKsr
0709090001 08/09/07 10:38:26 PM 13750 6
15000
1250
KSR01
DetailJual Faktur
KodeBrg JmlJual
07090900011 KOP01
1
07090900012 MIE01
2
07090900013 PEP01
3
Jika kita bandingkan antara isi data di program pembelian dan program penjualan, kita dapatkan beberapa perbedaan, yaitu: 7.
Pada program pembelian nomor faktur di tabel detail disimpan berulang, hal ini menyebabkan nomor faktur tidak dapat dijadikan primary Key (tetapi Access mempunyai fasilitas agar data berulang tersebut dapat dibuat index dengan cara memilih properti Indexed = YES (Duplicated OK)
4
Oleh : Uus Rusmawan http://www.konsultasivb.com Harga program Rp. 50.000 (Lima Puluh Ribu Rupiah) Bagi yang berminat silakan transfer ke nomor rekening : 066 - 0525 - 947 (Bank BCA) an: Uus Rusmawan 156 - 00 - 0250214 - 6 (Bank Mandiri) an: Uus Rusmawan 0139 - 01- 063038 - 50 - 4 (Bank BRI) an: Uus Rusmawan Kemudian segera lakukan konfirmasi melalui email :
[email protected]
Gambar 6.3 Field Index Tetapi Duplikasi
8.
Pada program penjualan tidak ada nomor faktur yang berulang karena pada digit terakhir ditambahkan nomor urut transaksi yang diambil dari grid, dengan demikian nomor faktur dapat dijadikan sebagai Primary Key.
Dengan kondisi seperti itu, selebihnya keputusan ada pada pembaca, apakah akan memilih model pertama atau kedua. Jika kita mengikuti aturan main perancangan database maka model kedua dapat dikatakan lebih baik dari model pertama, karena dalam sebuah tabel harus ada satu kunci primer dan selebihnya adalah kunci tamu (dalam hal ini kode barang). Tetapi model kedua sisi kelemahannya adalah tidak dapat menyimpan data ke tabel detail dengan cara menggabungkan jumlah jual
5
Oleh : Uus Rusmawan http://www.konsultasivb.com Harga program Rp. 50.000 (Lima Puluh Ribu Rupiah) Bagi yang berminat silakan transfer ke nomor rekening : 066 - 0525 - 947 (Bank BCA) an: Uus Rusmawan 156 - 00 - 0250214 - 6 (Bank Mandiri) an: Uus Rusmawan 0139 - 01- 063038 - 50 - 4 (Bank BRI) an: Uus Rusmawan Kemudian segera lakukan konfirmasi melalui email :
[email protected]
walaupun ada kode barang yang sama, karena kita akan kehilangan nomor faktur yang setiap barisnya terus berbeda.
Gambar 6.4 Transaksi Penjualan
6.5 Faktur Penjualan Faktur yang dihasilkan sama dengan faktur pembelian, dan jika printer telah siap pakai Anda tinggal menekan enter lalu menjawab Yes.
6
Oleh : Uus Rusmawan http://www.konsultasivb.com Harga program Rp. 50.000 (Lima Puluh Ribu Rupiah) Bagi yang berminat silakan transfer ke nomor rekening : 066 - 0525 - 947 (Bank BCA) an: Uus Rusmawan 156 - 00 - 0250214 - 6 (Bank Mandiri) an: Uus Rusmawan 0139 - 01- 063038 - 50 - 4 (Bank BRI) an: Uus Rusmawan Kemudian segera lakukan konfirmasi melalui email :
[email protected]
Gambar 6.5 Faktur Penjualan
7
Oleh : Uus Rusmawan http://www.konsultasivb.com Harga program Rp. 50.000 (Lima Puluh Ribu Rupiah) Bagi yang berminat silakan transfer ke nomor rekening : 066 - 0525 - 947 (Bank BCA) an: Uus Rusmawan 156 - 00 - 0250214 - 6 (Bank Mandiri) an: Uus Rusmawan 0139 - 01- 063038 - 50 - 4 (Bank BRI) an: Uus Rusmawan Kemudian segera lakukan konfirmasi melalui email :
[email protected]
6.6 Laporan Penjualan
Gambar 6.6 Laporan Harian Dan Mingguan
8
Oleh : Uus Rusmawan http://www.konsultasivb.com Harga program Rp. 50.000 (Lima Puluh Ribu Rupiah) Bagi yang berminat silakan transfer ke nomor rekening : 066 - 0525 - 947 (Bank BCA) an: Uus Rusmawan 156 - 00 - 0250214 - 6 (Bank Mandiri) an: Uus Rusmawan 0139 - 01- 063038 - 50 - 4 (Bank BRI) an: Uus Rusmawan Kemudian segera lakukan konfirmasi melalui email :
[email protected]
Gambar 6.7 Laporan bulanan
6.7 Rincian Penjualan Untuk melihat kembali transaksi penjualan yang telah terjadi, buatlah form seperti gambar di bawah ini.
Gambar 6.5 Rincian Penjualan
9
Oleh : Uus Rusmawan http://www.konsultasivb.com Harga program Rp. 50.000 (Lima Puluh Ribu Rupiah) Bagi yang berminat silakan transfer ke nomor rekening : 066 - 0525 - 947 (Bank BCA) an: Uus Rusmawan 156 - 00 - 0250214 - 6 (Bank Mandiri) an: Uus Rusmawan 0139 - 01- 063038 - 50 - 4 (Bank BRI) an: Uus Rusmawan Kemudian segera lakukan konfirmasi melalui email :
[email protected]
Catatan : Dengan kecerdikan yang Anda miliki, kami yakin Anda dapat membuat program penjualan dengan konsep ADO hanya dalam waktu 3 menit saja. Caranya adalah sebagai berikut : 1.
Salinlah semua program pembelian ke folder lain.
2.
Ubah nama database dari ADOBeli.mdb menjadi ADOJual.mdb
3.
Ubahlah semua hal yang berkaitan dengan kata BELI menjadi kata JUAL
4.
Buanglah semua hal yang berkaitan dengan tabel pemasok (jika itu memang tidak dibutuhkan, artinya penjualan yang dilakukan sifatnya bebas).
5.
Sebaliknya, jika penjualan ini sifatnya terbatas hanya pada pelanggan, maka ubahlah semua hal yang berkaitan dengan tabel pemasok menjadi tabel pelanggan.
6.
Jika data yang disimpan akan dibuat mirip dengan program pembelian (nomor faktur di tabel detail disimpan berulang tanpa adanya penambahan nomor urut transaksi yang diambil dari Grid), maka hapuslah coding berikut ini (yang dicetak tebal) pada saat data disimpan.
10