RE: %Eof

[michael@xxxxxxxxxxxxxxxxxx]

When a file operation causes the end of file exception, built-in
function %EOF returns true. So you can do things like this:

Read SomeFile;
DoW Not(%Eof(SomeFile));
  // do some process
  Read SomeFile;
EndDo;


> -------- Original Message --------
> Subject: %Eof
> From: "Dwayne Allison" <Dwayne.Allison@xxxxxxxxx>
> Date: Thu, November 11, 2004 10:09 am
> To: "Midrange Systems Technical Discussion" <midrange-l@xxxxxxxxxxxx>
> 
> We have a new programmer and she use the %Eof in a lot of her coding.  How 
> does this work?  
> 
> -----Original Message-----
> From: midrange-l-bounces@xxxxxxxxxxxx
> [mailto:midrange-l-bounces@xxxxxxxxxxxx]On Behalf Of Steve Morrison
> Sent: Wednesday, November 10, 2004 9:44 AM
> To: Midrange Systems Technical Discussion
> Subject: RE: Faxing from AS400
> 
> 
> Jim,
> 
> We used FAX/400 at a previous employer. It was very reliable. We had
> purchasing agents from 6 warehouses around the country all sending faxes
> from the central location. It did send both SCS and AFP data streams. The
> lawyers made us send a full page of fine print (set up as the backside
> overlay) with our purchase orders. I think we were running 1800/2000 faxes
> per week without problems. These faxes were sent during business hours, so
> if your broadcast can go out after hours, or over the weekend, it should
> handle the volume. 
> 
> 
> Steve Morrison
> Beacon Insurance
> 940-720-4672 
> 
> -----Original Message-----
> From: Jim Franz [mailto:franz400@xxxxxxxxxxxx] 
> Sent: Wednesday, November 10, 2004 9:26 AM
> To: MIDRANGE-L@xxxxxxxxxxxx
> Subject: Faxing from AS400
> 
> I have been asked to review replacing an existing Fax Server (a separate pc
> unit that reads as400 spooled files and has software on as400 to manage
> traffic), with IBM's internal fax cards and software for managing. This site
> does 200 - 500 outbound faxes a day over 2 lines, and weekly a batch of
> 2,500. I am totally unfamiliar with the IBM software and looking for
> comments on how easy to run by itself, daily reports or screens of failures,
> and ease of use to resend, reprint, use  both *scs & *afpds spools, merge
> logos & forms with spools, etc. 
> Customer upgrading to i5 and this fax server is older and needing an upgrade
> for a hefty sum (over 12k). 
> Approx 15 rpg programs sending faxes. 
> tia
> jim
> --
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe,
> or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a
> moment to review the archives at http://archive.midrange.com/midrange-l.
> 
> --
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.
> 
> 
> --
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.