Cecil
19+ years progress programming and still learning.
This is a first for me. I was looking at some code today and saw this:
I don't think I have ever seen
20 years of Progress programming and I have learned something new. I guess we all get so used to what we *think* we know, that we never RTFM.
Code:
FOR EACH ttSomeTempTable NO-LOCK
WHERE ttSomeTempTable.randomFieldName NE ""
AND ttSomeTempTable.randomFieldName NE ?
BREAK BY ttSomeTempTable.randomFieldName
ON ERROR UNDO UpdateBlock, LEAVE:
/** CODE GOES HERE... **/
END.
I don't think I have ever seen
ON ERROR UNDO UpdateBlock, LEAVE
as part of the FOR EACH statement.20 years of Progress programming and I have learned something new. I guess we all get so used to what we *think* we know, that we never RTFM.