LOCAL ltValue IF NOT EMPTY( This.cControlSource ) ltValue = EVALUATE( This.cControlSource ) *** Update the control's value from its cControlSource IF EMPTY( NVL( ltValue, {/:} ) ) This.Value = {} ELSE IF VARTYPE( ltValue ) = 'T' This.Value = TTOD( ltValue ) ELSE This.Value = ltValue ENDIF ENDIF ELSE This.Value = {} ENDIFObviously, the code the the UpdateControlSource method is the inverse of the method code I posted above. It must update the contents of the field referenced by the control's cControlSource property from its value.