|
How about determining the number of records in the file, and if it's an even multiple of the SFLSIZ, turn on SFLEND (which is also conditioned by eof) when you read the last record. > -------- Original Message -------- > Subject: RE: Subfile size equals page size. SFLEND(*MORE) and eof > From: MWalter@xxxxxxxxxxxxxxx > Date: Wed, September 08, 2004 12:55 pm > To: "Midrange Systems Technical Discussion" <midrange-l@xxxxxxxxxxxx> > > Could there be more than 12 records? Or, is this like a month selection > subfile? > > Thanks, > > Mark > > Mark D. Walter > Senior Programmer/Analyst > CCX, Inc. > mwalter@xxxxxxxxxx > http://www.ccxinc.com > > > > > CWilt@xxxxxxxxxxxx > > Sent by: To: > midrange-l@xxxxxxxxxxxx > midrange-l-bounces@m cc: > > idrange.com Subject: RE: Subfile size > equals page size. SFLEND(*MORE) and eof > > > > > 09/08/2004 12:34 PM > > Please respond to > > Midrange Systems > > Technical Discussion > > > > > > > > > > Booth, > > Everything I've seen is some variation of read one extra record. > > Realistically, that's the only way of finding the EOF when you don't know > how many records are there. In other words, you could get the record count > of the file and keep track of how many you've displayed. This might not be > a bad idea if you want to make use of graphical scroll bars in anything > besides a one time load subfile. > > HTH, > Charles > > > > -----Original Message----- > > From: Booth Martin [mailto:booth@xxxxxxxxxxxx] > > Sent: Wednesday, September 08, 2004 11:32 AM > > To: Midrange Systems Technical Discussion > > Subject: Subfile size equals page size. SFLEND(*MORE) and eof > > > > > > Subfile size equals page size. SFLEND(*MORE) and eof: > > > > Lets say the SFLSIZ & SLFPAG are both 12, and there are > > exactly 12 records > > to be read from a file and displayed in this subfile. > > > > That means the screen should display "BOTTOM" instead of "MORE..." > > > > I've made it work correctly but its a real shameful looking > > piece of code. > > Does anyone have a suggestion on a simple algorithm to make > > it neat and > > accurate? > > --------------------------------- > > Booth Martin > > http://www.martinvt.com > > --------------------------------- > > -- > > 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.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
midrange.com
