Hi all:

Here is the code I have been working with:

   mPersonalData = CurPatientSummary.PersonData
	mPastHist = CurPatientSummary.PastHist
	mAllergies = CurPatientSummary.Allergies
        IF !empty(mPersonalData)
		mUpdatePatSummary = .t.
		thisform.cmdEnterData.Enabled = .f.
	ELSE
		thisform.cmdEnterData.Enabled = .t.
	ENDIF

	IF !empty(mPastHist)
		mUpdatePatSummary = .t.
		thisform.cmdEnterData.Enabled = .f.
	ELSE
		thisform.cmdEnterData.Enabled = .t.
	ENDIF

	IF !empty(mAllergies)
		mUpdatePatSummary = .t.
		thisform.cmdEnterData.Enabled = .f.
	ELSE
		thisform.cmdEnterData.Enabled = .t.
	ENDIF

I have tried this with NOT ISNULL() adn NOT ISBLANK() functions, but does not seem to work, in that the first time a blank field is encountered it works, but the second time around for a new record, the behaviour is not as what is expected.

All I am trying to do here is to see if anyone one of the 3 fields in a table has data. If it does, then, disbale the enter Data button to allow Edits only. If it does not have any data, then enable Enterdata only and disable Edit. There could be situation where only one of the fields is blank - in which case it should be treated as an edit.

Where am I going wrong? Thanks in advance.