|
When I use SFLMODE, I don't worry about storing the value in another variable with the program because the system stores it for me in the screen field. If the screen is being displayed with the opposite view you expect then you probably have the SFLMODE values in your statement reversed. Do you have something like the following in your DDS: N91 SFLDROP(CF05) 91 SFLFOLD(CF05) If so, then the RPG code should be: C S1SFLMODE IFEQ '0' C MOVE *ON *IN91 C ELSE C MOVE *OFF *IN91 C ENDIF Hope that helps. Donald R. Fisher, III Project Manager Roomstore Furniture Company (804) 784-7600 extension 2124 DFisher@xxxxxxxxxxxxx <clip> I use indicator CA05 to control the folding and dropping on the display. If the user hits the enter key, the subfile is processed, files are updated, and the subfile is reloaded. At this time, I check to see what mode the file is in (folded/dropped) and store a value to indicate this in another field. Right before the EXFMT on the control record I check that value and turn on/off *IN05 to expand or collapse the subfile as previously viewed. <clip>
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.