SET REPORTBEHAVIOR 90 REPORT FORM REPORTS\TEST PREVIEW
oRL = NEWOBJECT("reportListener") orl.ListenerType =1 REPORT FORM reports\test OBJECT oRL