---

Why not apply the UPPER to the results of the CHRTRAN()'s which should (consequently) be shorter, and also faster (being a one-liner):

lcClean = upper( chrtran(lcOrig, chrtran(lcOrig, "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ",""), ""))

After adding the lower case alphabet to the list.

Houston,

If you still want one-line, you can use:

lcClean=chrtran(lcOrig, chrtran(upper(lcOrig), "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ",""), ""))