Re: Using VARLEN DDS keyword

["Peter Dow" <pcdow@xxxxxxxxxxxxxxx>]

Hi Jim,

Yeah, looks like we both missed the crucial part which was doing it in
RPG/400, not RPGLE. Oops<g>.

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: Tuesday, January 16, 2001 10:06 AM
Subject: Re: Using VARLEN DDS keyword


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

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