Valdir Posted July 10, 2020 Report Share Posted July 10, 2020 Boas... Nesta Tela abaixo devo realizar os Apontamentos, porém quando informo o a Código do Colaborador acionando a função de Pesquisa e Validação do Campo, essas não são nem acionadas. O Get recebe o Focus, porém não realiza nenhuma atividade ao final da Digitação Alguém já passou por problema semelhante ou pode me dar uma Luz em como resolver esse Problema ? Obrigado. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted July 10, 2020 Report Share Posted July 10, 2020 KD o ACTION? Poste o código. Valdir 1 Quote Link to comment Share on other sites More sharing options...
Valdir Posted July 10, 2020 Author Report Share Posted July 10, 2020 Agora, kapiaba disse: KD o ACTION? Poste o código. Fala Tranka... Obrigado por responder. É feita uma Validação e não uma Ação. "REDEFINE GET oGet[04] VAR mFuncio PICTURE "99999999" ID 104 OF oDlg ; VALID ( FFUNCIO(mFuncio,oGet,oDlg)) UPDATE" A variável mFuncio é Caracter de 8 posições A Função FFUNCIO() Pesquisa e Valida o valor digitado neste Get. Obrigado pela ajuda. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted July 10, 2020 Report Share Posted July 10, 2020 Poste FFUNCIO() para eu simular. Quote Link to comment Share on other sites More sharing options...
Valdir Posted July 10, 2020 Author Report Share Posted July 10, 2020 14 minutos atrás, kapiaba disse: Poste FFUNCIO() para eu simular. " //-------------------------------------------------------------------------// FUNCTION FFUNCIO(mFuncio,oDlg,oGet) LOCAL lOk:=.F. dbSelectArea("FUN") FUN->(OrdSetFocus("BAR")) FUN->(dbGoTop()) FUN->(DBSEEK(mFuncio)) IF FOUND() lOk := .T. mFuncio := FUN->COD_FUN ENDIF oGet[04]:Refresh(.T.) oDlg:UPDATE() RETURN(lOk) Quote Link to comment Share on other sites More sharing options...
kapiaba Posted July 10, 2020 Report Share Posted July 10, 2020 Cambie: RETURN(lOk) Por: RETURN( .T ) e RETURN( .F. ) o GET tá numérico, mas você busca ALFA? Ou entendi errado? Quote Link to comment Share on other sites More sharing options...
Valdir Posted July 10, 2020 Author Report Share Posted July 10, 2020 8 minutos atrás, kapiaba disse: Cambie: RETURN(lOk) Por: RETURN( .T ) e RETURN( .F. ) o GET tá numérico, mas você busca ALFA? Ou entendi errado? Tranka... A FUNCTION FFUNCIO(mFuncio,oDlg,oGet) não é nem acionada, por isso não tenho a validação. O problema está na validação do Get ( "antigo Read" ) do Clipper que não passa o valor para a chamada da Função. Se eu colocar um Break point no Início desta Função, também não será executado. Ok ? Obrigado. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted July 10, 2020 Report Share Posted July 10, 2020 Ponha CANCEL no botão de Saida, para ver se o VALID aciona. Quote Link to comment Share on other sites More sharing options...
Valdir Posted July 10, 2020 Author Report Share Posted July 10, 2020 17 minutos atrás, kapiaba disse: Ponha CANCEL no botão de Saida, para ver se o VALID aciona. Repare na imagem que não existem botões... A Saída da Tela é feita pela Validação da Função FFuncio. Obrigado. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted July 10, 2020 Report Share Posted July 10, 2020 Trem esquisito. Não tem botão de Saida, gravação nem nada? Ponha um botão de Saida, mesmo que você o invisibileze com o Hide() e ponha o CANCEL, para ver a reação do VALID, talkey()? Programação portuguesa, é? Quote Link to comment Share on other sites More sharing options...
Valdir Posted July 10, 2020 Author Report Share Posted July 10, 2020 14 minutos atrás, kapiaba disse: Trem esquisito. Não tem botão de Saida, gravação nem nada? Ponha um botão de Saida, mesmo que você o invisibileze com o Hide() e ponha o CANCEL, para ver a reação do VALID, talkey()? Programação portuguesa, é? kkkkkkkkkkkkkkkkkkkkkk Resolvio... Não me pergunte porquê, pois não tenho a minima ideia porque deu certo. Para Resolver, fiz uma bela gambiarra incluindo um novo Get, sobrepondo e mantendo o anterior. Apenas redefini a TabStop para ser o último no get original... Dai funfou certinho. Como estou sem tempo, vou deixar assim e quando estiver mais tranquilo, volto a estudar este caso, pois na minha opinião, não tem lógica nenhuma para não estar funcionando sem esta Gambiarra. Valeu pela ajuda meu amigo... Obrigado. Quote Link to comment Share on other sites More sharing options...
alex2002 Posted July 10, 2020 Report Share Posted July 10, 2020 Valdir, É porque como o seu get é o ultimo campo e não tem mais nenhum para o TABSTOP ir, acontece isso. Já aconteceu comigo, e eu coloquei um get bem pequeno (imperceptível) pra resolver. Um abraço, Alexandre Pereira Valdir 1 Quote Link to comment Share on other sites More sharing options...
Valdir Posted July 10, 2020 Author Report Share Posted July 10, 2020 2 horas atrás, alex2002 disse: Valdir, É porque como o seu get é o ultimo campo e não tem mais nenhum para o TABSTOP ir, acontece isso. Já aconteceu comigo, e eu coloquei um get bem pequeno (imperceptível) pra resolver. Um abraço, Alexandre Pereira Foi exatamente isso que imaginei. Obrigado meu estimado amigo. Abraços. Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.