Mari kita membuat tampilan Master Pengeluaran Kas dengan menggunakan 4 perintah di atas. Perintah SCREEN selalu mengawali setiap program Ksystem. IMAGE menggambar tampilan yang akan muncul di layar, FIELD menjelaskan field field yang ada di tampilan dan END_SCREEN selalu mengakhiri setiap program Ksystem. Untuk keterangan lebih detail bisa dilihat di keterangan setiap perintah di bab pertama.
Login dengan user ksystem di Linux, masuk ke terminal dengan pilihan Application->System Tools, Terminal. Untuk Windows buka terminal DOS dan cd \ksystem
mkdir prt9000
vi prt9000/sct271
Untuk membantu mempercepat pengetikan program, gunakan template yang sudah disediakan di direktori kerangka. Ketik :r kerangka/master kemudian sesuaikan sehingga sesuai dengan tampilan di bawah sbb:
SCREEN 271 QUERY_TYPE Program Kas Keluar SCR_FILE bkk IMAGE(master) /--SCT271------------------------------Pengeluaran KAS/BANK/GIRO-----------------------------------\ | /-------------------------\ /------------------------\ /---------------------------------------\ | | |No.Bukti: ______________ | |Tanggal : ________ | |Rek.: __ ___________ _____________ | | | |Jenis : __ Type:___ | |Penerima: ____________ | |Nama: ________________________________ | | | |Cab/Div : ____ /_______ | |Status : ____ __ _____ | |Ket.: ________________________________ | | | \-------------------------/ \------------------------/ \---------------------------------------/ | | ___ ____ | | | | | | | | | | | | | | | | | | | | | | /------------TOTAL BIAYA------------------------t--------------------TOTAL KAS-----------------\ | | | __________________________________________.__ | _________________________________________.__ | | | | | | | | | | | | | \-----------------------------------------------.----------------------------------------------/ | \--------------------------------------------------------------------------------------------------/ FIELD(master) bkknum ALLCAPS INPUTRI 1 /* Nomor Bukti */ bkktgl NONE {DD-MM-YY} INPUTRI 7 /* Tanggal */ bkkkb ALLCAPS NOCHANGE INPUTRI 11 /* Nomor Bukti */ bkknobbm ALLCAPS INPUTRI 12 bbmket PROTECT INPUTRI 13 /* Total Biaya */ bkktype ALLCAPS NOCHANGE INPUTRI 2 bkkstsexp ALLCAPS NOCHANGE INPUTRI 3 bkkkode ALLCAPS INPUTRI 8 /* Kode Penerima*/ bkknama ALLCAPS SCROLL INPUTRI 14 /* Nama Penerima */ bkkcab ALLCAPS SCROLL INPUTRI 4 bkkdvs ALLCAPS SCROLL INPUTRI 5 bkksts PROTECT ALLCAPS INPUTRI 9 /* Status */ bkkstsapr PROTECT ALLCAPS INPUTRI 10 /* Status */ bkktdkapr PROTECT ALLCAPS INPUTRI 11 /* Status */ bkkket ALLCAPS SCROLL INPUTRI 15 /* Total Biaya */ bkktype2 PROTECT QPROTECT UNSEEN INPUTRI 19 /* Status */ bkkscr PROTECT QPROTECT INPUTRI 20 /* Status */ bkktotal NUMERIC BIG 21 /* Total Biaya */ bkkjmlmut NUMERIC BIG 22 /* Total Biaya */ END_SCREEN
Program Ksystem menyediakan tempat di layar sebesar 100 karakter ke kanan dan 24 baris ke bawah. Dalam IMAGE, sebuah field diwakili dengan garis bawah sepanjang yang diinginkan, jadi pada tampilan
| |No.Bukti: ______________ | |Tanggal : ________ | |Rek.: __ ___________ _____________ | |
ada 5 field yang ditampilkan. Nama dari field field ini ditulis di bagian FIELD dengan urutan dari kiri ke kanan baru ke baris bawahnya. Maka dengan melihat bagian FIELD
FIELD(master) bkknum ALLCAPS INPUTRI 1 /* Nomor Bukti */ bkktgl NONE {DD-MM-YY} INPUTRI 7 /* Tanggal */ bkkkb ALLCAPS NOCHANGE INPUTRI 11 /* Kas/Bank*/ bkknobbm ALLCAPS INPUTRI 12 bbbmket PROTECT INPUTRI 13 /* Total Biaya */
kita lihat bahwa field pertama adalah bkknum, disusul oleh bkktgl, bkkkb, bkknobbm dan bbmket Nomor di kolom terakhir adalah urutan field pada saat kita tekan enter.
kspar prt9000/sct271
gunakan user:root, password:root (kecuali sudah diubah sendiri) Bila ada kesalahan pada saat kspar dan kspar mengeluarkan pesan kesalahan nomor tertentu, lihatlah informasi kesalahan ini di file error.h. Fungsi kspar prt9000/sct271 ini menghasilkan frm9000/sct271.frm
ksgen -x9000
Perintah ksgen akan menggabung sct271 yang ada di frm9000/sct271 ke sistem menu Ksystem sehingga dapat diakses via ksrun. Semua program standar Ksystem ada di direktori atau folder prg. Jadi ada prg/scr111, prg/scr201 dst. Ksgen -x9000 ini akan menghasilkan file scrdef9000.str
ksrun -x9000
Ksrun -x9000 ini akan membaca sistem menu yang ada di scrdef9000.str. sesudah login, pilih menu 271, maka akan tampil tampilan sbb:
Dari gambar di atas kita lihat bahwa tulisan SCT271 berada di baris pertama dan bertabrakan dengan tombol tombol perintah yang juga ada di baris pertama. Mari kita pindah tulisan SCT271 ke baris ke dua. Sekalian kita beri warna pada kotak kotak yang ada. dengan cara mengubah baris
IMAGE(master) menjadi IMAGE(master) {BASE_ROW=2} {FRSFLD_BACKUP} {LSTFLD_ADVANCE} {IMG_BOX_COLOR1=250,228,205} {IMG_BOX_COLOR2=191,245,196} {IMG_BOX_COLOR3=166,214,240} {IMG_BOX_COLOR4=239,255,151}
Gunakan editor vi untuk mengubah baris di atas. {BASE_ROW=2} akan membuat IMAGE ini dimulai dari baris ke 2. {FRSFLD_BACKUP} akan membuat kursor di field pertama akan pindah ke field terakhir bila kita tekan tombol Backspace. {LSTFLD_ADVANCE} akan membuat kursor yang ada di field terakhir berpindah ke field pertama bila kita tekan enter. {IMG_BOX_COLOR1=250,228,205} akan memberi warna pada kotak atas kiri. {IMG_BOX_COLOR2} akan memberi warna pada kotak di sebelah kanannya dst. Warna ini adalah warna RGB (Red Green Blue) yang sudah umum. jalankan lagi kspar prt9000/sct271. Anda tidak perlu mengeluarkan program ksrun yang sedang berjalan. Anda cukup keluar dari layar 271 dengan menekan tombol escape yang akan membawa anda ke layar menu, kemudian masuk lagi ke sct271. Program yang sudah kita geser ke bawah akan muncul sbb:
Mari kita coba menambah rekord dengan menekan tombol 't', kursor akan berada di field No.Bukti. Sekarang kita tekan enter dan kursor akan pindah ke field jenis. Hal ini terjadi karena urutan field pertama adalah bkknum dan ke 2 adalah bkktype. Kalau kita tekan enter lagi maka kursor akan berada di field bkkstsexp. Untuk mengetahui kursor sekarang berada di field apa, gunakan tombol F7 untuk menampilkan nama field. Tekan F7 lagi untuk kembali ke mode normal.
Sesudah kita menyelesaikan program pertama kita, marilah kita belajar untuk memahami file bkk yang dipakai di sct271.
Nama File: bkk Fungsi: File transaksi Pengeluaran kas, Penerimaan kas, Pengeluaran Kas Bon dan Penyelesaian Kas bon. Field field utama bkknum: Nomor transaksi bkktgl: Tanggal Transaksi bkknobbm: No. Rekening buku besar bila pengeluaran hanya butuh satu rekening kas atau bank. bkkjmlmut: Total nilai uang yang dikeluarkan, mis. Tunai 100rb, Cek 200rb, total=300rb bkktotal: Total perincian biaya yang dikeluarkan, mis.biaya transport=200rb, biaya pemasaran 100rb, total = 300rb. bkktype: Jenis pengeluaran PU: Pengeluaran Umum HL: Hutang Lain, mis. hutang ke Bank atau ke orang lain PL: Piutang Lain, Piutang di luar usaha. PP: Piutang Pegawai bkkstsexp: Jenis pengeluaran yang merinci bkktype = PU BI: Biaya umum biasa BAT: Biaya Aktiva Tetap. Pengeluaran untuk pemeliharaan aktiva tetap seperti mobil sehingga kita bisa tahu biaya per mobil. bkktype2: Jenis transaksi. KK: Kas keluar KM: Kas masuk BS: Bon Sementara bkkkb: Tipe pengeluaran kas, KS untuk tunai BK untuk pengeluaran dari Bank. bkkcab: Cabang yang pengeluaran kas bkkdvs: Divisi yang mengeluarkan bkksts: Status dari transaksi ini OPEN: belum diposting. CLSD: sudah posting.