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