Fox Pro 3

Panduan Visual Foxpro http://w w w .fox-id.org

Lesson I : Introduction A. Description of Foxpro Visual Foxpro merupakan bahasa pemrograman tingkat tinggi, yang merupakan kelanjutan dari foxbase versi DOS. Foxpro adalah software pengolahan / pengatur data yang telah mengalami perkembangan dari sebelumnya, yaitu dengan menggunakan teknik RUSHMORE. Xbase merupakan awal dari segala perkembangan software ini, oleh karena itu foxpro masih dapat membaca tabel yang dibuat oleh aplikasi Xbase, seperti Dbase. Ada pun tujuan awal dari pembuatan aplikasi foxpro adalah sebagai media pengatur / penyimpanan data (informasi).

B. The Visual Foxpro Enviroment IDE (Integrated Development Enviroment) adalah bagian dari Foxpro yang digunakan untuk menciptakan aplikasi, dengan IDE programmer secara visual merancang tampilan untuk user dan menulis listing program.

3 1 2 4

Gambar 1.1 Interface Visual Foxpro

1

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

Keterangan : 1. MenuBar Berfungsi untuk memilih tugas-tugas tertentu seperti memulai, mengubah, atau mengakhiri suatu aplikasi.

2. ToolBar Tidak jauh berbeda dengan fungsi MenuBar, hanya saja Toolbar lebih praktis dan cepat dalam penggunaannya.

3. Command Window Berfungsi untuk menuliskan semua perintah-perintah visual foxpro, seperti Create, Browse Last atau Modify Command.

4. Layar Output Merupakan tempat hasil keluaran dari program yang dibuat.

2

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

Lesson II : Building a Visual Foxpro Table A. Create Table Dalam membuat tabel dalam foxpro ada 2 cara, yaitu menggunakan command CREATE pada command window dan menggunakan menu File > New. 1. Membuat tabel dengan Command Create
Ketik perintah CREATE pada command window, lalu akan muncul jendela penyimpanan, simpan dengan nama tabel.dbf.
Jendela Tabel Designer akan muncul, disinilah kita mengatur seluruh field yang akan dibuat pada tabel.

Gambar 2.1 Membuat tabel dengan Command Create

Gambar 2.2 Tabel designer

3

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org


Setelah design tabel selesai klik OK, akan muncul pertanyaan yang menanyakan apakah akan mengisi data / record, Klik YES, lalu isi datanya.
Setelah selesai isi klik menu view, Pilih Browse untuk melihat isi tabel.

Gambar 2.3 Dialog Box

Gambar 2.4 Input Data Tabel

Gambar 2.5 Menu View > Browse

4

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

2. Membuat Tabel dengan Menu File
Klik Menu File, Pilih New lalu muncul kotak Data New, Disana terdapat banyak pilihan, klik Table pada File Type, lalu Klik New File.

Gambar 2.5 Menu File New


Langkah berikutnya sama dengan langkah diatas.

5

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

Lesson III : Building a Visual Foxpro Program A. Creating Hello Program Seperti halnya membuat tabel, membuat program / menulis sebuah kode program di Foxpro ada 2 cara, yaitu menggunakan command MODIFY COMMAND dan File > New > Program. 1. Dengan Command window
Tulis MODIFY COMMAND pada command window, lalu enter.

Gbr 3.1 Perintah Modify Command
Muncul Sebuah jendela dengan nama program1, disinilah semua kode program akan ditulis.

Gbr 3.2 Jendela Program


Setelah semua program ditulis, klik menu program, pilih DO Program1, Klik Yes, lalu ganti nama filenya. Dan lihat hasilnya di layar foxpro.

6

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

Gbr 3.3 Simpan Program

Gbr 3.4 Hasil Compile (Do Program)

B. Create Input Program Sebelumnya telah membuat program untuk menampilkan tulisan, sekarang bagaimana

membuat

program

untuk

dapat

menerima

inputan

sekaligus

menampilkannya.
Ketik Listing berikut pada Jendela program baru dan simpan dengan nama Salam.prg Clear nm = space(15) um = space(2) @1,1 to 10,50 @2,2 say “Tulis Nama Anda : “ get nm read @3,2 say “Masukan Usia Anda : “ get um

7

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

read clear @1,1 to 10,50 @2,10 say “Selamat Datang “ + nm @4,4 say “Anda Masuk Dengan Nama “ + nm @5,5 say “Usia Anda Saat Ini “ + um @5,25 say “ Tahun”


Simpan dan Compile (Do Salam.prg), isi dan lihat hasilnya.

Gbr 3.5 Program Salam.prg

Gbr 3.6 Input dan Output Program Salam.prg

8

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

C. Create While Program While atau While do merupakan salah satu perintah untuk melakukan perulangan sampai batas yang telah ditentukan. Berikut contoh penggunaan while untuk menampilkan isi dari tabel yang telah dibuat / input.
Ketik Modify Command untuk membuat / menulis listing program.
Tulis Listing Berikut use C:\foxpro\modul\barang.dbf clear baris = 5 @2,35 say " DAFTAR BARANG " @3,33 say " TOKO SELALU MAJU " go top do while.not.eof() @baris,5 say kdbarang @baris,15 say nmbarang @baris,45 say HrgSatuan @baris,70 say Jumlah @baris,80 say Total baris=baris+1 skip enddo


