RE: %TRIMR

%LEN returns the number of characters including blanks.  To get number
of chars excluding leading and trailing blanks, use %LEN(%TRIM(str)).

%SIZE(%TRIM(str)) is not allowed, since %SIZE requires a variable name
as the argument.  %SIZE returns number of bytes occupied by the variable.

Hans Boldt, ILE RPG Development, IBM Toronto Lab, boldt@ca.ibm.com


---------------------- Forwarded by Hans Boldt/Toronto/IBM on 98-03-13 14:17
---------------------------


owner-midrange-l@midrange.com on 98-03-13 13:19:51
Please respond to MIDRANGE-L@midrange.com @ internet
To: MIDRANGE-L@midrange.com @ internet
cc:
Subject: RE: %TRIMR


You're right.  I was thinking of %size.

But will this return the number of characters?  Or will it return the
number of characters from the first non-blank to the last non blank?  In
this case the space after the comma is what I am asking about.
'Toronto, Canada'

Will this be 14 or 15?  I'm guessing 14.  Would %size(%trim($char))
return the real value he was looking for?

Bradley V. Stone
bvstone@taylorcorp.com
http://prairie.lakes.com/~bvstone/
"Seinfeld's van!  SEINFELD'S VAN!"

 ----Original Message-----
 From: Walden Leverich [SMTP:walden@techsoftinc.com]
 Sent: Friday, March 13, 1998 8:16 AM
 To: MIDRANGE-L@midrange.com
 Subject: RE: %TRIMR

 Brad,

 Actually on character fields %LEN will return the number of
characters, not
 the field size. To get the field size you need to use %SIZE.

 -Walden

 -----Original Message-----
 From: mcsnet!midrange.com!midrange-l-owner@Mcs.Net
 [mailto:mcsnet!midrange.com!midrange-l-owner@Mcs.Net]On Behalf
Of
 BVStone@Taylorcorp.com
 Sent: Thursday, March 12, 1998 6:19 PM
 To: MIDRANGE-L@midrange.com
 Subject: RE: %TRIMR



 > -----Original Message-----
 > From: Rbbaird [SMTP:Rbbaird@premsys.com]
 > Sent: Thursday, March 12, 1998 3:22 PM
 > To: MIDRANGE-L@midrange.com
 > Subject: Re: %TRIMR
 >
 > Darlene K. Brengle wrote:
 >
 > >  LOCATION will have the value '  Toronto, Ontario'.
 >
 > >                   EVAL      LOCATION = %TRIMR('  Toronto,
Ontario
 > ')
 >
 > to right justifify, try this:
 >
 > c            eval     location = *blanks
 > c            eval     $work = %trim('   toronto, ontario  ')
 > c            eval     $start = %len(location) - %len($work) +
1
 > c            eval     %subst(location:$start:$len($work)) =
 > %trim($work)
 >
  [Stone, Brad V (TC)]  This won't work.  %len($work) will
return
 the length of the field, not how many characters there are.
CHECK and
 CHECKR should be used to get the starting and ending character
 posistions, and then uses these to get the start posistion.

 > hope this helps,
 >
 > rick
 >
 > "I'm not fat, I'm just big boned!"
 > +---
 > | This is the Midrange System Mailing List!
 > | To submit a new message, send your mail to
MIDRANGE-L@midrange.com.
 > | To unsubscribe from this list send email to
 > MIDRANGE-L-UNSUB@midrange.com.
 > | Questions should be directed to the list owner/operator:
 > david@midrange.com
 > +---
 +---
 | This is the Midrange System Mailing List!
 | To submit a new message, send your mail to
MIDRANGE-L@midrange.com.
 | To unsubscribe from this list send email to
MIDRANGE-L-UNSUB@midrange.com.
 | Questions should be directed to the list owner/operator:
 david@midrange.com
 +---

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



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