Re: Fwd: Element Positioning at start of INPUT ARRAY statement.

In article <31C9273F.3523@centrum.is>, "John H. Frantz" <frantz@centrum.is> writes >Dave: > >You may want to look at the Power-4gl package (see sig. for www address). In it >is a >module called "list.4gl" which does exactly what you want and more. Furthermore, >the >list handles an indefinite number of rows without taking up the memory resources >that >a display array or input array statement would. Here is a sample code segment >using >the list module: > >if listopen(title_name,"","","","") then > call listsetup(table_lst,item_lst,format_str,where_cls,order_cls,"") > while true > call listman() returning action,row_key > case action > when "enter" > if edit_row(row_key) then call listinit("") end if > when "insert" > if edit_row("") then call listinit("") end if > when "delete" > if del_row(row_key) then call listinit("") end if > when "exit" > exit while > end case > end while > call listclose() >end if > >This is a very intuitive way for users to manage their data. The Power-4gl >package also >includes other modules and general purpose functions, e.g. vertical menues, on- >screen >reports, help windows. The URL is "http://www.strengur.is/~frantz/pow4gl.html"; >where >you can download a shareware version with sample programs. Write me if you want >more >information. > We had implementated a similar ' list management module at my last company. We also had a cursor management library below this which handled cursor reopening and repositioning after a commit work. ALso we had a window managment library and pop-up selection lists library which was a cutdown version of the list management library. -- David Williams