Re: RPG Indicators -- RPG400-L

Well, yeah, and as someone else pointed out you could do
all the indicators in one variable, then move them all back.

In any new programs I write I try to use indicators within
a line or two of where I set them.  So, in theory, you can use
any indicator you want, as long as you use it within a line or
two of where it is set.  I only use indicators where absolutely
neccessary, such as Chain.

Regards,

Jim Langston

Said the judge to the defendant who was found guilty of killing a mine:
"A mime is a terrible thing to waste."

Peter Dow wrote:

> Not to quibble Jim, but you can make the restore a little simpler:
>
>     C        MOVE  Hold99    *IN99
>
> or
>
>     C        EVAL        *IN99 = Hold99
>
> Regards,
> Peter Dow
> Dow Software Services, Inc.
> 909 425-0194 voice
> 909 425-0196 fax
>
> ----- Original Message -----
> From: Jim Langston <jlangston@conexfreight.com>
> To: <RPG400-L@midrange.com>
> Sent: Monday, April 10, 2000 10:22 AM
> Subject: Re: RPG Indicators
>
> > Also, if possible, you can temporarily hold an indicator in a variable,
> > use that indicator, then set it back to what it was, if it is a relatively
> > short area.  An example.
> >
> > C    99                 MOVE  '1'    Hold99      1A
> > C  N99                MOVE '0'     Hold99
> > C*
> > C                         READ   SOMEFILE               99
> > C    99                 MOVE 'NOT FND'  ERRMSG
> > C*
> > C                         SETOF                                   99
> > C        Hold99     IFEQ    '1'
> > C                        SETON                                   99
> > C                        END
> >
> > Mark Walter wrote:
> >
> > > If you use U1 through U8, be sure you save their state before
> utilization
> > > and restore the state when the program exits. Some 3rd party
> applications
> > > (MAPICS) use external indicators.
> > >
> > > -----Original Message-----
> > > From:   Raul Jager [SMTP:raul@abc.com.py]
> > > Sent:   Saturday, April 08, 2000 9:52 AM
> > > To:     RPG400-L@midrange.com
> > > Subject:        Re: RPG Indicators
> > >
> > > As an emergency, try the U1 - U8 indicators.  And reorganize your
> > > program as soon as posible, before you get in the next emergency.
> > >
> __________________________________________________________________________
> > > David Gibbs wrote:
> > > >
> > > > At 11:34 PM 04/07/2000 , you wrote:
> > > > >I can't change the program too much for the moment, given the time.
> Can
> > > I
> > > > >use *INKA? Is *INKA the same as *IN01? Can I use it (*INKA) instead
> of
> > > *IN01
> > > > >for the following code? Also can I replace *IN51 with *INKB in the
> RPG
> > > and
> > > > >DSPF?
> > > >
> > > > You can't use function key indicators to control screen functions ...
> > > they
> > > > have a tendency to be reset when screen io occurs.
> > > >
> > > > Perhaps you could just save the state of a few indicators (that aren't
> > > used
> > > > in the screen io) until after the screen io is done.
> > > <snip>
> > > --
> > >   Raul A. Jager W.
> > > Asuncion - Paraguay
> > > +---
> > > | 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
> > > +---
> > >
> > > +---
> > > | 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
> > > +---
> >
> > +---
> > | 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!?
> Talk to your friends online with Yahoo! Messenger.
> http://im.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
> +---

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