Thanks Erel for the pointer. Works great! Below is an example for people that are interested...
B4X:
Sub Process_Globals
Private UserError As ExceptionEx
End Sub
Sub AppStart (Args() As String)
Dim triggerError As Boolean = True
Try
If triggerError Then
UserError.Initialize("Error Triggered")
UserError.Throw
End If
Catch
Log(UserError.Message)
Log(LastException)
End Try
End Sub