Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.
Dim strSQL As String Dim liTotal As Long Dim liBalance As Long Dim liEstimate As Long Dim liActual As Long liBalance = ([A] + [B] + [C]) liEstimate = ([X] + [Y] + [Z]) If liBalance < 0 Then liActual = (liEstimate + liBalance) Else liActual = liEstimate End If liTotal = ([PreviouslySavedCost] - liActual) strSQL = "Update [ProjOverview] Set [Status] = 'Complete', [Complete] = Now, [TotalServicesAct] = [TotalServicesEst] Where (([Status] = 'Funded') AND (liTotal > 0) AND ((SELECT Sum([JONProjJoins].[Amount]) From [ProjOverview] LEFT JOIN [JONProjJoins] ON [ProjOverview].[IDNmbr] = [JONProjJoins].[ProjID] GROUP BY [JONProjJoins].[ProjID]) <= 0))" DoCmd.RunSQL strSQL
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.