Lompat ke konten Lompat ke sidebar Lompat ke footer

Memfilter Laporan Berdasarkan Nama Foxpro

MEMFILTER LAPORAN BERDASARKAN NAMA


Visual Fox Pro adalah salah satu pemrograman yang sudah mendudukung OOP ( Oriented Object programming) atau pemrograman yang berbasis pada objek. Kali ini sata akan berbicara tentang bagaimana memfilter laporan atau report  berdasarkan nama.
Pertama buatlah tabel yang akan dibuatkan laporan, dalam kasusu ini saya membuat tabel dosen






Atur indeknya, dan kemudian isi tabelnya seuai tabel anda.










Selanjutnya buatlah form anda, klik tab document > form > new form > masukkan 2 text box dan 1 command group. Seperti gambar di bawah ini
Keterangan :
1.     Label1 : berisi Caption Nama text box yang akan di jadikan acuan awal pemfilteran
2.   Label2 : berisi Caption Nama text box yang akan dijadikan acuan akhir pemfilteran
3.       Text1 : adalah textbox tempat pengisian filter awal
4.       Text2: adalah textbox tempat pengisian filter akhir
5.     Commandfroup1 : berisi tombol yang akan digunakan nanti untuk melakukan filter
1. Preview : untuk mempreview laporan anda yang telah di filter
2. Printer : untuk mencetak hasil pemfilteran ke Printer
3. Exit : Keluar dari aplikasi

Sedangkan untuk kodingnya sendiri berada di bagian command group dan eventnya click

Keterangan :
Cetak=thisform.value : membuat variable cetak untuk commandgroup, nilai default untuk commandgroup adalah 1
N1 : membuat variable untuk mendeklarasikan isi dari text 1 ( thisform.txtnmdos.value )
N2 : membuat variable untuk mendeklarasikan isi dari text 2 ( thisform.txtnmdos2.value )

DO CASE
      CASE cetak=1 &&jika tombol preview di tekan
      REPORT FORM rpt_dosen FOR dosen.nmdos>=n1 AND dosen.nmdos<=n2 PREVIEW NOCONSOLE
CASE cetak=2 &&jika tombol print
      REPORT FORM rpt_dosen FOR dosen.nmdos>=n1 AND dosen.nmdos<=n2 TO PRINTER NOCONSOLE
CASE cetak=3 &&jika tombol exit di tekan
THISFORM.Release
ENDCASE



Demikianlah cara memfilter laporan di visual foxpro, semoga bermanfaat.

2 komentar untuk "Memfilter Laporan Berdasarkan Nama Foxpro"