Roy,

Try this

lcHomeDir = ADDBS(CHRTRAN(homedir, CHR(0), ""))
...

>
>Worked for some files, for others it didn't, ex:
>
>the home directory is:
>
>i:\apps\fpw_30\prj
>
>looking at a record on project table('name' field):
>
>..\..\fp_25\servis\dbfclose.prg
>
>On project Manager Description:
>
>i:\apps\fp_25\servis\dbfclose.prg
>
>After running your function I get:
>
>i:\fp_25\servis\dbfclose.prg