如何在4gl中重新抛出捕获的异常？

Question

我找不到任何关于如何重新抛出刚刚捕获的相同异常的信息。

我的 catch 表达式如下所示：

CATCH ex1 AS Progress.Lang.Error :
        MESSAGE ex1:NumMessages.
        DEFINE VARIABLE iteration AS INTEGER NO-UNDO.
        DO iteration = 1 TO 6:
             clsLog:inf(ex1:GetMessage(iteration)).
        END.

         clsLog:inf(SUBSTITUTE("ex1:CallStack: &1", ex1:CallStack)).
    END CATCH.

如何在不丢失其携带的任何消息或数据的情况下重新引发此特定异常？或者，如果您可以在 Internet 上找到有关重新抛出异常的任何信息，我将不胜感激。

Answer 1

你像投掷一样重新投掷：

UNDO, THROW ex1 .