#include "FiveWin.ch"
#include "report.ch"
request DBFCDX
STATIC oReport
Function Rep01()
LOCAL oPrn, oReport
USE TEST NEW VIA "DBFCDX"
Print oPrn FILE "report.pdf"
REPORT oReport TITLE "*** My First Report ***" TO DEVICE oPrn
COLUMN TITLE "St" DATA Test->State
COLUMN TITLE "First Name" DATA Test->First
COLUMN TITLE " Salary" DATA Test->Salary
END REPORT
oReport:CellView()
ACTIVATE REPORT oReport
CLOSE TEST
RETURN NIL
it also flashes a message box on the screen but it vanishes too fast for me to see it.
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: Google [Bot] and 94 guests