Hi,

>I must reimport an address file.
>
>"Rue de l'université 7 " =====> "Rue de l'université"
>"place victor hugo 7Bte 15" ====> "place victor hugo"
>"rue des mineurs 14b" =====> "rue des mineurs"
>etc...
>
One approach:

PROCEDURE GetStreet
LPARAMETERS lcstr
LOCAL lcret
lcret = ""
LOCAL i
FOR i = 1 TO GETWORDCOUNT(lcstr)
  IF VAL(GETWORDNUM(lcstr,i))> 0
    EXIT
  ENDIF
  lcret = lcret + GETWORDNUM(lcstr,i) + " "
ENDFOR 
RETURN TRIM(lcret)

but there must be lots of others....
Regards,
Viv