Re: %EOF condition

Hi Richard,

For diagnosis purposes, try adding an %EQUAL test after the SETLL to see if
that is where the problem is.

IIRC, if the SETLL fails, %EOF will remain unchanged.

Mike

date: Sat, 5 Mar 2016 15:54:35 -0600

from: Richard Reeve <rjrjr64@xxxxxxxxx>
subject: %EOF condition

All,


I have a program that is doing a SETLL and READE and I'm always
getting an EOF condition. The key structure in the program is a partial
key but it's SZMCU = 3201 and SZPSN = 3568. The READE is always returning
an %EOF condition but shouldn't be based on the key and the data below.
[image: Inline image]

Here is a snippet of the code.....
C K47037 KLIST
C KFLD UP1BP
C KFLD BATCHN
C KFLD EDSPX

C MOVE *OFF *IN53
C K47037 SETLL F470371_7


C DOW NOT %EOF(F470371_7)
C K47037 READE F470371_7
C IF %EOF(F470371_7)
C LEAVE
C Endif

Any ideas as to why I'm always getting an %EOF condition?

Thanks for any advise that you might have.

Rich