Hi Nadya,

Long time, without talking...:)

I try your code but something is mess me,

my SAVE Method

WITH THISFORM
	llOK=.oCliente.SAVE(.ORS0)
	IF not llOK
		.ADO_FINDFIELDERROR(.oCliente.lcFieldError)
	ENDIF

	.InitVars()
ENDWITH

my ADO_FINDFIELDERROR with your example,

LPARAMETERS cFieldError
if type('thisform.txt'+cFieldError)="O" && Object exists
    loObject = evaluate('thisform.txt'+cFieldError)
    loObject.SetFocus()
endif 

The Form clears and not set the focus...Any ideia....


Thank's for your time,

João Batista