I only had to tweak a couple things and it worked great. Thanks!

>>>First, do not use CHRTRAN() use STRTRAN():
>>>

>>>m.ReplaceWith = ''
>>>m.PrefixSearchString = [ MR MRS MS MISS DR PROF SIR MASTER REV REVERAND ETC ]
>>>FOR x = 1 TO GETWORDCOUNT( m.PrefixSearchString )
>>>    m.LookFor = [ ]+ALLTRIM(UPPER(GETWORDNUM(m.PrefixSearchString,x)))+[ ]
>>>    tcName    = STRTRAN([ ]+UPPER(tcName)+[ ],m.LookFor,m.ReplaceWith)
>>>ENDFOR
>>>

>>
>>Ok, that worked. Mostly. The other thing that is happening is that tcName is getting converted to uppercase, which is not what I want. How can I preserve the case and still get a valid replacement?
>
>You can't unfortunately. You should use other approach:
>

>m.ReplaceWith = ''
>m.PrefixSearchString = [ MR MRS MS MISS DR PROF SIR MASTER REV REVERAND ETC ]
>m.lcNewName = []
>FOR x = 1 TO GETWORDCOUNT( m.PrefixSearchString )
>    m.LookFor = ALLTRIM(UPPER(GETWORDNUM(m.PrefixSearchString,x)))+[ ]
>    lnAt      = AT(m.LookFor,UPPER(tcName)+[ ]) # 0
>    DO WHILE lnAt # 0
>       m.lcNewName = LEFT(tcName, lnAt-1) + m.LookFor + SUBSTR(m.tcName, lnAt+LEN(m.LookFor))
>       tcName      = SUBSTR(m.tcName, lnAt+LEN(m.LookFor))
>       lnAt        = AT(m.LookFor,UPPER(tcName)+[ ]) # 0
>   ENDDO
>ENDFOR
>tcName = IIF(EMPTY(m.lcNewName),m.tcName, m.lcNewName)
>

>That is NOT tested at all.