sub a()
Try
'do anything
result=codeModule.b
Catch
Dim ex As errorHandler = B4XPages.GetPage("errorhandler")
ex.showError("moduleA","sub_A",LastException) '<- this fires
End Try
end sub
...
sub b() as int
Try
'do anything
'raise error '<- here is an error
return anything
Catch
Dim ex As errorHandler = B4XPages.GetPage("errorhandler")
ex.showError("moduleB","sub_B",LastException) '<- this is what i want to see
End Try
end sub