Re: Using VARLEN DDS keyword

[Jim Langston <jimlangston@xxxxxxxxxxxxxxxx>]

Peter,

Actually, yeah, that is it in a nutshell.  I never right justify anything
myself, so never use the EvalR command, so forgot about it.

And, yeah, I meant move.  Again, I always used MOVEL.

Regards,

Jim Langston

Peter Dow wrote:
> 
> Hi Jim,
> 
> I remember when you had to do this the hard way with arrays and stuff. Would
> 
>     C        EVALR    Char1 = %trim(Char1)
> 
> do the same thing?  BTW, did you mean MOVE or is MOVER a new opcode?
> 
> Regards,
> Peter Dow
> Dow Software Services, Inc.
> 909 425-0194 voice
> 909 425-0196 fax
> 
> ----- Original Message -----
> From: "Jim Langston" <jimlangston@conexfreight.com>
> To: <RPG400-L@midrange.com>
> Sent: Monday, January 15, 2001 1:12 PM
> Subject: Re: Using VARLEN DDS keyword
> 
> > Off the top of my head:
> >
> > C           Eval   CharTemp = %Trim(Char1)
> > C           Eval   Char1 = *Blanks
> > C           MOVER  CharTemp     Char1
> >
> > Char1 = 'NAMEbbbb' to start with.
> > CharTemp = 'NAME'
> > Char1 = 'bbbbbbbb'
> > Char1 = 'bbbbNAME'
> >
> > Regards,
> >
> > Jim Langston
> >
> > Lynette Chronister wrote:
> > >
> > > what is the easiest way to right justify a character variable.
> > > example
> > >
> > > char1 = 'NAMEbbbbb' (b = blanks)
> > >  i want 'bbbbbNAME'
> > >
> > > i can get this done, im just thinking there HAS to be an easier way.
> > > TIA
> > > oh, p.s. im writing in 400 not ILE.
> > >
> > > Lynette Chronister
> > > Programmer/Analyst
> > > Elizabethtown, PA
> > >
> > > +---
> > > | 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
> +---
+---
| 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
+---