Is there an Exit method to exit a nested procedure and its owner procedure?

Question

Is there a method one could call to Exit from inside a nested procedure which will also exit the owner/parent procedure?

procedure OwnerProc;

    procedure NestedProc;
    begin
      // Do some code here

      EXIT_ALL; {Call a method which will exit NestedProc and OwnerProc}
    end;

begin
  NestedProc;
end;

Answer 1

Is there a method one could call to Exit from inside a nested procedure which will also exit the owner/parent procedure?

No there is not.

You could raise an exception, and catch it in the outer function. But personally I would regard that as rather ugly. Perhaps cleaner is to return a boolean from the inner function and then exit if the inner function returns False.