Re: bad indicators, bad! (was: RE: MOVEA -> EVAL)

["Peter Dow" <pcdow@xxxxxxxxx>]

I'd just like to make the point (as Barbara Morris did) that this solution
separates the display file indicators from the RPG indicators.  That is, in
Mark's example, changing sfl_clear does _not_ affect *IN(80).

Peter Dow
Dow Software Services, Inc.
909 425-0194 voice
909 425-0196 fax


> If you are on V4R5 you can do something like this. The display file also
> requires the INDARA keyword.
> The indicators are linked to "events" in the display file. rollup is the
> ROLLUP(25) sort_changed is a CHANGE(33) keyword on a field.
>
>      FOed191x   CF   E             Workstn SFILE(subfil:rrn)
> INDDS(d_indicators)
>
>
>         * Indicator Data Structure
>      Dd_indicators     DS
>      D rollup                           25     25N
>      D sort_changed          33     33N
>      D sfl_clear                     80     80N
>      D sfl_disp                      81     81N
>      D sfl_dispctl                  82     82N
>      D sfl_end                       83     83N
>
> Hope this helps.
>
> Mark
>
> Mark Walter
> Sr. Programmer/Analyst
> Hanover Wire Cloth a div of CCX, Inc.
> mwalter@hanoverwire.com
> http://www.hanoverwire.com
> 717.637.3795 Ext.3040


> +---
> | This is the RPG/400 Mailing List!
> | To submit a new message, send your mail to RPG400-L@midrange.com.
> | To subscribe to this list send email to RPG400-L-SUB@midrange.com.
> | To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator:
david@midrange.com
> +---


_________________________________________________________
Do You Yahoo!?
Get your free @yahoo.com address at http://mail.yahoo.com

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---