Препратката към обект не е зададена към екземпляр на обект в подотчетите

Моят доклад съчетава два независими доклада заедно. Основният отчет няма източници на данни, но двата подотчета използват един и същ набор от данни от три таблици.

Как мога да разреша тази грешка, която получавам от изпълнението на кода по-долу?

Препратката към обект не е зададена към екземпляр на обект

objRpt = New rptOVERDET
objRpt.SummaryInfo.Dispose()
objRpt.Subreports("srOverview").SetDataSource(dsDetail)
objRpt.Subreports("srOverview").SummaryInfo.Dispose()
objRpt.Subreports("srOverview").SummaryInfo.ReportComments = "Overview Report" & Trim(strReportHeader) & vbNewLine & Trim(strContactPhone)

objRpt.Subreports("srDetail").SetDataSource(dsDetail)
objRpt.Subreports("srDetail").SummaryInfo.Dispose()
objRpt.Subreports("srDetail").SummaryInfo.ReportComments = "Detail Report" & Trim(strReportHeader) & vbNewLine & Trim(strContactPhone)

vb.net crystal-reports subreports
person EddiRae    schedule 19.06.2017    source източник
comment
Все още трябва да зададете източника на данни в главния отчет. Може изобщо да не се налага да задавате наборите от данни на подотчетите. Освен това не правете нито едно от тези извиквания за изхвърляне, докато отчетът не бъде зареден, и правете това само в основния отчет.   -  person reckface    schedule 19.06.2017
comment
Без значение колко подотчета имате, важното е как конструирате вашата заявка? вижте това stackoverflow.com/ въпроси/41810978/   -  person Vijunav Vastivch    schedule 20.06.2017
comment
stackoverflow.com/questions/2099131/   -  person Vijunav Vastivch    schedule 20.06.2017
comment
Получавам следната грешка Възникна необработено изключение от тип „CrystalDecisions.CrystalReports.Engine.DataSourceException“ в CrystalDecisions.CrystalReports.Engine.dll Допълнителна информация: Отчетът няма таблици. Промених кода да бъде както следва:   -  person EddiRae    schedule 20.06.2017
comment
objRpt = Нов rptOVERDET objRpt.SetDataSource(dsDetail) objRpt.SummaryInfo.Dispose() objRpt.Subreports(srOverview).SummaryInfo.ReportComments = Общ отчет & Trim(strReportHeader) & vbNewLine & Trim(strContactPhone) Dim ds As DataSet = New DataSet( ) objRpt.Subreports(srDetail).SummaryInfo.ReportComments = Подробен отчет & Trim(strReportHeader) & vbNewLine & Trim(strContactPhone)   -  person EddiRae    schedule 20.06.2017
comment
reds, заявките ми работят правилно. Това бяха отчети, които в момента са самостоятелни отчети. Ние ги комбинирахме, за да могат да преглеждат прегледа и подробната информация като сърфиране на компютъра си.   -  person EddiRae    schedule 20.06.2017