>>

>>LOCAL lcControl
>>lcControl = IIF(UPPER(LEFT(Object.ControlSource,2)) == [M.],SUSBTR(Object.ControlSource,3),Object.ControlSource)
>>DO CASE
>>   CASE TYPE([m.]+lcControl) == [U] AND; && Not a memory variable
>>        TYPE(lcControl)      #  [U]
>>        REPLACE (lcControl) WITH WITH ltNewDateTime
>>   CASE TYPE(lcControl)      == [C] && Memory variable
>>        STORE ltNewDateTime TO (lcControl)
>>OTHERWISE
>>        *** something wrong
>>ENDCASE
>>

>>(not tested for all occasions)
>
>I guess you ment to use VARTYPE() and not TYPE(), with TYPE() you must enclose the variable names with apostrophs. (I know that you know that!)

UPDATE: Ignore that. I didn't read all messages after yours :o)))