Hi,
I have an update query which when run will update a stock field. The problem I'm having is only one record is getting updated. Here's my code:
Private Sub cmdReceive_Click()
If Me.PORec.Value = False Then
DoCmd.SetWarnings False
DoCmd.OpenQuery "qryUpdateStockRec", acViewNormal, acEdit
DoCmd.SetWarnings True
Me.PORec.Value = True
Else
MsgBox "This purchase order has already been received. If you need to adjust stock please do so by going to Database Maintenance."
End If
End Sub
The update query is looking at the PartID in a subform. There are 3 records in this subform and only the first record gets updated.
Thanks
I have an update query which when run will update a stock field. The problem I'm having is only one record is getting updated. Here's my code:
Private Sub cmdReceive_Click()
If Me.PORec.Value = False Then
DoCmd.SetWarnings False
DoCmd.OpenQuery "qryUpdateStockRec", acViewNormal, acEdit
DoCmd.SetWarnings True
Me.PORec.Value = True
Else
MsgBox "This purchase order has already been received. If you need to adjust stock please do so by going to Database Maintenance."
End If
End Sub
The update query is looking at the PartID in a subform. There are 3 records in this subform and only the first record gets updated.
Thanks