Sub Activity_Resume
Log("******* Main.Activity_Resume: Started")
Wait For (CheckProviderInstaller) complete (success As Boolean)
lblVersion.Text = "Eljay Delivery " & Application.VersionName & " (" & Application.VersionCode & ") on " & GlobalModule.ServiceHostName & GlobalModule.Secured
lblVersion.Enabled = True
lblCheckInOutStatus.Text = "You are currently checked " & GlobalModule.GetSettingDefaulted(GlobalModule.CHECKIN_STATE,"OUT")
If Starter.GPS1.GPSEnabled = False Then
ToastMessageShow("Please enable the GPS device.", True)
StartActivity(Starter.GPS1.LocationSettingsIntent) 'Will open the relevant settings screen.
Else
Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_ACCESS_FINE_LOCATION)
Wait For Activity_PermissionResult (Permission As String, Result As Boolean)
If Result Then CallSubDelayed(Starter, "StartGPS")
End If[
/CODE]