Tutorial aplikasi kasir bagian 2 : Membuat program utama dan menu utama

Tutorial aplikasi kasir bagian 2 pada kesempatan kali ini merupakan kelanjutan dari artikel saya sebelumnya. Jika pada artikel sebelumnya saya sudah membahas tentang project untuk aplikasi kasir, database, dan juga tabel-tabel yang di butuhkan untuk aplikasi kasir. Maka pada kesempatan kali ini saya akan membahas tentang bagaimana membuat program utama beserta program lainnya yang di butuhkan untuk aplikasi kasir dan juga menu utama.

Sebelum kita membuat program utama langkah awal yang harus anda lakukan adalah membuka Visual Foxpro terlebih dahulu, setelah itu dari menu tools Visual Foxpro anda pilih Options. Akan muncul jendela options seperti di bawah ini, setelah itu anda pilih tab File Locations, anda klik dua kali pada Default Directory, sehingga akan muncul jendela Change File Location. Anda arahkan folder ke drive c:\kasir yang sudah kita buat bersama-sama pada artikel sebelumnya. Setelah anda arahkan folder ke drive c:\kasir, maka langkah selanjutnya adalah anda tinggal membuka project kasir melalui menu File -> open pada jendela utama Visual Foxpro.   

Membuat program utama

Agar aplikasi kasir nantinya dapat berjalan dengan baik, maka kita membutuhkan program utama sebagai penanganan ketika pertama kali aplikasi kasir di jalankan. Untuk membuat program utama maka langkahnya adalah dari jendela manager anda pilih tab code, kemudian anda pilih programs, lalu pilih New. Tulislah sintak program seperti di bawah ini, dan jika sudah anda simpan dengan nama utama.  

*tutup semua data dan variabel
CLOSE DATA ALL
CLEAR ALL
CLOSE ALL
**********************************************
PUBLIC PILLAN, MS_DRIVE, MS_DRIVE2
STORE 'S' TO PILLAN
STORE "\kasir\" TO MS_DRIVE
STORE "\kasir\" TO MS_DRIVE2

***********************************************************************************

*atur konfigurasi
SET TALK OFF
SET EXCLUSIVE OFF
SET DELETED ON 
SET AUTOSAVE ON
SET CENTURY ON
SET STATUS OFF
SET SAFETY OFF
SET STATUS BAR OFF
*SET STATUS bar OFF
SET DATE TO BRITISH
SET SYSMENU OFF
SET HELP TO bantuan.dbf
***
*IF !USED("barang")
*    SELECT 0
*    USE barang EXCLUSIVE
*ENDIF
***

*panggil prosedur
SET PROCEDURE TO '\kasir\prosedur.prg'

PUSH MENU _msysmenu
MODIFY WINDOW screen TITLE 'SIK 2010 Ver. 1.01' NOCLOSE FLOAT ZOOM
WITH _screen
    .windowstate= 2
ENDWITH
RELEASE ALL

*deklarasikan variabel yang diperlukan
PUBLIC nm_perusahan, alm_kota, no_npwp, lblidpemakai, _login, vloginame
lblidpemakai= "Anda Belum Login"

*panggil form utama
DO FORM 'frmutama.scx'

***general/option***
IF !FILE('kasir.ocx')
    DO FORM 'frmsetup.scx'
    nm_perusahaan=" "
ELSE
    RESTORE FROM kasir.ocx ADDITIVE
    nm_perusahaan= ALLTRIM(IIF(TYPE('ocx1')#'C',;
                    '<Nama Perusahaan>', ocx1))
    alm_kota     = ALLTRIM(IIF(TYPE('ocx2')#'C',;
                    '<Alamat>', ocx2))+;
                    ' '+ALLTRIM(IIF(TYPE('ocx3')#'C',;
                    '<Kota>', ocx3))
    no_npwp         = ALLTRIM(IIF(TYPE('ocx8')#'C',;
                    '<N.P.W.P>', ocx8))
    RELEASE ALL LIKE ocx*
ENDIF

*panggil form splash
DO FORM 'frmsplash.scx'
_screen.Caption= "SIK 2012 Ver. 1.01~"+nm_perusahaan
_screen.Icon= '\kasir\pictures\barang.ICO'
SET SYSMENU TO
IF WEXIST("Standard")
    DEACTIVATE WINDOW("Standard")
