Point of Sales Trial Version

Setelah sekian lama absen posting dan maintenance blog ini, akhirnya sekarang bisa juga untuk pulang dan menambah deretan posting. Untuk welcome back post ini saya akan memaparkan tentang sebuah Point of Sales Trial Version yang baru selesai saya kerjakan.
Point of Sales merupakan sebuah aplikasi penjualan yang biasa kita temui di minimarket maupun supermarket. Point of Sales sendiri merupakan sebuah aplikasi standart dalam tutorial VB karena mudah untuk dicerna baik dari segi logika maupun dari segi proses bisnisnya sebab contoh nya banyak ditemui di lapangan.
Pembuatannya sendiri saya lakukan menggunakan Visual Basic serta databasenya menggunakan MySQL (wampServer2) dan dibantu oleh HeidySQL.
Namun di sini saya hanya akan menjelaskan tentang listing Program bukannya tentang databasenya.
Untuk databasenya sendiri silahkan anda import langsung dengan menggunakan script berikut :

CREATE DATABASE TrialEsa;

USE trialesa;

CREATE TABLE TBarang (  Id VARCHAR(20) NULL,  Nama VARCHAR(50) NULL,  Harga INT NULL, 
PRIMARY KEY (Id) );

CREATE TABLE TJual (NoFak VARCHAR(20) NULL,  Tanggal TIMESTAMP NULL DEFAULT CURRENT_TIMESTAMP,
UserId VARCHAR(20) NULL,  PRIMARY KEY (NoFak) );

CREATE TABLE TRJual (NoFak VARCHAR(20) NULL,  Barang VARCHAR(20) NULL,  Jumlah INT(10)
NULL DEFAULT '0' );

CREATE TABLE TUser (Id VARCHAR(20) NULL,  Pass VARCHAR(20) NULL );

ALTER TABLE TUser  ADD PRIMARY KEY (Id);

ALTER TABLE tbarang  CHANGE COLUMN Harga Harga INT(11) NULL DEFAULT '0' AFTER Nama;

Insert Into Tbarang(Id,Nama) Values( '8712045015261' ,' SUST KID 3+ HONEY 1KG' );
Insert Into Tbarang(Id,Nama) Values( '8712045015209' ,' SUST KID 3+ VANILA 1KG' );
Insert Into Tbarang(Id,Nama) Values( '8712045015230' ,' SUST KID 3+ CHOCO 1KG' );
Insert Into Tbarang(Id,Nama) Values( '8712045010068' ,' SUST JUNIOR 1+ MADU 1KG' );
Insert Into Tbarang(Id,Nama) Values( '8712045007594' ,' SUST JUNIOR 1+ VANILA 1KG' );
Insert Into Tbarang(Id,Nama) Values( '8712045007488' ,' SUST SCHOOL 6+ VANILA 1KG' );