XFRX#LISTENER ignored the BIGREPORT parameter.

Owned by martinajindrova
Last updated: Feb 20, 2020 by Vojtěch Haluza

KB-20190405-01

Version

Before XFRX 19.0

Symptoms

Log files contained error message: 1190 - File "name" is too large.
Missing images in output file.

Workaround

Use XFRX#INIT.

Hack for XFRX#LISTENER

loSession = XFRX("XFRX#LISTENER")
lnRetval = loSession.SetParams(lcOutputFile,,tlNotOpenViewer,,,,"PDF")
loHook=CREATEOBJECT("_hook")
loHook.oXFRX=loSession 
BINDEVENT(loSession, "BeforeReport", loHook, "BeforeReport" , 1)
REPORT FORM ("somereport") OBJECT loSession
UNBINDEVENT(loSession)
RELEASE loSession

DEFINE CLASS _hook AS Custom
   oXFRX=.NULL. 
   PROCEDURE BeforeReport
      IF NOT ISNULL(This.oXFRX)
         This.oXFRX.oxfDocument.lBIGREPORT=.T.
      ENDIF
      This.oXFRX=.NULL. 
   ENDPROC
ENDDEFINE