Expert: Concise Systems/Laird Scranton - 5/28/2009

Question
I have a 15 position field in a display file that is used to enter part numbers.  In the past, user input has always been interpreted to upper case.  Some new part numbers containing a hyphen are not being converted to upper case.  What is the cause and how do I fix - always want alpha characters in upper case.

Answer
To be certain that the alpha characters are converted to uppercase, I use my own conversion subroutine.  This subroutine would use the MOVEA command to place your item number in an array with 15 1-character elements.  Then execute a DO loop.  Any character that falls between 'a' and 'z', seton bit '1', using the BITON command. That will convert lowercase alpha characters to uppercase and leave the other characters as they are.

- Laird