tValue can be .NULL.

function DateTime2Date
lparameter tValue
return (iif( vartype( tValue,.T.)="T", ttod(tValue),tValue)

MartinaJ

>I get error when using a function in ControlSource of a grid. The function is as following:
>
>

>function DateTime2Date
>lparameter tValue
>return (iif( vartype( tValue)="T", ttod(tValue),tValue)
>

>
>The ControlSource in grid is as following:
>

>DateTime2Date( MyField )
>

>
>What is wrong with the above? TIA.