在 PL/SQL (Oracle) 中，异常可以跨函数/过程调用传播吗？

Question

因为它发生在封闭的块中
如果匿名块调用引发异常的函数，则这些异常既不会显示在控制台上，也不会被困在封闭块中...
更重要的是，在函数中被handler捕获后，匿名块中函数调用后的行正常执行！

被调用的程序是：

CREATE OR REPLACE PROCEDURE qt(pno number, qty OUT number)
IS
BEGIN
select sum(qty_on_hand) into qty from products where productno=pno;
END;

调用块是：

DECLARE
qty number;
BEGIN
qt(&pno, qty);
dbms_output.put_line('qty is: '||qty);
END;

如果产品编号无效，则不会显示错误；为什么？

Answer 1

如果异常被函数中的处理程序捕获并且没有重新引发，那么调用者将不会触发异常。这是正确的行为。如果您希望调用者可以看到异常，则必须在函数中使用RAISE 命令重新引发它：

FUNCTION fun ...
...
EXCEPTION
  WHEN some_exception THEN
    ...
    RAISE;
END;

或者，您可以引发不同的异常，例如

EXCEPTION
  WHEN some_exception THEN
    ...
    RAISE_APPLICATION_ERROR(-20001,'My error message');
END;

Answer 2

在您的具体示例中，我认为根本没有提出任何例外。您说“在产品编号无效的情况下”，我假设您的意思是产品编号不存在。听起来您希望查询抛出 NO_DATA_FOUND，但由于它使用的是没有 GROUP BY 的聚合函数，因此如果没有匹配的行，它实际上会返回包含 NULL 的单行。

Answer 3

只是为了补充托尼的答案。 你可能不知道调用函数可能抛出什么类型的异常。在这种情况下，您可以这样做：

EXCEPTION
  WHEN exception_that_may_occur_in_my_function THEN
    ...
    RAISE_APPLICATION_ERROR(-20001,'My error message');

  WHEN others THEN  -- Any exception that can come from a function I'm calling
    RAISE;

END;