MEMBUAT FORM TRANSAKSI PEMBELIAN MODEL FIRST IN FIRST OUT

 Membuat Form Transaksi Pembelian

1.   Buatkan Form Kelola Data Pembelian dengan disain seperti pada Gambar  9.2.1:

Listing Program Transaksi Pembelian

a.   Object Form1 Procedure LOAD

close index

close data

set date british

set cent on

set defa to d:\sipbfifo\data

if used("barang")

   use in barang

endif

if used("pemasok")

   use in pemasok

endif

if used("detailbeli")