Verificando se o Primeiro Caractere de uma String é Numérico com IsDigit em ADVPL

Tempo de leitura: 1 minuto

A função IsDigit em ADVPL é utilizada para determinar se o caractere mais à esquerda de uma string é um dígito, permitindo avaliar se o string especificado começa com um caractere numérico(0 a 9). IsDigit é muito útil para situações onde precisamos validar números em campos. Ela é também  uma das funções de manipulação de string em ADVPL. 

 

Sintaxe:

IsDigit(cString)

 

Parâmetro(s):

Retorno:

 

 

Exemplo da função IsDigit em ADVPL:

#include 'protheus.ch'
/*{Protheus.doc} User Function fIsDigit
    (Essa função tem por finalidade mostrar a função de Manipulação de String fIsDigit em ADVPL)
    @type  Function
    @author Adilio Costa
    @since 07/12/2023
    @version 1.0
    
@?Inscreva-se no Blog ProtheusAdvpl:
https://www.protheusadvpl.com.br
@?Inscreva-se no Canal ProtheusAdvpl:
https://www.youtube.com/protheusadvpl
@?Siga-nos no Instagram:
https://www.instagram.com/protheusadvpl
@?Conheça os Cursos e Formações do ProtheusAdvpl:
https://cursos-e-formacoes-protheusadvpl.gr-site.com/

|Se esse conteúdo foi útil pra você nos ajude divulgando
ele e nossas redes sociais!!|

*/
User Function fIsDigit()
	Local cString1 := "99988877706"
    Local cString2 := "ProtheusAdvpl 2023" 
	
    
    If(IsDigit(cString1))
        MsgInfo("A string1:"+cString1+" é númerico!","Função IsDigit")
    Else
         MsgInfo("A string1:"+cString1+" não é númerico!","Função IsDigit")
    EndIf

    If(IsDigit(cString2))
        MsgInfo("A string2:"+cString2+" é númerico!","Função IsDigit")
    Else
         MsgInfo("A string2:"+cString2+" não é númerico!","Função IsDigit")
    EndIf


	

Return

No código ADVPL acima informamos 2 variáveis chamadas cString1 e cString2, a função IsDigit informa que cString1 é numérico pois o primeiro caractere mais à esquerda pertence aos caracteres numérico. Já à variável cString2 a função IsDigit informa que não é numérico pois seu primeiro caractere mais à esquerda é alfabético.

 

É isso aí, finalizamos aqui mais um post no Blog ProtheusAdvpl. Caso tenha ficado alguma dúvida deixe seu comentário ou nos envie um e-mail para adiliocosta@protheusadvpl.com.br, até um próximo post, grande abraço e fica com Deus.

Link(s) de referência(s):

 
Receba as últimas atualizações do ProtheusAdvpl
Deixe seu melhor email
Nós respeitamos sua privacidade.