Perguntas Validação no momento que posicionar o campo.

Bom dia Pessoal,

Existe alguma validação no momento que entrar no campo (SX3), utilizando um axcadastro por exemplo? Basicamente gostaria de fazer a mesma coisa que acontece no cadastro de funcionário (SRA) quando se posiciona no campo "Adc.Tmp.Serv" - RA_ADTPOSE.

Em pesquisa achei o campo X3_WHEN (com retorno lógico), porém ele não é chamado quando é posicionado no campo e sim quando a tela está sendo montada (exemplo com um AxInclui).


Vocês já tentaram fazer algo do tipo?


Att,

Fala galera!

Descobri, segue a solução:


Utilizei o campo X3_WHEN com uma função de usuário ( U_ZCADVLCON() )

//Como a essa função é chamada toda a vez que há um refresh no dialog, fiz o tratamento em uma variável STATIC realizando alguma ação somente quando o READVAR() for igual ao campo desejado.
//

---

User Function ZCADVLCON()

Local lRet := .T.

Static __nZTst := 0

If Alltrim( ReadVar() ) = "M->ZZV_DTOT1" .AND. ( __nZTst = Nil .OR. __nZTst < 1 )
__nZTst++
MsgInfo( "Entrei no campo ZZV_DTOT1" , "Atenção )
lRet := .F.
Elseif __nZTst >= 1
__nZTst := 0
lRet := .T.
Endif

Return(lRet)
//

---

Até!!!