ENDIF
*SET status bar OFF
_screen.Width=1366
_screen.Height=768
_screen.MaxWidth=1366
_screen.MaxHeight=768
_screen.MinWidth=800
_screen.MinHeight=600
_screen.BorderStyle= 3
IF SYSMETRIC(21)<=1366
    _screen.Left=0
    _screen.Top=44
    _screen.MaxButton= .T.
    _screen.Closable= .T.
    _screen.WindowState= 2
ELSE
    _screen.Left=4
    _screen.Top=50
    _screen.MaxButton= .T.
    _screen.Closable= .T. 
    _screen.WindowState= 0
ENDIF

*panggil menu
DO 'mnutama.mpr'
DO 'userlogin.prg' WITH _login
IF !EMPTY(lblidpemakai)
    frmutama.lblidpemakai.caption= ALLTRIM(lblidpemakai)
    frmutama.lblidpemakai.borderstyle= 1
    READ EVENTS
ENDIF

READ EVENTS
QUIT  

Langkah selanjutnya adalah anda jadikan program utama tersebut menjadi program yang pertama kali di eksekusi oleh sistem aplikasi kasir dengan cara sebagai berikut : anda arahkan mouse anda ke program utama tersebut, setelah itu anda klik kanan pada mouse sehingga akan keluar sub menu seperti di bawah ini. Dari situ anda pilih Set Main. 

Sampai di sini selesai sudah anda membuat program utama untuk aplikasi kasir, namun belum bisa di jalankan karena kita belum membuat menu utama dan juga form utama pada aplikasi kasir ini. Saya ucapkan selamat dulu kepada anda yang telah berhasil membuat program utama aplikasi kasir dan sekarang kita akan membuat menu utama. 

Membuat menu utama 

Menu utama pada aplikasi kasir ini digunakan untuk mengkases form-form yang nantinya anda butuhkan. Adapun menu-menu yang di butuhkan pada aplikasi kasir adalah sebagai berikut :

File : user, log in, log out, exit

Input data : karyawan, supplier, barang

Transaksi : pembelian, penjualan

Laporan : barang, supplier, karyawan, pembelian, penjualan 

Utilitas : backup, restore, notepad, explore, kalkulator, re-index, setup perusahaan 

Itulah menu-menu untuk membuat aplikasi kasir, dan sekarang saya akan menjelaskan kepada anda semua bagaimana caranya untuk membuat menu-menu tersebut. Masih pada jendela project manager – prjkasir anda pilih tab other ->menus ->new. Nantinya akan keluar jendela new menu, dari jendela tersebut anda pilih menu.  

Setelah keluar jendela menu designer, pada kolom prompt anda ketikkan File, kemudian di bawahnya anda ketikkan input data, dan seterusnya sampai utilitas.  

Jika sudah selesai anda simpan dengan nama mnutama. Perlu anda ketahui bahwa ketika anda menyimpan menu mnutama ini akhiran (extension) adalah .mnx, sedangkan agar dapat di jalankan secara mandiri nantinya menu utama ini harus di rubah menjadi .mpr. untuk merubahnya harus di generate caranya adalah sebagari berikut. Dari jendela menu designer anda pilih menu yang ada di jendela utama Visual Foxpro, setelah itu anda klik generate. Akan muncul jendela generate menu, setelah itu anda klik generate. Untuk lebih jelasnya anda perhatikan gambar yang ada di bawah ini.

Sampai di sini kita sudah berhasil membuat menu utama, untuk melihat hasilnya anda bisa klik preview yang ada pada jendela menu designer. Untuk membuat sub menu seperti pada gambar di bawah caranya sangat mudah anda tinggal pilih edit pada menu designer, dengan satu syarat pada kolom result anda pilih submenu. 

Sampai di sini kita sudah berhasil membuat program utama dan juga menu utama untuk aplikasi kasir. Untuk tutorial kali ini saya cukupkan sampai di sini terlebih dahulu, jika ada kesempatan akan kita lanjutkan pada artikel selanjutnya yaitu membuat form utama dan splash screen. Terimakasih anda sudah membaca artikel ini sampai selesai, semoga artikel kecil ini bisa bermanfaat bagi kita semua.

 

Tutorial aplikasi kasir bagian 2 : Membuat program utama dan menu utama 2013-12-31T16:36:00+07:00 Rating: 4.5 Diposkan Oleh: xxxxx