Gregory,

The ADIR() function retuns # of files found so in your code ALEN() will fail always.

return  (adir(aa, FileName, 'DHS') > 0)

<snip>
>

>*--------------------------------------------------------------------------
>Function	FileExists(FileName)
>
> 	return  (alen(adir(aa, FileName, 'DHS')) > 0)
>endfunc
>*--------------------------------------------------------------------------
>

>