Clipper On Line • Ver Tópico - Testando tamanho CPF/CNPJ

Testando tamanho CPF/CNPJ

Aqui você poderá oferecer suas Contribuições, Dicas e Tutoriais (Texto ou Vídeo) que sejam de interesse de todos.

Moderador: Moderadores

 

Testando tamanho CPF/CNPJ

Mensagempor JoséQuintas » 03 Jul 2020 16:59

Cheguei neste pronto, e achei interessante várias opções pra mesma coisa:

         IF Len( SoNumeros( :String( "CDCNPJ" ) ) ) != 14 .AND. Len( SoNumeros( :String( "CDCNPJ" ) ) ) != 11


Não sei se dá pra considerar antigo:

IF ! StrZero( Len( SoNumeros( :String( "CDCNPJ" ) ) ), 2 ) $ "11,14"


ou

IF hb_ASCan( { 11, 14 }, Len( SoNumeros( :String( "CDCNPJ" ) ) ) ) == 0


Tem a ver com o que mencionei em outro post:
Conforme a gente vai se sentindo confortável, vai usando novas opções.
No tempo em que ainda usava clipper, acharia isso uma coisa complicada pra entender.
José M. C. Quintas
Harbour 3.4, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, hbnetio, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"
Avatar de usuário

JoséQuintas
Colaborador

Colaborador
 
Mensagens: 14294
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 13 vezes
Mens.Curtidas: 859 vezes

Testando tamanho CPF/CNPJ

Mensagempor Vlademiro » 06 Jul 2020 10:15

Creio que dá pra fazer tb com RegExp. Fica estranho mas virou um padrão. Muitas linguagens usam.
Avatar de usuário

Vlademiro
Usuário Nível 4

Usuário Nível 4
 
Mensagens: 650
Data de registro: 11 Jul 2005 02:46
Curtiu: 12 vezes
Mens.Curtidas: 44 vezes




Retornar para Contribuições, Dicas e Tutoriais

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 2 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro