Aplikasi Kasir
Perkembangan dunia software saat ini dapat memudahkan banyak hal,
termasuk manajemen kasir. Melalui Bab
aplikasi kasir ini , keakuratan penghitungan dapat
diselesaikan dalam waktu yang sangat singkat meskipun harus mengerjakan data
dalam jumlah yang amat besar
Langkah-langkah untuk membuat aplikasi pada
pembayaran kasir ini adalah sebagai berikut :
Running dengan XAMPP
2. Masuk ke browser anda dan ketikkan “localhost/phpmyadmin”
3. Buat database baru dengan nama “fp_api”
4. Buat table barang, dengan 3
atribut yaitu : id_barang, nama_barang, harga_barang
5. Buat table pembeli, dengan 4
atribut yaitu : id_pembeli, nama_pembeli, alamat_pembeli, notelp_pembeli
6. Buat table transaksi, dengan 7 atribut yaitu : id_transaksi, id_pembeli,
id_barang, tgl_transaksi, waktu_transaksi, jumlah_barang, no_nota.
7. Buat relasinya menjadi seperti ini
8.
Buat project baru dan beri nama
ARDIBANDI MART
9.
Buat form seperti di bawah ini
dengan aturan tabel 1.1
10. Add References “Microsoft ActiveX
Data Object 2.7 Library”
Keterangan code :
Baris 1 :
Untuk
membuat global variabel dengan
nama Conn sebagai koneksi ke
database
Baris 2 : rsconn untuk
menampung data dari query
Baris 3 : Menampung
perintah SQL
Baris 6 : Ketika terjadi
eror pergi ke label
buat_koneksi_eror
Baris 7 :
Deklarasikan
nama database yang
digunakan dari mysql
Baris 8 : Server database
yang digunakan
Baris 9 :
Jalur/port database
yang digunakan untuk
mysql, standartnya 3306
Baris 10 : Username database yang digunakan
Baris 11 : Password pada database. Diisi jika
database
menggunakan password, jika
tidak kosongkan saja, namun jika pakai xampp default passwordnya kosong
Baris 12 : Merangkai jalan database
dengan driver
atau membuka jalur database
driver dan server
Baris 15-22 : Jika terjadi eror
maka bisa jalan/ lanjut
Baris 24 : jika terjadi eror, maka erorrnya
dikosongkan/ dilonjat/ diabaikan
Keterangan kode :
Baris 1 : Ketika form
dijalankan load maka
menjalakan baris selanjutnya
Baris 3–4 : Penggunaan dinonaktifkan
agar tidak bisa
diubah
Baris 5 : Membuka jalan ke
database sehingga bisa
diakses
Baris 6 :
Memanggil
fungsi autonumber untuk
membuat no.nota baru
Baris 7–8 : Nama/
judul waktu dan tanggal yang akan
ditampilkan
13. Lanjutkan
dengan menulis code di bawah ini pada form transaksi
(lanjutan code pada langkah 12) :
Keterangan kode :
Baris 2 : Recordset sebagai
penampung nilai
database, menampilkan id yang paling tinggi
atau paling terakhir, menggunakan jalur conn
Baris 5 :
Pengecekan
query
Baris 6 : Membuat variabel urut
yang memiliki type
data string dengan panjang 7
Baris 7 : Proses peningkatan
penggunaan variabel
Baris 8 :
Jika
tidak ada data sama sekali mengisi
NOTA001 kemudian tampilkan
Baris 12 : Menscan atau menghitung dari ujung
kanan
Baris 13 : Len adalah untuk menghitung panjang digit
data
Baris 21 : Pada txtNim menampilkan
nilai urut
Baris 23 : Setelah rsconn open maka
rsconn harus
tutup
Keterangan kode :
Baris 1–6 : Untuk mengosongkan textbox
id, nama
barang, harga dan jumlah
Keterangan kode :
Baris 1 : Menjalankan kode ketika
kursor berpindah
Baris 10 : Lakukan code pada baris 11 selama
rsconn
bukan
akhir data
Baris 11 : Jika id yang dimasukkan
sama dengan
id_pembeli maka tampilkan
nama
di label pelanggan dan id pembeli dinonaktifkan (enable=false)
Baris 14 : Penanda data sudah ketemu
maka akan
keluar dari loop
Baris 17 : Jika id yang dimasukkan tidak ada,
maka
pindah ke data berikutnya
untuk mencari ulang
Baris 21 : Jika kondisi masih tidak
menemukan data
maka tampilkan message box “Maaf ID Pelanggan yang
anda isi tidak ada”
Keterangan kode :
Baris 3 : Jika id barang
kosong maka message box
akan menampilkan pesan “Diisi dulu doong BOS!” dna
kursor masih aktif pada ID barang
Baris 7 : Jika tidak maka txtID_barang
hurufnya
Dibesarkan
menjadi huruf kapital (upcase)
Keterangan kode (tombol submit) :
Baris 2 : Mendeklarasikan variabel list dengan
type
list item
Baris 4 : Membuat query
insert
Baris 8 : Jalankan sqlsimpan
dijalur conn
Baris 9 : Menyiapkan ruang kosong
untuk 5 data
Baris 15 : Memanggil fungsi reset,
artinya
mengosongkan semua textbox
pada frame transaksi
Keterangan kode :
Baris 1 :
Untuk
menutup transaksi lama dan
membuka transaksi baru
Baris 2 : Pemanggilan fungsi
autonumber dengan
nomor nota baru
Baris 4 : txt id diaktifkan
kembali sehingga dapat
diubah-ubah (enable = true)
Baris 6 : Kursor diaktifkan
pada id_pembeli
Baris 11 : Semua data pada list view
dihapus
19. Setelah
membuat form transaksi, selanjutnya Buat form baru yaitu form penarikan laporan untuk menarik laporan
transaksi pada waktu yang diingikan.
20. Add References
“Microsoft ActiveX Data Objects 2.7 Library” dan “Microsoft Excel 14.0 Object
Library”
Keterangan kode :
Baris 1–4 : Mendeklarasi variable object aplikasi Excel
Keterangan kode :
Baris 2 : Ketika salah pergi
ke salahinput
Baris 3 : Membuat instance baru dari Excel
Baris 4 : Menambahkan buku kerja baru
Baris 6-9 : Deklarasi variabel nomer, total, id, dan total
sheet dengan type data integer
Baris 10 :
Totalsheets digunakan untuk
menghitung
jumlah worksheet
Baris 14 : Mengambil data sesuai query dari jalur
Conn yang disimpan di recordset RsStruk
Baris 16 :
Mengambil data sesuai query dari
jalur
Conn yg disimpan di recordset RsTemp
Keterangan kode :
Baris 19 : Nama label
Baris 23 : Lakukan selama bukan akhir data
Baris 24 : Jika nomer = 0 maka lakukan code
dibawahnya
Baris 25 : Mengaktifkan worksheet
berdasarkan
nilai var id
Baris 26–29
: Set lebar kolom A,B,C,D menjadi
20,9,5,12
Baris 30–32 : Set text alignment dari kolom B,C,D
jadi rata kiri
Baris 33 : Cell A1 sampai D1 di merger
Baris 34 : Dan baris ke 1 jadi rata tengah
Baris 35-36 : Cell B6 jadikan wrap text dan rata
tengah
Baris 37 : Vertical align baris ke-6 jadikan rata
tengah
Baris 38–41 : Baris ke 3,5,6,7 tinggi barisnya
Jadikan 8,8,32,8
Baris 43 : Isi cell A1 dengan kata "ARDIBANDI
MART"
Baris 44 : Dan isi A3 dengan garis pembatas
Baris 45 : Isi cell A4 dengan no.nota dari
recordset RsStruk
Baris 46 : Isi cell D4 dengan tgl dan wkt
transaksi dari recordset RsStruk
Baris 47 : Dan isi A5 dengan garis pembatas
Baris 48 – 50 : Isi cell A6, B6, C6 dengan NAMA
BARANG, HRG BARANG, Qty
Keterangan kode :
Baris 51 : Isi cell D6 dengan TOTAL(RP)
Baris 53 : Tambahkan
nilai var nomer dengan angka 1
proses ini dilakukan supaya proses
pencetakan header tidak dilakukan lagi
Baris 55 : Rstemp dijalankan terlebih dahulu karena
akan dicek dengan data dari
RsStruk apakah no.nota bernilai sama?, jika sama maka menjadi dlm 1 struk jika
tidak maka akan berganti sheet dan mencetak nota baru
Baris 56 : RsBrg mengampil data barang yang id nya
sama dengan id dari RsStruk
Baris 57 : Jika Rstemp
bukan akhir file maka lakukan
Baris 58-63 : Worksheet urutan
id cell A,B,C,D ke i isi
dengan nama barang, harga barang
jumlah barang, dan total
Baris 64 : Tampilkan
total dari data pertama hingga
data terakhir
Baris 67 : Pindahkan data
dari RsStruk ke data
berikutnya
Baris 69 : Cek apakah
no.nota dari RsStruk sama
dengan no.nota berikutnya?
Baris 70-74 : Worksheet urutan
id cell A,B,C,D ke i isi
dengan nama barang, harga barang,
jumlah barang, dan total dari jumlah barang dikali harga barang
Baris 75 : Hitung total
keseluruhan dengan
menambahkan harga barang
Untuk baris 80-3 sama dengan baris
70-74
Keterangan kode :
Baris 86 : Tampilkan total di cell D ke i + 2
Baris 90 : Tutup kembali
jalan koneksi ke database
setelah dibuka, agar tidak terjadi
error ketika membuka jalur lain
Baris 91 : Menambahkan
worksheet baru setelah
sheet terakhir
Baris 92 : Tambahkan jumlah total sheet
Baris 93 : Kembali ke
label loopnya
Baris 98 : Kembali ke loop do while hingga akhir data
Baris 104 : Ini untuk mencetak
keseluruhan sheet yang
sudah terisi struk
Baris 105 : Tampilkan Excel
Baris 108 : Label error
Keterangan kode :
Baris 2 : Menutup buku kerja Excel
Baris 3 : Menutup form vb
Keterangan kode :
Baris 7 : Memanggil fungsi koneksi untuk membuka
jalur ke database
28. Simpan dan
Jalankan tekan F5. Maka aplikasi transaksi toko dan aplikasi penarikan laporan
jadi dan selesai.
Referensi
http://www.bukukita.com/Komputer-dan-Internet/Software/110862-Aplikasi-Kasir-Untuk-Retail.html
(04/09/13 23:23)
0 komentar: