RE: File status

[Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx>]

>
> But shouldn't the status (which indicated EOF) change when I 'ReadP' from
> the end of file?  (I now have to 'Read' a record to be at EOF')
>

If no error occurs, %status does not get changed.  It only changes when an
error occurs.

Therefore, %status will always reflect that last error that happened. Even
if you've done 200 things since that error happened, %status will be the
last error.

When you attempt to read a record past the end of a file, that's an error,
so %status gets set.  When you read a record normally, it's not an error,
so %status is the same as it was before -- in this example, it's still set
to EOF.

Likewise, if you trapped a divide by zero error, then read a record,
%status would still show the divide by zero error, because it was the last
error that happened.