• Subject: Re: Convert uppercase to mixed case
  • From: "Simon Coulter" <shc@xxxxxxxxxxxxxxxxx>
  • Date: Mon, 22 Nov 99 21:53:53 +1100
  • Importance: Normal

M
Hello Alex,

That only works reliably in the base EBCDIC code page.  It will not work 
everywhere in 
the world, not even in other countries that use the Latin alphabet, and heaven 
help you 
if you attempt this on lower-case characters in a DBCS code page.  The proper 
method is 
to use a conversion table or the iconv() API - even the XLATE RPG instruction 
doesn't 
help.

Regards,
Simon Coulter.


 FlyByNight Software         AS/400 Technical Specialists       
 Eclipse the competition - run your business on an IBM AS/400.  
                                                                
 Phone: +61 3 9419 0175      Mobile: +61 0411 091 400           
 Fax:   +61 3 9419 0175      mailto: shc@flybynight.com.au      
                                                                
 Windoze should not be open at Warp speed.                      
M-Mailer: Microsoft Outlook 8.5, Build 4.71.2173.0
Date: Fri, 19 Nov 1999 14:05:47 -0500
From: "Alex Roytman" <sasha@arehart.com>
To: MIDRANGE-L@midrange.com
Reply-To: MIDRANGE-L@midrange.com
Subject: Convert uppercase to mixed case
Importance: Normal
Monvert uppercase to mixed caseDave,

The following code will convert Name to Upper case:

C     1             Do        30            i
C     1             SubSt     Name:i        Char              1
C                   BitOn     '1'           Char
C                   Eval      %Subst(Name:i:1) = Char
C                   EndDo

Alex Roytman
Profound Logic Software
http://www.rpgalive.com

   -----Original Message-----
  From: owner-midrange-l@midrange.com
[mailto:owner-midrange-l@midrange.com]On Behalf Of Leland, David
  Sent: Friday, November 19, 1999 12:33 PM
  To: 'MIDRANGE-L@midrange.com'
  Subject: Convert uppercase to mixed case


  Does anyone have a generic routine (RPG) for converting uppercase to mixed
case?  I'm looking to convert all our customer and vendor names and
addresses from upper to mixed.

  Thanks,
  Dave

Title: Convert uppercase to mixed case
0!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
Dave,
 
The following code will convert Name to Upper case:
 
C     1             Do        30            i                      
C     1             SubSt     Name:i        Char              1    
C                   BitOn     '1'           Char                   
C                   Eval      %Subst(Name:i:1) = Char              
C                   EndDo                                          
 
Alex Roytman
Profound Logic Software
http://www.rpgalive.com
 
 -----Original Message-----
From: owner-midrange-l@midrange.com [mailto:owner-midrange-l@midrange.com]On Behalf Of Leland, David
Sent: Friday, November 19, 1999 12:33 PM
To: 'MIDRANGE-L@midrange.com'
Subject: Convert uppercase to mixed case

Does anyone have a generic routine (RPG) for converting uppercase to mixed case?  I'm looking to convert all our customer and vendor names and addresses from upper to mixed.

Thanks,
Dave


This thread ...


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].