I am attempting to update the base table with a Form. where I reference tables the fields in the base table update. The fields where I have a bit of code in them do not update.
Tbl_Consolidate fields not updating and stay as the default value if there is one assigned:
Flight: IIf([SLeg]<>1,0,[FLCost])
Bag: IIf([GNDTVL]=False And ([SLeg])=1,160,0)
H2Air: IIf([Sleg]<>1 Or [GNDTVL]=True,0,([H2Airmiles]*0.56)*4)
Taxi: IIf([SLeg]=1,150,0)
Tolls: IIf([SLeg]=1,100,0)
On the form the query works and the Qry_Test query works to update the fields
I have tried the following with no errors, but still does not update the fields.
Private Sub H2Air_AfterUpdate()
TBL_Consolidate.H2AirM = Me.H2Air
End Sub
Private Sub H2Air_Change()
TBL_Consolidate.H2AirM = Me.H2Air
End Sub
Travel_Testbed.zip
What am I doing wrong? I think if 1 is solved the others can be solved int he same way.