NEED HELP WITH "NO DATA" EVENT PLEASE

[NewComer]

I am developing a series of reports for maintenance on aircraft and if no maintenance has been performed for a particular aircraft the query will obviously return nothing. However, at the report level I need to display in one of my text fields (discrepancy), "No Discrepancies". If anyone could help, I would appreciate it very much.

This is what I currently have...

Private Sub Report_NoData(Cancel As Integer)

MsgBox "Sorry, there were no records returned.", vbOKOnly + vbInformation

Cancel = True

End Sub

 

[dschomburg]

Try this sort of thing in your query.

SELECT tbl_aircraft.aircraft_name, IIf((IsNull([tbl_aircraft]![discrepancy])),"No Discrepancies",[tbl_aircraft]![discrepancy]) AS discrepancy
FROM tbl_aircraft;

 

[mc9901]

You can modify the join properties query design view so that a record is created (with aircraft name, etc.) even if there are no matching maintenance records. This will create a RIGHT (or LEFT) JOIN in SQL view.