Bom dia,
Alguém tem alguma documentação dessa função TrataErro(cErro) que existe nos exemplos de ws no TDN ?
Função trataErro(cErro)
- Você vai ver essas setas em qualquer página de pergunta. Com elas, você pode dizer se uma pergunta ou uma resposta foram relevantes ou não.
- Edite sua pergunta ou resposta caso queira alterar ou adicionar detalhes.
- Caso haja alguma dúvida sobre a pergunta, adicione um comentário. O espaço de respostas deve ser utilizado apenas para responder a pergunta.
- Se o autor da pergunta marcar uma resposta como solucionada, esta marca aparecerá.
- Clique aqui para mais detalhes sobre o funcionamento do TOTVS DevForum!
1 resposta
-
/*/ Verifica se a sintaxe do campo esta correta @author TSC679 CHARLES REITZ @since 21/07/2020 /*/ User Function A086ChekSi(cFilExpr) Local bBlock := ErrorBlock() Local lRet := .T. Private cError := "" aab() ErrorBlock( { |e| cError := e:Description } ) BEGIN SEQUENCE dbSelectArea("SA1") dbSelectArea("SA3") dbSelectArea("SF4") dbSelectArea("SC5") dbSelectArea("SC6") dbSelectArea("SB1") xResult := &cFilExpr END SEQUENCE If !Empty(cError) Alert(cError,"Erro na Fórmula!") cError := "" lRet := .F. EndIf ErrorBlock(bBlock) Return lRet -