Skip to Content
0
Feb 08, 2016 at 09:17 PM

Crystal Report Export pdf - InternalException was caught

69 Views

Dear experts,

The following error occurred while export crystal report pdf.

Error in File C:\Users\support\AppData\Local\Temp\temp_c35a1f81-548c-45ae-a6da-11dbe11c19e7 {A1B7C9C7-DB58-4B97-8FB1-55DD269CCF01}.rpt:

Operation not yet implemented.

Here is my code..

Dim report As New ReportDocument()

Dim ReportPath As String = String.Empty

Dim DocReport As New Route1

Dim rs As SAPbobsCOM.Recordset

Dim dt As Data.DataTable

Dim frm As New System.Windows.Forms.Form

Dim CryViewer As New CrystalDecisions.Windows.Forms.CrystalReportViewer

Try

Dim DocNum As String = frmSalesQuotation.Items.Item("t_docnum").Specific.value

Dim Str As String = "select * from OQUT"

CryViewer.ShowExportButton = True

rs = oGfun.DoQuery(Str)

dt = oGfun.ConvertRecordset(rs)

DocReport.SetDataSource(dt)

Dim CrExportOptions As ExportOptions

Dim CrDiskFileDestinationOptions As New _

DiskFileDestinationOptions()

Dim CrFormatTypeOptions As New PdfRtfWordFormatOptions()

CrDiskFileDestinationOptions.DiskFileName = _

sPaySlipSourcePath & "\" & Trim(oDBDSHeader.GetValue("U_CardCode", 0)) & "_SalesQuotation_" & Trim(oDBDSHeader.GetValue("DocEntry", 0)) & sPaySlipFileExt

CrExportOptions = DocReport.ExportOptions

With CrExportOptions

.ExportDestinationType = ExportDestinationType.DiskFile

.ExportFormatType = ExportFormatType.PortableDocFormat

.DestinationOptions = CrDiskFileDestinationOptions

.FormatOptions = CrFormatTypeOptions

End With

DocReport.Export()

DocReport.Dispose()

GC.Collect()

Please help to sort out,

Thanks in advance.

Regards,

silambu

Attachments

PaySlip.png (21.0 kB)