2 Sub Reports in Report - On No Data I don't want it to print

[ronis]

I have a report that has 2 sub reports - from two seperate queries. I need a way to tell the report that if both sub reports do not have any data, I do not want it to open or print. I am using Access 2000 and have tried the No data command on the sub reports as well as the actual report.

Any help will be greatly appreciated!

Thank.

 

[Amiel]

My approach would be to use something like this in the main report OnOpen() event

Dim db as database
Dim rs as recordset

set db = dbengine(0)(0)
set rs = db.OpenRecordset("Select Count(*) from [QueryThatSubReportUses]&quot

if rs(0) = 0 Then [red]'Count is zero(0) records.[/red]
Cancel = True [red]'Cancel report.[/red]
msgbox "No Records ...", vbyesonly + vbinformation
End IF

End Sub

...another way would be:

Create a Global boolean variable called "boolNoData", in your sub report(s).

In the sub report(s), 'Report_NoData()' event add the code...
boolNoData = True

In the main report 'OnOpen()' Event add the code...
Private Report_OnOpen(Cancel as integer)

if(Reports![MainReportName]![SubReportName].boolNoData) then
DoCmd CancelEvent
'or, Cancel = Tue
End If
End Sub
Amiel
amielzz@netscape.net