Re: %EOF

Thanks Scott and Buck for the PTF's.  I'll try those Monday.  I also found a
reference on a NEWS400 Forum saying PTF SF56021 would fix it.  We loaded
that one today to no avail.  On further experimenting, we also found that
%ERROR and %FOUND  are also not working in service programs, though not
consistently.  We can put the indicators back on and they come on, but the
BIF's do not.  All of this code was working fine until we starting replacing
indicators with the BIF's.  All the posters in the Forum were recent (since
June 15th), so this may be a new problem.

To the rest of you members of the short-attention-span-theater, the question
was about Indicator BIF's in service programs, not do loops. I don't want to
get that thread going again. The code submitted was to show that after the
very same read, the numeric indicator came on, the %EOF came on, but the
%EOF(Filename) did not.

-----Original Message-----
From: Scott P. Johnson <sjohnson@highsmith.com>
To: RPG400-L@midrange.com <RPG400-L@midrange.com>
Date: Friday, June 18, 1999 11:08 AM
Subject: Re: %EOF


>If the 2 filenames are for the same file, the quick fix
>is to remove the filename.  This worked for us.
>
>Otherwise there is a PTF for this.  Look at APAR
>SA77925.  The PTF available for V4R2 & V4R3 is
>SF53747.  Don't know about the other releases.
>
>We had noticed this problem right away.  The PTF
>did not come out until Feb 26, 99, which we got
>and applied that day.
>--
>------------------------------------------------------
>Scott P. Johnson
>Programmer/Analyst
>IBM Certified Specialist - AS/400 RPG Programmer


* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the RPG/400 Discussion Mailing List!  To submit a new         *
* message, send your mail to "RPG400-L@midrange.com".  To unsubscribe   *
* from this list send email to MAJORDOMO@midrange.com and specify       *
* 'unsubscribe RPG400-L' in the body of your message.  Questions should *
* be directed to the list owner / operator: david@midrange.com          *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *