Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
XFRX Question
Message
From
04/02/2010 11:02:52
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Third party products
Title:
XFRX Question
Miscellaneous
Thread ID:
01447504
Message ID:
01447504
Views:
229
The code below works fine standing alone.

When I run it in a much larger program, I get an XFRX message saying:
"c:\scoresheetest\reports\testerpl.frx not found!"
Obviously larger program is setting something that XFRX doesn't like.

I tried setting EXACT ON and OFF, no help.

Both are using VFP 9 SP1

Any clues?
   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
Anyone who does not go overboard- deserves to.
Malcolm Forbes, Sr.
Next
Reply
Map
View

Click here to load this message in the networking platform