Re: %EOF condition

[Luis Rodriguez <luisro58@xxxxxxxxx>]

Richard,

The image didn't show (I believe that the forums filter them).

Regards,

Sent from my Moto G phone. Please excuse my brevity.
On Mar 5, 2016 5:25 PM, "Richard Reeve" <rjrjr64@xxxxxxxxx> wrote:

> 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.