Tab out of field on subform, code interferring

[burrina]

I am trying to update a calculated value form 2 fields on my subform. Using the formula below. How or where should I put this code? I had it on the after update event, but it would was trying to calculate and not allowing me to tab out of the field.
As you can see, I need the field "Difference" which is not editable to show the difference between the 2 other fields.

Me.Difference = [SetReOrderLevel] - [OnHand]

[June7]

Why is field not editable? You were using AfterUpdate event for what? Seems to me that should work. Need more info. Post full procedure or db for analysis.

[burrina]

I was making the field Difference show the difference between SetReOrderLevel and OnHand on the after update event of the form.
Found the problem. The main form was doing a requery on 2 fields that had their control source set to 2 fields on the subform so I could get the true result right away.
Guess I can't.
One field was to the control SetReOrderLevel and did a Requery on the before update event, likewise the other control named OnHand.

Then the subform used the code on the after update event: Me.Difference = [SetReOrderLevel] - [OnHand]

The point of all of this was to show the correct Inventory data after it was updated. I stopped using a requery and used a refresh.
Me.Difference = [SetReOrderLevel] - [OnHand] is causing the problem, it just requeries and you cant tab out of the field.

[June7]

You found the problem so issue is resolved?

[burrina]

NO! making me crazy. If I try to make the control show the difference between the other 2 it stops and just requeries.
Is there another way to code this?
I have tried;
Me.Difference = [SetReOrderLevel] - [OnHand]

AND

Default Value of control Difference is =[SetReOrderLevel].[Value]-[OnHand].[Value]

NO LUCK, First line of code stops, second does nothing.


3 Fields: Getting the difference between 2 fields and set that value to the 3rd field.

1.Field One;[SetReOrderLevel] ' Amount set to ReOrder if inventory falls below
2.Field Two; [OnHand] 'Actual amount on inventory
3.Field Three; [Difference] 'Difference between the 2. ReOrder this amount!

Then update the form which is a Datasheet.(Subform)

[burrina]

I don't know why it is NOT letting me tab out and save the record. Can someone Please take a look and see? Notice the code that runs on the After Update Event of the form.

Set The OnHand to ONE less than the SetLevel and keep tabbing to last field to see what happens.

Thanks,

[Rod]

Me.Difference = [SetReOrderLevel] - [OnHand]

Have I totally misunderstood the situation if I ask why you can't put = [SetReOrderLevel] - [OnHand] in the control source for Difference?

[burrina]

Yes, I could.Good Morning to you! I have fixed the problem finally. Such a simple thing. Fixed it last night. Thanks for all the looks and replies. I wound up moving my code to the OnCurrent Event and doing a Requery, and all is well. Sheeessssh!


Thanks,


Good Suggestion By The Way