HasData Issue

[Greg]

Hi All,

I have the following code located in the On Format of a report which works
great.

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If Me.HasData Then
If Me.Total_Loss.Value = "NO" Then
Me.lblTotal_Loss.Visible = False
Else
Me.lblTotal_Loss.Visible = True
End If
If Me.GST = "YES" Then
Me![ITCABN].Visible = True
Else
Me![ITCABN].Visible = False
End If
End If
End Sub


I have another report that the HasData doesnt work on and i'm confused as to
what is causing the problem. Here is the code.

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If Me.HasData Then
If IsNull(Me!OSurname) Or Me!OSurname = 0 Then
Me!Dear.Visible = False
Me!ODName.Visible = False
Me!Label11.Visible = True
Me!OCompany.Visible = True
Else
Me!Dear.Visible = True
Me!ODName.Visible = True
Me!Label11.Visible = False
Me!OCompany.Visible = False
End If
End If
End Sub

My report relies on a subform "invoice" within a form "claim form", if
there's no record in the subform "invoice" then i get errors on the report,
but when i added the HasData line to the above code it works perfectly and
both reports rely on the same subform "invoice"

Can anyone assist?

Greg.