Re: %Trim dilemma

[rick baird <rick.baird@xxxxxxxxx>]

Ron, I feel your pain, but it's the only correct way to evaluate that statement.

I think where you are getting tripped up is that you 'think' you're
comparing stupidfield to a string of 9s.   You are not comparing
stupidfield to a string of 9s.

You are comparing the bif %trim() to the special value *all'9'

*all'9' has it's own quirks, which have not changed since the
beginning (at least RPGii).   %trim() has it's own rules which have
not changed since it's inception as well.

Rick

On 1/27/06, RPower@xxxxxxxxxx <RPower@xxxxxxxxxx> wrote:
> It still doesn't sit right with me though.  I can "see" why now, but I can
> also see myself thinking that %Trim() evals to *blanks, not a field len of
> 0...
> Based on the field len of 0, then this should fail:
> stupidfield = *blanks;
> If %Trim(stupidfield) = *blanks;
>        dosomethingstupid();
> Endif;
>
> Won't that If statement evaluate to true?
>
> Ron Power
> Programmer
> Information Services
> City Of St. John's, NL
> P.O. Box 908
> St. John's, NL
> A1C 5M2
> 709-576-8132
> rpower@xxxxxxxxxx
> http://www.stjohns.ca/
> ___________________________________________________________________________
> Success is going from failure to failure without a loss of enthusiasm. -
> Sir Winston Churchill
>
>
>
>
> "Bob Cozzi" <cozzi@xxxxxxxxx>
> Sent by: rpg400-l-bounces@xxxxxxxxxxxx
> 2006/01/27 03:37 PM
> Please respond to
> RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
>
>
> To
> "'RPG programming on the AS400 / iSeries'" <rpg400-l@xxxxxxxxxxxx>
> cc
>
> Subject
> RE: %Trim dilemma
>
>
>
>
>
>
> Rick,
> This is exactly what is going one, for the most part.
>
> -Bob Cozzi
> www.RPGxTools.com
> RPG xTools - Enjoy programming again.
>
>
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
> On Behalf Of rick baird
> Sent: Friday, January 27, 2006 12:57 PM
> To: RPG programming on the AS400 / iSeries
> Subject: Re: %Trim dilemma
>
> my guess is that the *all'9' is being dynamically sized to the size of
> %trim()
>
> since the size of %trim() is 0, then the size of *all'9' is also zero,
> and thus cannot contain any 9s.
>
> so, it's as if you're comparing ( '' = '' ) which is true.
>
>
> --
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>
> --
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>