Simpan dan Compile (Do namaprogram.prg)

Gbr 3.6 Hasil While Do

9

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

D. Building Input Table Program Perintah While dan Command Get dan Read dapat dikombinasi untuk dapat membuat sebuah program yang dapat melakukan pengisian data ke dalam tabel.
Ketik Listing Berikut dan save clear kd = space(4) nm = space(15) hrg = 0 jml = 0 tot = 0 lagi = " " DO while.not.lagi="t" @1,1 to 15,50 @2,10 say "TAMBAH DATA BARANG" @4,2 say "Kode Barang " get kd @5,2 say "Nama Barang " get nm @6,2 say "Harga" get hrg @7,2 say "Jumlah " get jml @8,2 say "Total " get tot read Append blank replace Kdbarang with kd replace Nmbarang with nm replace HrgSatuan with hrg replace Jumlah with jml replace Total with tot @10,2 say " Input Lagi (y/t) ? " get lagi read enddo
Do Program, untuk menjalankannya.

10

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

Gbr 3.7 Input Data Barang

Gbr 3.8 Hasil Input Data Barang

Latihan 1. Buat tabel karyawan lalu buat program inputnya dan masukan data sebanyak 15 record. 2. Buat program tampil data menurut kreasi masing-masing.

11

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

E. Building Menu Program Program yang telah dibuat sebelumnya masih terpisah-pisah sehingga menyulitkan pemanggilan. Menu program disini adalah membuat sebuah menu pilihan terhadap program apa yang akan dijalankan. Berikut contohnya menu program yang diberi nama

menu.prg Clear Pilih = “ “ @1,1 to 15,50 @3,2 say “MENU UTAMA” @4,2 say “1. ENTRY DATA” @5,2 say “2. SEARCH DATA “ @6,2 say “3. REPORT DATA” @7,2 say “4. EXIT “ @9,2 say “Pilih No. Menu ....” get pilih read if pilih=”1” then DO tambah Elseif pilih=”2” then DO cari Elseif pilih=”3” then DO laporan Else @12,2 say “Tekan Sembarang ... !” Wait “” Endif

Tambah.prg Use C:\foxpro\modul\barang.dbf Clear Kd=space(4)

12

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

Nm=space(25) Hrg=0 Jml=0 Tot=0 Lagi=" " Do While.NOT.lagi="t" @1,1 to 20,50 @2,2 say "ENTRY DATA / TAMBAH DATA" @3,2 say "----------------------------------------------------" @5,2 say "Kode Barang : " get kd read @6,2 say "Nama Barang : " get nm read @7,2 say "Harga : " get hrg read @8,2 say "Jumlah : "get jml read tot=hrg * jml @9,2 say " Total : " get tot Append Blank Replace kdbarang with kd Replace nmbarang with nm Replace hrgsatuan with hrg Replace jumlah with jml Replace total with tot @12,2 say "Input Lagi (y/t) ? " get lagi read DO c:\foxpro\modul\menu.prg Enddo

13

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

Cari.prg Use C:\foxpro\modul\barang.dbf Clear Hawal = 0 Hakhir = 0 Baris = 5 Lagi = “ “ DO While.Not.lagi =”t” @1,5 say “Mencari Data Berdasarkan Harga” @3,5 say “Harga Awal : “ get hawal @3, 25 say “ s/d Harga Akhir : “ get hakhir read Go Top Do While.Not.EOF() If hrgsatuan >= hawal AND hrgsatuan <= hakhir then @baris,5 say kdbarang @baris,20 say nmbarang @baris,35 say hrgsatuan @baris,45 say jumlah @baris,60 say total baris = baris + 1 endif skip enddo @baris+1,5 say “Cari Lagi (y/t) ? “ get lagi read @baris+1,5 say “Tekan Sembarang ........” wait “ “ Do menu Enddo

14

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

Laporan.prg Use C:\foxpro\modul\barang.dbf Clear Baris = 3 @1,5 say “ LAPORAN DATA BARANG “ go top Do WHILE.Not.eof() @baris,5 say kdbarang @baris, 20 say nmbarang @baris, 35 say hrgsatuan @baris,45 say jumlah @baris,60 say total baris = baris + 1 skip enddo @baris+1,5 say “ Tekan Sembarang .............” wait “” Do menu OutPut :

Gambar 3. 9 Menu.prg

15

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

Cari.prg Laporan.prg

Gambar 3.10 Tambah.prg

Gambar 3. 11 cari.prg (Input Nilai)

16

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

Gambar 3.12 cari.prg (Ketemu)

Gambar 3.13 laporan.prg

F. Array Program Array merupakan sebuah variable yang mampu menyediakan variabel sebanyak nilai yang telah ditentukan. Berikut contoh program array :

Array.prg clear dimension nilai(5) for i=1 to 5

17

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

