Re: %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
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.