I recently upgraded to 2008 Q3 of telerik reporting and a new problem has arisen with my reports.
I have several Reports with Sub Reports.
Each sub report has a group header.
When I preview the report, the group header(s) of the sub reports are appearing twice.
If i export to PDF, TIFF, Excel, or any other format then the report is rendered correctly.
Any ideas?
I've been trying for 3 days to solve this with no luck. Couldn't find anything on the forum about this either.
Here is the code for my Master Report.
This is a very simple report that serves as a standardized report header and footer with a SubReport in the details section.
![]()
Each sub report has a group header.
When I preview the report, the group header(s) of the sub reports are appearing twice.
If i export to PDF, TIFF, Excel, or any other format then the report is rendered correctly.
Any ideas?
Here is the code for my Master Report.
This is a very simple report that serves as a standardized report header and footer with a SubReport in the details section.
| Partial Public Class MasterReport |
| Inherits Report |
| Public Sub New() |
| InitializeComponent() |
| End Sub |
| Dim _ReportCriteria As IA.Reporting.ReportCriteria |
| 'Public Sub New(ByVal subReport As ReportBase, ByVal criteria As ReportCriteria) |
| Public Sub New(ByVal subReport As IReport, ByVal criteria As ReportCriteria) |
| InitializeComponent() |
| 'Init the DataSource |
| Dim oneRec As New GenericCollection(Of String) |
| oneRec.Add("one") |
| Me.DataSource = oneRec |
| 'Set the Sub Report Type |
| Me.SubReport1.ReportSource = subReport |
| Me.PictureBox1.Value = ReportRenderTools.ImageTools.IAHeaderImage |
| Me.reportNameTextBox.Value = subReport.ReportTitle |
| _ReportCriteria = criteria |
| End Sub |
| Private Sub SubReport1_NeedDataSource(ByVal sender As Object, ByVal e As System.EventArgs) Handles SubReport1.NeedDataSource |
| Dim subReport As Telerik.Reporting.Processing.SubReport = TryCast(sender, Telerik.Reporting.Processing.SubReport) |
| If Not subReport Is Nothing Then |
| Dim IRep As IReport = TryCast(subReport.InnerReport.ItemDefinition, IReport) |
| IRep.SetReportHeader(_ReportCriteria) |
| Dim data As Object = IRep.CreateDataSource(_ReportCriteria) |
| If data.Count = 0I Then |
| subReport.InnerReport.DataSource = Nothing |
| Else |
| subReport.InnerReport.DataSource = data |
| End If |
| End If |
| End Sub |
| End Class |