Progress OpenEdge中触发STOP条件时如何抛出错误？

在Progress OpenEdge里，要在触发STOP条件时抛出错误，核心是借助DO ON STOP UNDO, THROW语句块实现，各部分作用如下：

• UNDO：回滚当前DO块内所有未提交的操作，保障数据一致性
• THROW：触发STOP时直接抛出错误，终止后续流程
• FINALLY块：无论是否触发STOP，其中的代码都会执行，适合做资源清理这类收尾操作

示例代码：

DO ON STOP UNDO, THROW:
    /* 业务逻辑代码，比如数据库操作、计算逻辑等 */
    FINALLY:
        /* 必须执行的收尾代码，比如关闭文件、释放资源 */
    END FINALLY.
END.

当块内触发STOP条件（比如执行STOP语句、出现未捕获异常等），系统会先执行UNDO回滚操作，接着抛出错误终止流程，同时FINALLY块的代码会被执行。

内容的提问来源于stack exchange，提问作者Tholinhlanhla