如何将捕获的异常抛出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 .