从OpenEdge UI触发器向主程序抛出错误

作者: 冷月如霜·胡狼
发布时间: 2024-07-20 08:34:26 (8天前)
转自：

3 条回复

0#
回复此人
北极星微控 | 2019-08-31 10-32

<div class =“post-text”itemprop =“text”> <P> 从THROW选项的文档，撤消声明： </p> <P> “UNDO，THROW不允许在用户界面触发器的CATCH块中.ABL不会从用户界面触发器中引发或返回错误。这样做会导致编译时错误。” 上面的句子说“你不......”我认为它应该是“不允许你”。但文档本身是错误的。 </p> <P> 无论如何，从今天（2016年12月27日）开始，你想要完成的事情似乎还不可能。 </p> </DIV>

编辑
1#
回复此人
与之 | 2019-08-31 10-32

<div class =“post-text”itemprop =“text”> <P> 尝试在FIND语句的末尾使用NO-ERROR： </p> <pre> <code> FIND FIRST Customer NO-LOCK WHERE Customer.CustNum = 1875918759178 NO-ERROR. </code> </pre> <P> 然后，您可以使用ERROR-STATUS系统句柄来捕获错误： </p> <pre> <code> MESSAGE ERROR-STATUS:ERROR SKIP ERROR-STATUS:GET-MESSAGE(1) VIEW-AS ALERT-BOX. </code> </pre> <P> 应该设置该错误状态，直到使用NO-ERROR执行其他语句。您还可以使用AVAILABLE（客户）查看是否找到了记录： </p> <pre> <code> MESSAGE AVAILABLE(Customer) VIEW-AS ALERT-BOX. </code> </pre> </DIV>

编辑

登录后才能参与评论