D 
		
								
				
				
			
		DS
This statement is not updating.  Can you not update a criteria field?
Could that be it?
Thanks
DS
Dim RVDSQL As String
RVDSQL = "UPDATE tblVoidDetails SET tblVoidDetails.CDVoidReason =
Forms!frmFXVoidItemReason!TxtReasonID " & _
"WHERE tblVoidDetails.CDCheckID = Forms!frmFXVoidItem!TxtSalesID " & _
"AND tblVoidDetails.CDVoidReason = 0;"
DoCmd.RunSQL (RVDSQL)
				
			Could that be it?
Thanks
DS
Dim RVDSQL As String
RVDSQL = "UPDATE tblVoidDetails SET tblVoidDetails.CDVoidReason =
Forms!frmFXVoidItemReason!TxtReasonID " & _
"WHERE tblVoidDetails.CDCheckID = Forms!frmFXVoidItem!TxtSalesID " & _
"AND tblVoidDetails.CDVoidReason = 0;"
DoCmd.RunSQL (RVDSQL)