>EXTERNAL CLASS _reportlistener.vcx >SET CLASSLIB TO _reportlistener.vcx additive >loxfrx= EVALUATE("xfrx('XFRX#LISTENER')") >nRetVal = loxfrx.SetParams(poGRXReportObject.output,m.tempdir,.t.,reportCodePage(),,,"PDF") >If nRetVal # 0 > MESSAGEBOX('Error ' +TRANSFORM(m.nRetVal)+ ; > ' '+ loXFRX.ErrorMessage(m.nRetVal) ) > RETURN > ENDIF >loxfrx.setauthor('myapp') >REPORT FORM ( pcGRXTempName ) &pcGRXRepExpr OBJECT loXFRX >RELEASE loXFRX >DOC, FDOC, RTF, FRTF, HTML, MHT, XLS, XLSPLAIN