- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Validar CNPJ duplicado no cadastro de vendedor (Tabela SA3)
×
Linguagem de Programação ADVPL
Perguntas Validar CNPJ duplicado no cadastro de vendedor (Tabela SA3)
- eduardo.araujo
- Autor do Tópico
- Desconectado
- Membro Júnior
-
Menos
Mais
- Postagens: 23
- Obrigados Recebidos: 0
11 anos 9 meses atrás #10768
por eduardo.araujo
Bom dia.
Estou precisando de uma ajudinha em ADVPL. Não entendo muito de programação e preciso criar uma validação no cadastro de vendedor que não permita que o usuário cadastre um CNPJ duplicado.
Pensei em colocar uma validação no campo, onde o X3_VLDUSER chama uma fonte e este fonte verifica se o CNPJ digitado pelo usuário já existe cadastrado na tabela SA3.
Alguém aí pode me dar uma forcinha nesta solução?
Desde já agradeço a atenção de todos.
Abs.
Eduardo Araujo
Estou precisando de uma ajudinha em ADVPL. Não entendo muito de programação e preciso criar uma validação no cadastro de vendedor que não permita que o usuário cadastre um CNPJ duplicado.
Pensei em colocar uma validação no campo, onde o X3_VLDUSER chama uma fonte e este fonte verifica se o CNPJ digitado pelo usuário já existe cadastrado na tabela SA3.
Alguém aí pode me dar uma forcinha nesta solução?
Desde já agradeço a atenção de todos.
Abs.
Eduardo Araujo
Por favor Acessar ou Registrar para participar da conversa.
- lalberto
-
- Desconectado
- Administrador
-
Menos
Mais
- Postagens: 3676
- Obrigados Recebidos: 6
11 anos 9 meses atrás #10770
por lalberto
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Respondido por lalberto no tópico Validar CNPJ duplicado no cadastro de vendedor (Tabela SA3)
Não testei veja se ajuda.
User Function ValCnpj(cCnpjCpf)
Local aArea := GetArea()
Local nRec := SA3->(Recno())
If SA3->(dbSetOrder(3), dbSeek(xFilial("SA3")+cCnpjCPF))
MsgAlert("Atenção CNPJ/CPF Já Cadastrado !","Atenção!")
RestArea(aArea)
SA3->(dbGoTo(nRec))
Return .f.
Endif
RestArea(aArea)
SA3->(dbGoTo(nRec))
Return .t.
No Campo X3_VLDUSER coloca U_ValCnpj(M->A3_CGC)
User Function ValCnpj(cCnpjCpf)
Local aArea := GetArea()
Local nRec := SA3->(Recno())
If SA3->(dbSetOrder(3), dbSeek(xFilial("SA3")+cCnpjCPF))
MsgAlert("Atenção CNPJ/CPF Já Cadastrado !","Atenção!")
RestArea(aArea)
SA3->(dbGoTo(nRec))
Return .f.
Endif
RestArea(aArea)
SA3->(dbGoTo(nRec))
Return .t.
No Campo X3_VLDUSER coloca U_ValCnpj(M->A3_CGC)
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Por favor Acessar ou Registrar para participar da conversa.
- eduardo.araujo
- Autor do Tópico
- Desconectado
- Membro Júnior
-
Menos
Mais
- Postagens: 23
- Obrigados Recebidos: 0
11 anos 9 meses atrás #10771
por eduardo.araujo
Respondido por eduardo.araujo no tópico Validar CNPJ duplicado no cadastro de vendedor (Tabela SA3)
Obrigado Luiz, vou testar agora e já te dou um retorno.
Abs.
Eduardo Araujo
Abs.
Eduardo Araujo
Por favor Acessar ou Registrar para participar da conversa.
- eduardo.araujo
- Autor do Tópico
- Desconectado
- Membro Júnior
-
Menos
Mais
- Postagens: 23
- Obrigados Recebidos: 0
11 anos 9 meses atrás #10774
por eduardo.araujo
Respondido por eduardo.araujo no tópico Validar CNPJ duplicado no cadastro de vendedor (Tabela SA3)
Luiz,
acabei de testar. Funcionou perfeitamente!!!
Muito obrigado pela ajuda!!!
Abs.
Eduardo Araujo
acabei de testar. Funcionou perfeitamente!!!
Muito obrigado pela ajuda!!!
Abs.
Eduardo Araujo
Por favor Acessar ou Registrar para participar da conversa.
- lalberto
-
- Desconectado
- Administrador
-
Menos
Mais
- Postagens: 3676
- Obrigados Recebidos: 6
11 anos 9 meses atrás #10775
por lalberto
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Respondido por lalberto no tópico Validar CNPJ duplicado no cadastro de vendedor (Tabela SA3)
Blz Carinha, coloca uma foto sua ai no perfil pra gente te conhecer melhor e indique o site masteradvpl aos amigos.
Abraços.
Abraços.
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Por favor Acessar ou Registrar para participar da conversa.
- augustinhaki
- Desconectado
- Membro Especialista
-
Menos
Mais
- Postagens: 143
- Obrigados Recebidos: 0
11 anos 3 meses atrás #16054
por augustinhaki
Respondido por augustinhaki no tópico Validar CNPJ duplicado no cadastro de vendedor (Tabela SA3)
Poderiam me ajudar, por favor, na questão de duplicidade de CNPJs dos clientes?
Preciso bloquear CNPJs duplicados, mas se eu utilizar o parametro MV_VALCNPJ ele bloqueia tudo, e eu preciso incluir filiais dos clientes e esses CNPJs só mudam o final.
Preciso de uma solução que valide o codigo CNPJ inteiro e não somente antes da /, dai nao consigo incluir filiais, diz que está duplicado e não permite.
Preciso bloquear CNPJs duplicados, mas se eu utilizar o parametro MV_VALCNPJ ele bloqueia tudo, e eu preciso incluir filiais dos clientes e esses CNPJs só mudam o final.
Preciso de uma solução que valide o codigo CNPJ inteiro e não somente antes da /, dai nao consigo incluir filiais, diz que está duplicado e não permite.
Por favor Acessar ou Registrar para participar da conversa.
- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Validar CNPJ duplicado no cadastro de vendedor (Tabela SA3)
Tempo para a criação da página:0.140 segundos