>Hi!
>
>See code corrections below that demostrate what I meant.
>
>

>with thisform
>   llPrevLock = .LockScreen
><b>   llPrevAutoYield = _VFP.AutoYield</b>
>* check for exit from edit mode via Save button
>	if .EditMode	&& this button means "Save" when in edit mode		
>	   .LockScreen = .t. && Don't want to change color in grid
>                <b>.Text1.SetFocus && move focus out of grid in any case
>                DOEVENTS && force processing of any pending events
>                _VFP.AutoYield = .F. && set it to .f. for duration of saving for better performance
>                </b>
>
>* handle non-blank stateuse validation if applicable
>		if not empty(.deduCombNew) and .dedupetype = DDJC_PRCL	&& newly combined parcel
>* check that the user supplied a non-blank stateuse
>			lnRecno=recno('BldMstr')					&& save current position
>			go (.deduCombNew)				&& jump to the new combo parcel
>			if empty(StateUse)						&& user didn't select a stateuse for new combined parcel
>				wait window nowait "A non-blank StateUse is required for newly combined parcel."
>				.grdBldMstr.DDCP_STUSE.combo1.setfocus()	&& put focus right on the offending field
>				.LockScreen = m.llPrevLock
>				return								&& may as well leave position at the offending record
>			endif
>			goto m.lnRecno					&& restore position
>		endif
>		.deduCombNew = 0		&& clear property indicating we're editing a new combined record
>		dodefault()				&& pass on to default Save logic
>		.dedupeCount('Save')
>                <b>_VFP.AutoYield = m.llPrevAutoYield</b>
>		.LockScreen = m.llPrevLock
>		return
>	endif
>

>
>But I'm not sure it will help.
>

I'll try anyway tomorrow. Too bad, that I can not switch to views at this stage (application is already written). I think, it might be bigger part of the problem. I found, what if I made changes in the file, I have to wait ~10min. to save. The file has lots of fields, though I change only 2/3 of them...