On error print message and stop execution of subsequent subrotine

I have routine which contains many soubroutines. I've error handling code inside every subroutine or function. The problem is that the execution will not stop after an error.
In the following code, if an error occurs in the sroute1, the execution wil continue with the sroute2 and that is unwanted behaviour. Is it somehow possible to print a message and immediately stop the execution?

Please Login or Register  to view this content.

Thank you very much. I hopped for oneliner, but this will suffice.