Re: MS Access front end - MySQL back end

[Daniel Hofer]

Refinement of previous post:

Since 3 fields can change on the lineitem to affect the EXTTOTAL, I abstracted to RecalcLI and call RecalcLi from the AfterUpdate event of each field that can be changed.

Private Sub chkUSEPRORATE_AfterUpdate()
RecalcLI
End Sub

Private Sub PRORATEP_AfterUpdate()
RecalcLI
End Sub

Private Sub UNITS_AfterUpdate()
RecalcLI
End Sub

Private Sub RecalcLI()
On Error GoTo RecalcLI_Err
If Me.ActiveControl.VALUE = Me.ActiveControl.OldValue Then
Exit Sub
End If

Refresh

Screen.MousePointer = 11
Form_frmJobs.RecalcValuesViaStoredProcedure
Me.Parent.Parent.Refresh
Screen.MousePointer = 1

RecalcLI_Err_Exit:
Exit Sub

RecalcLI_Err:
MsgBox Error$
Resume RecalcLI_Err_Exit
End Sub