>>RESTORE FROM (HOME() + "EUROPEAN.MEM") >>lcFrom = "" >>lcTo = "" >> >>FOR i=1 TO 255 >> IF CHR(i) <> SUBSTR(m.euroansi, i,1) >> lcFrom = lcFrom + CHR(i) >> lcTo = lcTo + SUBSTR(m.euroansi, i,1) >> ENDIF >>ENDFOR >> >>*? lcFrom >>*? lcTo >> >>_CLIPTEXT = [CHRTRAN(myfield, "] + lcFrom +[", "] + lcTo + [")"] >>>