Re: Most efficient string translation?

[cozzi@xxxxxxxxx]

Steve,
I have one in the RPG ToolKit that wraps the QlgConvertCase API. It
is slightly complicated, but it does work great with national
language character sets. You can call it by passing a data structure
with the "to upper" or "to lower" flag set and it'll worok great. Or
you can use the one in my RPG ToolKit (www.rpgiv.com/toolkit)
-Bob

> 
> Ah, I hadn't considered national language... and as we are a French
> owned
> company, then yes, it is important.
> 
> Am I correct in assuming that the QDCLXLATE API handles national
> language?
> 
> Thanks,
> Steve
> 
> ----- Original Message -----
> From: "Bob cozzi" <cozzi@xxxxxxxxx>
> To: "'RPG programming on the AS400 / iSeries'"
> <rpg400-l@xxxxxxxxxxxx>
> Sent: Thursday, August 28, 2003 4:27 AM
> Subject: RE: Most efficient string translation?
> 
> 
> > Depends on what you think is efficient.
> > Is national language (character set) important?
> >
> >
> > Bob Cozzi
> > Cozzi Consulting
> > www.rpgiv.com
> >
> >
> > -----Original Message-----
> > From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
> > On Behalf Of Stephen Hunt
> > Sent: Wednesday, August 27, 2003 4:41 PM
> > To: RPG400-L@xxxxxxxxxxxx
> > Subject: Most efficient string translation?
> >
> > Hi,
> >
> > I've been using either of the following two methods to convert
> strings
> from
> > lower to upper case, but which is the most efficient (or is there
> a better
> > method)?
> >
> > Thanks,
> > Steve
> >
> >   * Translate string using XLATE op-code
> >   *
> >  D UC              C                  
CONST('ABCDEFGHIJKLMNOPQRST-
> >  D                                     UVWXYZ')
> >  D LC              C                  
CONST('abcdefghijklmnopqrst-
> >  D                                     uvwxyz')
> >   *
> >  C                   Eval      Str1 = 'Hello Everyone'
> >  C     LC:UC         Xlate     Str1          Str2
> >   *
> >
> >   * Translate string using QDCLXLATE API
> >   *
> >  C                   Call      'QDCXLATE'
> >  C                   Parm      30            Length            5

> >  C                   Parm      Str1          Str2             30
> >  C                   Parm      'QSYSTRNTBL'  Trntbl           10
> >
> 
> 
> _______________________________________________
> 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.