Nesse vídeo demonstraremos a utilização da função RemDddTel, que serve para separar o DDI, o DDD e o número de telefone de uma string em um array.
Abaixo o código fonte desenvolvido para o exemplo em vídeo acima:
//Bibliotecas
#Include "TOTVS.ch"
/*/{Protheus.doc} User Function zExe408
Faz a separação de DDI, DDD e número do telefone
@type Function
@author Atilio
@since 28/03/2023
@obs
Função RemDddTel
Parâmetros
Recebe o telefone no formato DDI+DDD+Numero
Retorno
Retorna um Array com as posições separadas
**** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao ****
/*/
User Function zExe408()
Local aArea := FWGetArea()
Local cNumero := ""
Local aDados := {}
//Separa a string
cNumero := "5514999998888"
aDados := RemDddTel(cNumero)
cMensagem := "Numero: " + aDados[1] + CRLF
cMensagem += "DDD: " + aDados[2] + CRLF
cMensagem += "DDI: " + aDados[3] + CRLF
FWAlertInfo(cMensagem, "Teste RemDddTel")
FWRestArea(aArea)
Return
Bom pessoal, por hoje é só.
Abraços e até a próxima.
