ECHO in the right place?

[DS]

Is this Echo in the right place? It doesn't seem to be hiding the Loop.
Its a little Rocky...or is the syntax on the loop not so good.
Thanks
DS

Private Sub ListBar_Click()
DoCmd.Echo False, ""
DoCmd.GoToControl "SalesDetails"
DoCmd.GoToRecord , , acNewRec
Forms!Sales.SalesDetails!LineID = _
Nz(DMax("[LineID]", "SalesDetails"), 0) + 1
Me![SalesDetails]![ItemID] = Me.ListBar.Column(0)
Forms!Sales.SalesDetails!MenuNum = Forms!Sales!Text65
Forms!Sales.SalesDetails!SDTaxed = Forms!Sales.SalesDetails!Taxed
Forms!Sales.SalesDetails!SDInclusive =
Forms!Sales.SalesDetails!Inclusive

Forms!Sales.SalesDetails!SDNoTax = Forms!Sales.SalesDetails!NoTax
Forms!Sales.SalesDetails.Form.Requery
With Forms!Sales.SalesDetails.Form.Recordset
If Forms![Sales].[SalesDetails].Form!Text115 > 0 Then
.MoveFirst
Do While .EOF = False And .BOF = False
.Edit
!SDInclusive = False
!SDTaxed = True
If Forms!Sales.SalesDetails.Form!NoTax = True Then
!SDTaxed = False
!SDInclusive = False
End If
.Update
.MoveNext
Loop
End If
End With
DoCmd.GoToRecord , , acLast
DoCmd.Echo True, ""
End Sub