Re: Indicator Redux

One of the advantages of using INDARA/INDDS is that INDARA establishes a
separate indicator area. So, if you add or delete indicators, you don't need
to recompile your program. The indicators are in a separate area - they're
not in the input or output buffers.

On 12/6/06, Turnidge, Dave <DTurnidge@xxxxxxxxxxxxxxxxxxxx> wrote:

Thank you! I guess that kinda rounds out my education. So, if I use
INDARA, DON'T use INDDS, and use the "pointer method" then everything
will work the way I expected originally. If I DO use the INDDS, I have
just added another 99 indicators, but nothing I do in my IndArrPtr data
structure (your name below) will affect the DDS. Right?

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Holden Tommy
Sent: Wednesday, December 06, 2006 11:36 AM
To: RPG programming on the AS400 / iSeries
Subject: RE: Indicator Redux

Using INDDS you have 2 sets of indicators 1 -99.  One set (the INDDS) is
used to control the display file functions & the others (*IN) are usable
only by the RPG program.  Setting on the excludesys will not in anyway
affect the indicators in the *IN set of indicators.  Personally I don't
use INDDS...I just overlay the *IN set with meaningful names so I can
reference either *IN27 or ExcludeSys.

For example:
D IndArrPtr       s               *   Inz(%Addr(*In))

D                 ds                  Based(IndArrPtr)

D Sfl1_Dsp               30     30
D Sfl1_DspCtl            31     31
D Sfl1_Clear             32     32
D Sfl1_End               97     97

D Sfl2_Dsp               40     40
D Sfl2_DspCtl            41     41
D Sfl2_Clear             42     42
D Sfl2_End               98     98

This will overlay the *IN indicators so now I can reference *IN30 or
SFL1_DSP & "both" are turned on since they are actually the same
indicator ( place in memory)


Thanks,
Tommy Holden


--
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.