|
Why are you using a *IN array? On 12/6/06, Turnidge, Dave <DTurnidge@xxxxxxxxxxxxxxxxxxxx> wrote:
BOTH, but also the indicators that are CONDITIONING indicators... I do have the INDARA and data structure. However, it isn't affecting the *IN indicators and array. -----Original Message----- From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Michael Ryan Sent: Wednesday, December 06, 2006 10:17 AM To: RPG programming on the AS400 / iSeries Subject: Re: Indicator Redux You mean for a display file or printer file? If so, you need the INDARA keyword in your file, and a data structure in your program. Like this... FWCS110D CF E WorkStn IndDS(WCS110DS) F SFile(WCS110D1:D1RRN) * Workstation indicator data structure. D WCS110DS DS D Exit 3 3N D SortByName 5 5N D SortByAcct 6 6N D SortByDate 7 7N D NameSearch 17 17N D AcctSearch 18 18N D DateSearch 19 19N D Previous 12 12N D SflDsp 30 30N D SflDspCtl 31 31N D SflClr 32 32N D RollUp 40 40N D RollDown 41 41N Then you can test if exit is on (the user pressed it). Or you can set an indicator on like SflClr (Clear subfile). On 12/6/06, Turnidge, Dave <DTurnidge@xxxxxxxxxxxxxxxxxxxx> wrote: > > I have looked through the archives having to do with Indicator Arrays, > and am confused. It appears that there are two arrays(?): one for > display file indicators, and one for RPG indicators. > > When I started on my current project I was told that I didn't need to > use the "pointer method" to define my indicators, but now I am running > into a problem. I have set up variable "ExcludeSys" for position 27 in > my indicator data structure. However, when I turn ExcludeSys *ON, > *IN27 is not *ON, and, I WANT it to be on. > > Please help me understand the difference (if there is one) and/or how > to be able to use a variable name and have the action continue on to > the indicator. Also, if there is a page in a Redbook (or equivalent) > that explains this from IBM's "easy to understand" viewpoint <G> a > link would be nice... > > Thank you, > > Dave > > -- > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing > 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. > > -- This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing 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. -- This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing 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.
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.