BAHAN PRAKTEK 1.1 Table Perkiraan Nama Table Primary Key : Perkiraan : Noper 1.2 Table Jurnal Nama Table Primary Key : Jurnal : NoBukti 1.3 Form Kelola Data Perkiraan Nama Form : Perkiraan 1Ģ OBJECT FORM1 Procedure LOAD SET DEFAULT TO D:\PEMBUKUAN\DATA CLOSE DATABASES CLOSE INDEXES IF USED('PERKIRAAN') USE IN PERKIRAAN IF USED('JURNAL') USE IN JURNAL SELECT A USE PERKIRAAN SET ORDER TO TAG NOPER SELECT B USE JURNAL Procedure UNLOAD CLOSE DATABASES CLOSE INDEXES USE IN perkiraan Procedure Kosongkan ='' ='' =0 Procedure Aktifkan PARAMETERS X =X =X =X Procedure Tampilkan =PERKIRAAN.noac+' ' =RIGHT(PERKIRAAN.NOPER,4) =PERKIRAAN.NAMAPER =PERKIRAAN.SALDO Procedure Kendali PARAMETERS Y =Y =Y =Y =Y Procedure ACTIVATE =1 SET FILTER TO NOAC='1' THISFORM.KOSONGKAN THISFORM.KENDALI(.T.) 2ģ THISFORM.AKTIFKAN(.F.) =.T. Membuat Form untuk mengelola data Perkiraan I.
1 PRAKTEK 1 & 2 VISUAL FOXPRO LANJUT (APLIKASI AKUNTANSI) Tujuan : 1.
