>Dear Sir,
>
>Regards & Hello
>
>I want to Index on fields after removing unwanted characters . So I have written a function given below. which will remove all unwanted characters and then if the field value becomes Null it will add a space to it and then index on it. SET Procedure to file is also defined but not working.
>
>Help
>Rahul
>
>
>
>
>do form addbkpg.scx
>FUNCTION strindex
>PARAMETER strname
>clnstr=CHRTRAN(UPPER(strname),CHRTRAN(UPPER(strname),"01234567890ABCDEFGHIJKLMNOPQRSTUVWXYZ",""),"")
> IF clnstr=""
> clnstr=" "
> endif
>RETURN clnstr
>ENDFUNC
This may just be semantics but you should be aware that
"" is not .NULL. it is however EMPTY().