LOCAL loReportForm 
LOCAL lcClassPath 
LOCAL lcReport 

lcReport = "LIST_PEG" 
* Create the form that the preview is run in and hide all other windows. 
loReportForm = createOBJECT("Form" ) 
HIDE WINDOWS ALL  

* Make the window settings with your preferences 
WITH loReportForm 
	.Height = _screen.Height - 30 
	.Width = _screen.Width - 10 
	.Name = "loReportForm" 
	.Caption = "LAPORAN PENGAWAI BERDASARKAN NAMA" 
	KEYBOARD "{ctrl+f10}" 
ENDWITH 

REPORT FORM (lcReport) PREVIEW WINDOW loReportForm 
* Release the forms and bring other windows back 
loReportForm.Release() 
SHOW WINDOWS ALL  
RETURN