Kbase P66384: How to output a PDF file from Crystal Reports.
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
09/02/2004 |
|
Status: Unverified
GOAL:
How to output a PDF file from Crystal Reports.
FIX:
DEFINE VARIABLE crApplication AS COM-HANDLE NO-UNDO.
DEFINE VARIABLE crReport AS COM-HANDLE NO-UNDO.
DEFINE VARIABLE crExportOptions AS COM-HANDLE NO-UNDO.
CREATE "CrystalRuntime.Application" crApplication.
crReport = crApplication:OpenReport("c:\report1.rpt").
crApplication:LogOnServer ("pdsodbc.dll", "<DSN>", "", "<User name>", "<Password>").
crExportOptions = crReport:ExportOptions.
crExportOptions:DiskFileName = "c:\reportOutput.pdf".
crExportOptions:FormatType = 31.
crExportOptions:DestinationType =1.
crExportOptions:PDFExportAllPages = TRUE.
crReport:EXPORT(FALSE). /* No Prompt */
RELEASE OBJECT crExportOptions.
RELEASE OBJECT crApplication.
RELEASE OBJECT crReport.