Re: Subfile size equals page size. SFLEND(*MORE) and eof

[MWalter@xxxxxxxxxxxxxxx]

sflendInd = %eof(File)   ????

Thanks,

Mark

Mark D. Walter
Senior Programmer/Analyst
CCX, Inc.
mwalter@xxxxxxxxxx
http://www.ccxinc.com


                                                                                
                                                          
                      "Booth Martin"                                            
                                                          
                      <booth@xxxxxxxxxxxx>        To:       "Midrange Systems 
Technical Discussion" <midrange-l@xxxxxxxxxxxx>             
                      Sent by:                    cc:                           
                                                          
                      midrange-l-bounces@m        Subject:  Subfile size equals 
page size. SFLEND(*MORE) and eof                          
                      idrange.com                                               
                                                          
                                                                                
                                                          
                                                                                
                                                          
                      09/08/2004 11:32 AM                                       
                                                          
                      Please respond to                                         
                                                          
                      Midrange Systems                                          
                                                          
                      Technical Discussion                                      
                                                          
                                                                                
                                                          
                                                                                
                                                          




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.