nilai(i)= 0 @i,2 say "Input Nilai Ke " + str(i) get nilai(i) read endfor *clear for i=1 to 5 @i,50 say "Nilai " + str(i) + " = " + str(nilai(i)) endfor

Hasil :

Gambar 3.14 Array.prg

TUGAS 1. Buat sebuah program data perpustakaan dengan program menu, minimal 2 tabel (buku dan peminjam) ! 2. Buat program pencari nilai terbesar, terkecil, rata-rata dan total nilai dengan menggunakan array !

18

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

Lesson IV : Project Manager A. Create New Project Visual foxpro tidak hanya sebatas dengan command windows, foxpro juga mampu mendesain sebuah program layaknya software development lainnya. Sebelum memulai membuat sebuah program dengan fasilitas object oriented (menggunakan objek sebagai media) terlebih dahulu membuat sebuah project dari program yang akan dibuat. (Usahakan setiap project dibuatkan folder tersendiri) ∞ Klik File > New pilih Project dan klik tombol new file. ∞ Atau ketik Create project pada command window, maka akan muncul jendela penyimpanan,

simpan

pada

folder

sendiri.

Contoh

:

C:\foxpro\modul\modpro\prosatu.pjx

Gambar 4.1 New Project ∞ Muncul Project Manager, disini atur semua keperluan seperti desain tabel, desain form, desain report dan kode program utama.

19

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

Keterangan : ∞ Data

: Merupakan tempat untuk mendesain / membuat database, tabel

dan query. ∞ Documents

: Merupakan tempat untuk merancang baik itu merancang

tampilan program (form) atau sebuah laporan (report) ∞ Code

: Tempat untuk menuliskan program utama yang akan berjalan

pertama kali saat program dijalankan (konfigurasi utama), seperti title, window state atau icon program dan lainnya. ∞ Other

: Tempat untuk membuat menu dari program yang akan dibuat,

dengan metode MDI ( Multiple Document Interface).

20

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

Gambar 4.2 Create New Database dan New Table

B. Form Desain Setelah semuanya tersiapkan dalam hal ini database dan tabel, kini saatnya untuk mendesain tampilan program yang akan dibuat. ∞ Klik bagian Document, pilih form dan klik tombol new

Gambar 4.3 Create New Form

21

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

∞ Klik New Form, maka muncul jendela desain form (Form Designer)

Gambar 4.4 Form Designer ∞ Mulailah mendesain form sesuai program

Gambar 4.5 Design form Input ∞ Setelah itu klik tombol Build pada project manager atau klik kanan pada title bar pilih run form untuk menjalankannya.

22

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

Gambar 4.6 Hasil Run Form Input.scx

C. Report Desain Report / Laporan biasa digunakan pada aplikasi untuk menampilkan data atau ringkasan data dalam bentuk dokumen tercetak. Laporan data dicptakan dengan berbagai cara, salah satunya melalui perintah CREATE REPORT. Secara garis besar, tahapan dalam pembuatan laporan adalah : 1. Menentukan sumber data 2. Mengatur tata letak laporan. Berikut contoh sederhana pembuatan laporan berdasarkan oleh tabel barang.dbf. ∞ Klik bagian Documents, pilih report, klik tombol New

Gambar 4.7 New Report

23

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

∞ Klik Tombol New Report, maka muncul sebuah jendela report designer. ∞ Pada report designer, klik kanan atau klik menu view pilih data environment. ∞ Pada Data Environment, klik kanan dan pilih Add dan pilih tabel yang akan dibuat laporannya.

Gambar 4.8 Data environment

Gambar 4.9 Data Environment (Add)

24

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

∞ Atur bentuk laporannya mulai dari judul hingga field. ∞ Setelah selesai preview report.

Gambar 4.10 Desain Field

Gambar 4.11 Design Report

∞ Klik kanan pada bagian design report, atau klik menu view, pilih Preview.

25

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

Gambar 4.12 Preview Report

D. Menu Menu / sistem menu sering dijumpai pada aplikasi yang berjalan dilingkungan windows. Sistem menu dapat diciptakan dengan mudah melalui fasilitas Menu pada bagian Other didalam project manager. Berikut contoh membuat menu dengan isi sebagai berikut : Warna Biru Merah Hijau Putih

Bunga Mawar Melati

Selesai

Kombinasi

Putih – Merah Merah – Hijau Putih - Biru

Gambar 4.13 Skema menu

26

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

Langkah membuat menu : ∞ Pada bagian Other di project Manager, pilih Menus lalu klik tombol new

Gambar 4.14 New Menu ∞ Pada dialog box new Menu, pilih Menu. Akan menampilkan Menu Designer.

Gambar 4.16 Menu Designer ∞ Pada tahap ini, buatlah menu seperti skema menu diatas.

Gambar 4.17 Menu bar ( Warna, Bunga dan Selesai)

27

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua

Panduan Visual Foxpro http://w w w .fox-id.org

Gambar 4.18 Submenu Warna

Gambar 4.19 Preview Menu

28

K elix © 2006 B elix03@ gmail.com http://ww w .esnips.com/w eb/buatsemua