STRPDM.COM                  

   Home    |    IBM Manuals Direct    |    iBytes Library   |    Links    |   About     |   Book Store   |  On-Line Code

 

iByte

Subject – Converting case using the XLATE command.

This is a simple trick to convert from lower or upper case using the XLATE command.

D UC              C                   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
D LC              C                   'abcdefghijklmnopqrstuvwxyz'

If Lname contained "Kramer" the result would be "KRAMER".  To change to lower case just reverse the LC & UC.

C     LC:UC         XLATE     Lname   Lname