>George,
>
>I think that is exactly what I am looking for. I would appreciate it if you could post the code.
>Thank you very much and thank you for your patience.
Lamar,
Here's code for the latter function. I haven't been able to figure out a way (yet) to use the former one.
DECLARE INTEGER GetDefaultUserProfileDirectory IN Userenv;
STRING @lpProfileDir, INTEGER @lpcchSize
lnsize = 260
lcbuffer = SPACE(lnsize)
= GetDefaultUserProfileDirectory(@lcbuffer, @lnsize)
? LEFT(lcbuffer, lnsize - 1)
George
Ubi caritas et amor, deus ibi est