• Subject: RE: Blank Suppress
  • From: "Stone, Brad V (TC OASIS)" <bvstone@xxxxxxxxxxxxxx>
  • Date: Wed, 21 Jul 1999 17:08:50 -0500

So he would need something like this?

evalr     field2 = %trim(field1)

That's pretty sweet.

Bradley V. Stone
BVS/Tools
http://www.bvstools.com




> -----Original Message-----
> From: Bob Cozzi [mailto:cozzi@rpgiv.com]
> Sent: Wednesday, July 21, 1999 3:21 PM
> To: RPG400-L@midrange.com
> Subject: RE: Blank Suppress
> 
> 
> In the latest release of RPG IV, the EVALR operation code is 
> basically a
> MOVE-RIGHT. The original EVAL opcode was a MOVE-LEFT.
> 
> Bob Cozzi
> 
> http://www.RPGIV.com
> 
> 
> 
> 
> > -----Original Message-----
> > From: owner-rpg400-l@midrange.com 
> [mailto:owner-rpg400-l@midrange.com]On
> > Behalf Of keshava narasimha
> > Sent: Wednesday, July 21, 1999 12:12 PM
> > To: RPG400-L@midrange.com
> > Subject: Blank Supress
> >
> >
> > Hi everybody!
> >
> >
> > I have a very basic question .Is it possible to supress blanks in a
> > charecter field?
> >
> > For example :
> >
> >            OPCODE         F2         RES
> >
> >            MOVEL   'ABCD     ' FLD1       10A
> >            MOVE     FLD1       FLD2       10A
> >
> > Is it possible to suppress the blanks & make the FLD2=
> > '   ABCD'  (Right justified)
> >
> > Thanks in advance,
> >
> >
> > Keshav
> >
> >
> >
> > ______________________________________________________
> > Get Your Private, Free Email at http://www.hotmail.com
> > * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
> * * * * * * *
> > * This is the RPG/400 Discussion Mailing List!  To submit a 
> new         *
> > * message, send your mail to "RPG400-L@midrange.com".  To 
> unsubscribe   *
> > * from this list send email to MAJORDOMO@midrange.com and 
> specify       *
> > * 'unsubscribe RPG400-L' in the body of your message.  
> Questions should *
> > * be directed to the list owner / operator: 
> david@midrange.com          *
> > * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
> * * * * * * *
> >
> 
> * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
> * * * * * *
> * This is the RPG/400 Discussion Mailing List!  To submit a 
> new         *
> * message, send your mail to "RPG400-L@midrange.com".  To 
> unsubscribe   *
> * from this list send email to MAJORDOMO@midrange.com and 
> specify       *
> * 'unsubscribe RPG400-L' in the body of your message.  
> Questions should *
> * be directed to the list owner / operator: 
> david@midrange.com          *
> * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
> * * * * * *
> 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the RPG/400 Discussion Mailing List!  To submit a new         *
* message, send your mail to "RPG400-L@midrange.com".  To unsubscribe   *
* from this list send email to MAJORDOMO@midrange.com and specify       *
* 'unsubscribe RPG400-L' in the body of your message.  Questions should *
* be directed to the list owner / operator: david@midrange.com          *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *


This thread ...

Follow-Ups:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2019 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].