DO WHILE ATC (tcSearchfor, lcReturn) > 0 lnStart = ATC (tcSearchfor, lcReturn) lcReturn = LEFT (lcReturn, lnStart-1) + lcReplace + SUBSTR (lcReturn, lnStart + lnSearchForSize) ENDDO