Consultor Eletrônico



Kbase 20334: How to view a report using Crystal Reports version 6
Autor   Progress Software Corporation - Progress
Acesso   Público
Publicação   16/10/2008
Status: Unverified

GOAL:

How to view a report using Crystal Reports version 6

GOAL:

How to view a Crystal Report via OLEAutomation.

FIX:

/* ************************************************** */
DEF VAR hCR AS COM-HANDLE NO-UNDO.
DEF VAR hReport AS COM-HANDLE NO-UNDO.
DEF VAR hDB AS COM-HANDLE NO-UNDO.

CREATE "Crystal.CRPE.Application" hCR.

hreport = hCR:openReport("c:\rptProgress.rpt").

/* */
/* View the report */
/* */
hReport:preview().

/* If any change */
/* Update the report automatically */
/* */
hDb = hReport:DATABASE.
hDb:verify().

RELEASE OBJECT hDB.
RELEASE OBJECT hReport.
RELEASE OBJECT hCr.