[Progress Communities] [Progress OpenEdge ABL] Forum Post: Find (current) inside for each

[Rick Terrell]

It had been the case that a find inside a for each loop on the same buffer (even a find current) was not allowed. I just tested in OE12 and it is now allowed (at least for a find current). Did this test against the Sports2020 db: for each customer no-lock by customer.CustNum: if customer.CustNum < 3030 then do: customer.CustNum = customer.CustNum + 10000. display customer.CustNum customer.name. end. else leave. end. And it compiles and runs correctly. When did this change? Even the OE12 docs still say this is not allowed. ABL does not allow a FIND statement within a FOR EACH block unless you specify a different table than the one referenced in the FOR EACH block. When you attempt to compile the following example, ABL returns the error message "FIND cannot be processed for a FOR EACH mode record": FOR EACH Customer NO-LOCK: FIND CURRENT Customer. END.

Continue reading...