![](https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgT4L03pi1i_Mb2FfZx06UhHPUmLXadO0Hox5uzQMrwlZT47L4lMiWtDcjnKCchZMJXIplPVO477bdGW7PEsswv8yhU-lPlMuNc9oB9ieOVCMEQUrTLQOeSCbRZenrYJDd-GNEGHKyWh4ty/s200/rpg.png)
I recently received a message about the post No More Number Indicators. The person asked why I had used a SETLL operation code instead of a CHAIN to check for a record on a file in one of the examples.
12 setll Z1DEPT DPTMAST ; 13 if not(%equal) ; 14 ErrDept = *on ; 15 endif ; |
I have to credit to my wife for this. Years ago she attended an IBM conference in San Diego, California, and she went to a presentation by John Sears about improving your code's performance. This was one of his suggestions