Re: Clean.Pgm

[Jim Jefferson]

Harry, you can trap individual error values as follows:

≪SX101,≪VA$ER≫≫≪SX201,10≫≪IF≪IS201≫==≪IS101≫≫≪GLERROR≫≪EI≫.
....etc.

There are other ways, however may I ask if what you are trying to accomplish is
*error supression*, as opposed to error trapping. Whether or not you have the
≪IF≪ER≫≫ after a search or S/R, if the search string is not found, the
error flag is set. I'll take another look at your program to see if it causes a
pause in the process.

Regards, Jim