Re: Loop code

Joe Lee wrote:
> ...
> There are no inconsistencies, except that %EOF actually reflects the
> current location of the file pointer in the file. What you appear to
> want is a %FILEOPPERATIONSUCCESSFUL BIF that was on if CHAIN, SETxx,
> READx, WRITE, UPDATE, or DELETE succeeded, and off if they didn't.
> ...

Just for the record, such a %FILEOPERATIONSUCCESSFUL bif exists:

  if   %STATUS = 0
or
  if   %STATUS(file) = 0

Using %STATUS this way, you can get a nice tidy chain/reade loop:

     chain key file
     dow %status(file) = STATUS_SUCCESS
        process
        reade key file
     enddo