> CLOSE ALL > CLEAR ALL > SET EXACT OFF > > SET PROCEDURE TO utilityReportListener.prg ADDITIVE > SELECT 0 > USE testfrx ALIAS rptfile > GO TOP > > > SELECT rptfile > GO TOP > lc_frmfile = "c:\scoresheetest\reports\testerpl" >* REPORT FORM (lc_frmfile) PREVIEW > * lc_frmfile = ALLTRIM(FULLPATH(CURDIR())) + "reports\" + JUSTSTEM(lc_rptname) > > lc_pdf = "test.pdf" > local loSession, lnRetval > loxfrx = XFRX("XFRX#LISTENER") > loxfrx.setEmbeddingType(2) > _xfrx_WordWrapAlgorithm = 1 > lnRetval = loxfrx.SetParams(lc_pdf,,,,,,"PDF") > SELECT rptfile > GO TOP > IF lnRetval = 0 > REPORT FORM (lc_frmfile) OBJECT loxfrx NOPAGEEJECT > Loxfrx.finalize() > ELSE > ? lnRetval > ENDIF > >