Version du 6/10/2003

XFRX peut, maintenant, sauver le rapport générés dans un fichier (type XFF) pour le visionner,
et le transformer ensuite dans les différents formats : PDF, Word, Excel, HTML.

Pour sauver un rapport, donnez "XFF" comme type de fichier en paramètre de la méthode SetParams

LOCAL loSession, lcReportFile
lcReportFile = "output.xff"
loSession=EVALUATE([xfrx("XFRX#INIT")])
IF loSession.SetParams(lcReportFile,,,,,,"XFF") = 0
  loSession.ProcessReport("report")
  loSession.finalize()
ENDIF

Par défaut, l'extension .XFF est ajoutée au fichier à produire (XFrx File).
D'un point de vue structure : le fichier XFF est un fichier de type DBF normal, et comme des champs 'mémo' sont utilisés, un autre fichier du même nom avec l'extension .FPT est créé.

Pour prévisualiser un fichier XFF vous devez appeler un objet de la classe XFRXDraw, ouvrir le fichier et l'envoyer en paramétre à la méthode TransformReport.

Exemple : Transformation d'un fichier XFF en document PDF.

LOCAL loSession, loReport
loSession=EVALUATE([report("XFRX#INIT")])
lcName = "output.xff"
loReport = EVALUATE([report("XFRX#DRAW")])
IF loReport.openDocument(lcName)
  lnRetVal = loSession.SetParams("output.pdf",,,,,,"PDF")
  loSession.TransformReport(loReport)
ENDIF

Dans le cas où vous souhaitez prévisualiser le rapport, l'appel est vraiement similaire :

LOCAL loSession, loReport
loSession=EVALUATE([report("XFRX#INIT")])
lcName = "output.xff"
loReport = EVALUATE([report("XFRX#DRAW")])
IF loReport.openDocument(lcName)
  thisform.cntXFRX.reset() && let's assume the XFRX container reference is thisform.cntXFRX
  lnRetVal = loSession.SetParams(,,,,,,"CNT")
  loSession.setOtherParams(thisform.cntXFRX)
  loSession.TransformReport(loReport)
ENDIF

Vous pouvez aussi, générer qu'un sous-ensemble des pages d'un document.
Pour l'archiver appellez la méthode SetPageRange() avec la définition des plage de pages en paramétre, par exemple :

loSession.setPageRange("2,4,5-8")

Pour un exemple complet, regardez l'application de démonstration qui est incluse dans la dernière version d'évaluation (download).

«EQEUS»