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.

Tags: AdvPLMaratonaProtheusTL++