Re: IF NOT %FOUND

[Joe Pluta <joepluta@xxxxxxxxxxxxxxxxx>]

Yes that's true, but I find that in most cases %equal works just as well:

> setll (field1: field2) file1;
> if not %equal(file1);
>    ... no data
> endif;
>
> dow (1=1);

On 11/12/2019 9:37 AM, Jon Paris wrote:
> +1
>
> Always prefer this approach because EOF on the first read represents a different condition (unexpected/error) whereas EOF on the second and subsequent reads is expected - in fact positively desirable!
>
>
> > On Nov 11, 2019, at 11:08 PM, Roger Harman <roger.harman@xxxxxxxxxxx> wrote:
> >
> > Well, not trying to (re)start the top/middle-tested loop argument, but I've always preferred this...
> >
> > setll (field1: field2) file1;
> > reade (field1: field2) file1;
> > dow NOT %eof(file1);