Thanks, Vlad, that's just about what I did.

Barbara

>AFAIK, there's no such function as STOD() (inverse of DTOS()). The easiest way I know:
>
>

>PARAMETER tcDate
>
>LOCAL lcOldDate, lcDate, ldReturn
>lcOldDate = SET("DATE")
>SET DATE TO YMD
>
>lcDate = STUFF(tcDate, 7, 0, "/")
>lcDate = STUFF(lcDate, 5, 0, "/")
>ldReturn = CTOD(lcDate)
>
>SET DATE TO (lcOldDate)
>
>RETURN ldReturn
>

>
>Vlad