lcDigits = "0123456789" lcmyString = "123456789 Boldorn" lcRest = CHRTRAN(lcmyString , lcDigits, "") ? AT("-", CHRTRAN(lcmyString, lcRest, REPLICATE("-", LEN(lcRest))))