Re: move x number of records in 4gl

This solution is what my other collegue had in mind but we have many programs in which some of our top managers want this in, so........., is there any way to implement this solution in a shared object library function. This would significantly reduce coding. Austin >Austin Castro wrote: >> >> Hi Guys, >> Is there a function in 4gl to move x amount of records in the fetch list >> where x represents a number pressed by user like there is in a perform >> screen. If not, can any body give me any ideas as to how I can implement >> such a facility. I'm thinking about having a menu options which prompt >> for the number of rows to move forward of backward but that seems to be >> clumsy. >> >> Thanks >> Austin > >We use the "COMMAND KEY" Menu options to build up a number, then use that >number when the function called when users press "Next" or "Previous" menu >options. (The "Command Key" options don't show up on the screen) > > COMMAND KEY ("0") > WHENEVER ERROR CONTINUE > LET q_off = q_off CLIPPED, "0" > WHENEVER ERROR CALL error_sql > > COMMAND KEY ("1") > WHENEVER ERROR CONTINUE > LET q_off = q_off CLIPPED, "1" > WHENEVER ERROR CALL error_sql > > COMMAND KEY ("2") > ... > > >-- >Colin McGrath cmm@trac3000.ueci.com >Raytheon Constructors Inc. (215) 422-4144 >Philadelphia, PA, USA >Any opinions I state are my own and not necessarily those of my employer >