Code updates only 1 (1st) related record

[jamarogers]

My struggle continues...Here's my code:

1) Me.SOCusFName = Me.SOCusLName.Column(1)
2) Me.SOShipCost.SetFocus


3) Forms![SOs]![SODisc] = DLookup("[Discount]", "Customers", "[CusLName] = Forms!SOs!SOCusLName And [CusFName] = Forms!SOs!SOCusFName")
4) Me.Recalc
5) Me.Requery
6) Forms![SOs]![SOItems]![SOItDisc] = Me.SODisc * Forms![SOs]![SOItems]![SOItPrice]
7) Me.Requery
8) Me.Recalc

My logic: If SOCusLName changes, a new SODisc (3) is retrieved and this part works fine. In (6) I wish to recalculate ALL records in the SubForm based on this new SODisc value in the MainForm...this works, BUT ONLY for the 1st record in the SubForm...remaining records remain unchanged. Help please...
Jake

[Dal Jeanis]

This would be clearer

3) Forms![SOs]![SODisc] = DLookup("[Discount]", "Customers", "[CusLName] = " & Me.SOCusLName & " And [CusFName] = " & Me.SOCusFName )

To recalculate all records in the subform, you're going to need an UPDATE query.

You'll have to tell us the criteria for selecting records for the subform - such as linkfields, and are there filters? Then we can suggest ways to cause the mass update.