IE Pernambuco - Valida(PR)

[Laudelino Scarmagnani]

Olá pessoal,
tenho a versão 5.2 do Valida(PR) e, embora a inscrição de empresas de Pernambuco esteja correta pelo meu sistema, dá erro no valida, dando a mensagem de inscrição incorreta.
Alguém já lidou com isso? O problema é no meu sistema ou devo atualizar a versao do Valida? Se for a versão do Valida, como devo proceder para atualizá-la.
Abracos.
Laudelino.

[sygecom]

Você usa a DLL do Sintegra para validar a inscrição ?
http://www.sintegra.gov.br/DLL3.zip
http://dicasprog.codigolivre.org.br/hwgui/0001.php

[Laudelino Scarmagnani]

Não. Uso a função ieok rotina que baixei neste forum. Mas chequei com o cliente e o incrição está correta. Ao validar, no ValidaPr dá a rejeição. Como faço para usar a DLL. Não sei como usar DLL no xharbour ainda. Se tiver um exemplo, me ajudaria muito. Hoje uso a função
ieok(wuf,winscrest).
e a função

Código: Selecionar todos

function ieok(puf,pie)
local ok:=.f.,base,vpos,valg,vsom,vres,vdig1,vdig2,vpro,p,d,n,vbase2,origem
vbase2:=base:=origem:=""
if alltrim(pie)=="ISENTO";return .t.;endif
   for vpos:=1 to len(alltrim(pie))
       if substr(pie,vpos,1)$"0123456789P"
          origem+=substr(pie,vpos,1)
       endif
   next
SGULTDIG = SPACE(2) // variavel publica
SGULTDIG = SUBSTR(SGCGC,15,2) // variavel publica

IF EMPTY(SGULTDIG)

      *-- E UM CPF, PESSOA FISICA/ NAO CALCULA INSCRICA0 ESTADUAL

      RETURN
ENDIF
sgresult :=0  // VARIAVEL PUBLICA
public mascara:="99999999999999"
if puf=="PE"
      mascara:="999,999,999"
      base   :=padr(origem,9,"0")
      vsom   :=0
      for vpos:=1 to 8
           valg:=val(substr(base,vpos,1))
           valg:=valg*(10-vpos)
           vsom+=valg
      next
      vres  :=vsom%11
      vdig1 :=if(vres<2,"0",str(11-vres,1,0))
      vbase2:=left(base,8)+vdig1
      ok    :=(vbase2==origem)
endif

SGINSCR = VBASE2
if !ok
      if empty(vbase2)
           alert("Os D¡gitos Identificadores de Cidade e/ou Estado N„o Conferem !")
      else
           vbase2:=strtran(transform(val(vbase2),mascara)," ","0")
           vbase2:=strtran(vbase2,",",".")
           alert("Inscri‡„o Inv lida !;O Correto Seria;"+vbase2)
      endif
      sgresult=1
else
      sginscrest:=strtran(transform(val(sginscr),mascara)," ","0")
      sginscrest:=strtran(sginscrest,",",".")
endif
return .t.

Desculpem a insistencia. Agradeço se puderem me ajudar.
Laudelino

[sygecom]

Veja o topico abaixo.:
viewtopic.php?f=43&t=10836

[Laudelino Scarmagnani]

Sygecom, obrigado pelas sugestões. Vou apreder a trabalhar com dll.
Mas, tenho um inscrição, por exemplo: 010424407, é correta, chequei pelo Sinscdv.exe que baixei aqui no forum. Mas, no Validador do Paraná, que é o ValidaPR Versão 2.1.0.0. Dá o erro Inscrição Estadual ('010424407 ') inválida para UF = PE.
Penso que tenho a versão do ValidaR desatualidade. Não sei como atualizar.
Sintegra e ValidaPR são diferentes?
Laudelino.

[rochinha]

Amiguinho,

Quando passar a inscrição ao validador, passe com o tamanho correto para o estado em questão, não deixe espaços sobrando entre os digitos ou após, pois o validador pode tentar calcular o espaço extra e reportar erro.

[sygecom]

Olá Laudelino,
Acredito que seja seu ValidaPR que esteja desatualizado, aqui uso o 5.2 de 21/08/2006, mas não lembro de onde baixei.

[Maligno]

Faça o download do site oficial clicando aqui.

[Laudelino Scarmagnani]

Maligno, boa noite!
Já fiz isso. Mesmo assim, a inscrição estadual de Pernambuco não passa.
Continua com problema.
Laudelino

[Maligno]

Fiz o cálculo manualmente e a inscrição "0104244-07" de Pernambuco está correta. No entanto, a consulta à Receita daquele Estado informa como inscrição inválida. Eu uso aquela fórmula oferecida no site do SINTEGRA no meu "validador de documentos". Nele esta inscrição aparece como válida.

Uma sugestão: consulte o site da Receita de PE (aqui), pesquise pelo CNPJ da empresa e use a inscrição que for apresentada (normalmente dão a ficha completa). Mas depois, se puder, nos dê aqui a inscrição que for apresentada. Gostaria de refazer esse cálculo. Se tem algo errado na fórmula, seria bom sabermos. Eu fiz o código de todas as validações na minha biblioteca. Tenho que manter tudo atualizado.

[Laudelino Scarmagnani]

Maligno, está meio esquisito!
No site da receita de PE, que você me passou, se eu consultar o CNPJ, aparece a inscrição estadual que passei anteriormente. Se eu consultar somente com a inscrição estadual, sem preencher o CNPJ, retorna Inscrição inválida. Se eu consultar pela opção de consulta por inscrição estadual, mas informar tambem o CNPJ, retornar a consulta com a inscrição informada. A inscrição é 010424407. Se for o caso, me passe uma forma de como te disponibilizar o CNPJ. Não até onde isso pode ser divulgado.
Então, não sei quando PE mudou a inscrição para 9 digitos, mas se foi de 2006, provavelmente o ValidaPR esteja desatualizado. A versão que tenho é de 29/08/2006. É a ultima atualização que consegui baixar.
Haveria outra saída para envio do arquivo à Receita, pelo Valida?
Laudelino.

[Maligno]

Está mesmo esquisito. Pelo seu relato, me faz crer em erro no site da própria Receita de PE, o que não é de se espantar. Erros acontecem. Agora, quando consulta com os dois números, me parece que eles consultam apenas o CNPJ.

Quanto ao ValidaPR, a última versão é essa mesmo. Mas você pode tentar o validador nacional. Download aqui. É uma tentativa que, se não der certo, só o deixará com uma alternativa: reclamar na Receita Estadual, passando o problema pra eles. E vão ter que dar uma solução.

Não há qualquer problema com divulgação do CNPJ. Até porque há arquivos com esses dados de milhares de empresas, e distribuídos por sites de governos. Mas pode me mandar o CNPJ por MP.

[Laudelino Scarmagnani]

Maligno,
tentei fazer a validação pelo Sintegra. Dá erro em todos os registros. O Lay-out do Valida e do Sintegra são diferentes? Se for, então vou ter que verificar com Receita Estadual como proceder com o ValidaPR
Laudelino

[Maligno]

Realmente, aqui na cidade é praxe usar o ValidaPR, justamente em razão de algumas dispcrepâncias entre os dois programas. Não que o validador nacional esteja errado. Na verdade os dois possuem falhas, mais em função da falta de algumas análises básicas dos documentos. É possível que o validador nacional tenha detectado erros que o ValidaPR deixa passar. Se a coisa ficou pior no validador nacional, continue com o ValidaPR e busque assistência da Receita. Eles vão ter que dar uma solução. Até porque, o erro na análise da IE é óbvia.