[Progress Communities] [Progress OpenEdge ABL] Forum Post: Structured Error Handling

[Cherian George]

Following code does not compile because there is a second for each after the catch/end catch block. I think that is a pretty big weakness in structured error handling and what I have shown below is a valid use case. Is any body working on fixing this issue ?? DEFINE TEMP-TABLE ttdata NO-UNDo FIELD F1 AS CHAR. DEFINE TEMP-TABLE ttdata2 NO-UNDo FIELD F2 AS CHAR. DEFINE TEMP-TABLE ttdata3 NO-UNDo FIELD F2 AS CHAR. B1: for each ttdata ON ERROR UNDO, THROW : for each ttdata2 on error undo, throw : end. catch e AS Progress.Lang.Error : next b1. end catch /*This will not compile because nothing is allowed after catch statement */ for each ttdata3 no-lock : end. END. CATCH e AS Progress.Lang.Error : END CATCH.

Continue reading...