datachanged Method
Class: tsbaseform
Expand/Collapse source code of procedure datachanged Source Code
*-- Assumes table or view for current work area
*-- Returns .T. if any data has changed

IF ISNULL(GETFLDSTATE(-1))
  RETURN .F.
ELSE
  RETURN ("2" $ GETFLDSTATE(-1) OR ;
          "4" $ GETFLDSTATE(-1))
ENDIF