RE: Single Page Subfile Example

[Chandra Sekhar Rath <ChandraRS@xxxxxxxxxxxxxxxxx>]

        Hello Martin,

        Thank you very much for the use ful info and the links that you have
given. I will be going through the articles and try them
        out.

        Best Regards
        Chandra Sekhar   
> message: 1
> date: 15 Jul 2003 12:26:36 +0100
> from: Martin Rowe <martin@xxxxxxxxxx>
> subject: RE: Single Page Subfile Example
> 
> On Tue, 2003-07-15 at 10:22, Chandra Sekhar Rath wrote:
> >      Hi Booth,
> >      
> >      The existing one indeed is an expanding subfile which i wanted to
> > convert to a Single Page One.
> 
> Hi Chandra
> 
> One option for processing subfile requests for a page no longer shown is
> to store them in a keyed data queue. Put the relative record number of
> the record (database file RRN, not the SFLRRN) in a hidden field on the
> subfile. When you process the screen (page up/down F-key, Enter etc),
> read the subfile first and add a data queue entry with the record RRN as
> key and the subfile option as data value. When you build the subfile for
> a page up/down, check if there are any matching entries in the data
> queue, and pre-load the subfile option field with the value from the
> data queue. When the time comes to process subfile options (eg. Enter
> pressed), then you process entries in the data queue instead (as it
> holds all selected subfile record options) and retrieve the identified
> record for processing. 
> 
> Kevin Vandever wrote a good article on this technique over at
> MidrangeServer -
> http://www.midrangeserver.com/mpo/mpo052302-story05.html which includes
> example code. I modified one of my utilities, WRKUSROUTQ,
> http://www.dbg400.net/usroutq.html - to use the technique on a single
> page/page by page subfile and it made a big difference to the usability
> of the program. You can find my take on the code required in the search
> add-on zip file - 
> http://www.dbg400.net/download/extras/wrkusroutq/wuo_search.zip - look
> at the DBG186R4 RPGLE member.
> 
> Regards, Martin
> -- 
> martin@xxxxxxxxxx  AIM/Gaim: DBG400dotNet  http://www.dbg400.net       /"\
> DBG/400 - DataBase Generation utilities - AS/400 / iSeries Open        \ /
> Source free test environment tools and others (file/spool/misc)         X 
> [this space for hire]  ASCII Ribbon Campaign against HTML mail & news  / \
> 
> 
> ------------------------------
> 
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L) digest 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.
> 
> 
> 
> End of RPG400-L Digest, Vol 2, Issue 485
> ****************************************