Clique abaixo para nos ajudar
Conectar-se

Esqueci minha senha

Estamos no Facebook
Buscar
 
 

Resultados por:
 


Rechercher Busca avançada

Quem está conectado
10 usuários online :: Nenhum usuário registrado, Nenhum Invisível e 10 Visitantes :: 2 Motores de busca

Nenhum

[ Ver toda a lista ]


O recorde de usuários online foi de 468 em 1/3/2012, 10:43
Espessura do cursor intermitente

7/3/2017, 09:08 por Jefferson Matakas

Bom dia a todos !!

Existe uma opcao no windows que pode ser acessada atraves da 'central da …

Comentários: 0

DESENVOLVIMENTO EM REDES

4/3/2017, 18:45 por AJC

Pessoal tem ou conhece livros ou material para programação em
redes usando banco de dados nativo …

Comentários: 0

USAR REPORT FORM

30/12/2016, 09:06 por AJC

Pessoal bom dia,
Estou com um grande problema, já pesquisei muita coisa sobre report form, mas o …

Comentários: 4

Como preencher campos vazios

9/2/2017, 11:55 por Linghston

Pessoal boa tarde,

É o seguinte, eu preciso preencher os campos de uma coluna da tabela DBF que …

Comentários: 2

Enviar msg para WhatsAPP via VFP

7/2/2017, 10:31 por Eliana

Olá Pessoal!

Alguém sabe se é possível enviar mensagem para o WhatsAPP via VFP?


Grata


Comentários: 0

Estatísticas
Temos 7035 usuários registrados
O último usuário registrado atende pelo nome de marcos de boni

Os nossos membros postaram um total de 31 mensagens em 17 assuntos

Validar Inscricao Estadual

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

Resolvido Validar Inscricao Estadual

Mensagem por angelomarco em 18/9/2010, 10:26

Bom dia, alguem por favor pode me ajudar com a validacao de inscricao estadual?

angelomarco
Participa Pouco
Participa Pouco


Voltar ao Topo Ir em baixo

Resolvido Re: Validar Inscricao Estadual

Mensagem por m@r<3|o em 18/9/2010, 10:32

No Valid dos digitos RG IE

Código:
if thisformset.form3.txtclie_pfpj.value = "J"
  Declare Integer ConsisteInscricaoEstadual In DllInscE32.DLL String, String
  IF NOT PROINSC(THIS.Value,This.Parent.CmbClie_Est.Value)
        = MESSAGEBOX('INSCRIÇÃO ESTADUAL INVÁLIDA !', 48, 'Atenção')
        RETURN .F.
    ENDIF
RETURN
endif

PRG de Funcoes

FUNCTION PROINSC
Parameters IE, UF

** "limpar" a inscrição estadual para a verificação
IE = STRTRAN(IE,'.','')
IE = STRTRAN(IE,'-','')
IE = STRTRAN(IE,'/','')
IE = STRTRAN(IE,',','')
IE = STRTRAN(IE,'ME','')
IE = STRTRAN(IE,' ','')
IE = STRTRAN(IE,'P','')
IE = ALLTRIM(IE)
Return ConsisteInscricaoEstadual(IE, UF)=0

Necessario utlizar a DLL DllInscE32.DLL e
regsvr32.exe DllInscE32.DLL


m@r<3|o
Participante Assíduo
Participante Assíduo


Voltar ao Topo Ir em baixo

Resolvido Re: Validar Inscricao Estadual

Mensagem por angelomarco em 18/9/2010, 11:34

Marcelo, muito agradecido pela resposta.

angelomarco
Participa Pouco
Participa Pouco


Voltar ao Topo Ir em baixo

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo


 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum