Nesse vídeo demonstraremos a utilização da função TrataEnd, que serve quebrar um endereço e retornar uma das 3 partes (logradouro, número e complemento).
Abaixo o código fonte desenvolvido para o exemplo em vídeo acima:
//Bibliotecas
#Include "TOTVS.ch"
/*/{Protheus.doc} User Function zExe504
Trata um endereço retornando as informações separadas
@type Function
@author Atilio
@since 04/04/2023
@obs
TrataEnd
Parâmetros
Recebe o endereço junto com o numero e complemento separados por virgula
Define se quer buscar o endereço / logradouro (L) ou o numero (N) ou o complemento (C)
Retorno
Retorna a parte do endereço encontrada
**** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao ****
/*/
User Function zExe504()
Local aArea := FWGetArea()
Local cEndereco := ""
Local cBusca := ""
//Define o endereço, sendo que o numero e complemento separados por vírgula
cEndereco := "Rua do Garibaldo, 369, Próximo ao Mercado"
//Busca a informação do endereço (logradouro) apenas e exibe
cBusca := TrataEnd(cEndereco, "L")
FWAlertInfo(cBusca, "Teste 1 TrataEnd")
//Busca a informação do número apenas e exibe
cBusca := TrataEnd(cEndereco, "N")
FWAlertInfo(cBusca, "Teste 2 TrataEnd")
//Busca a informação do complemento apenas e exibe
cBusca := TrataEnd(cEndereco, "C")
FWAlertInfo(cBusca, "Teste 3 TrataEnd")
FWRestArea(aArea)
Return
Bom pessoal, por hoje é só.
Abraços e até próxima.
