Página 1 de 1
GNRE juntamente com a NFE
Enviado: 28 Fev 2014 16:32
por runner
Olá, Amigos.
Estou analisando todo o processo da geração da GNRE ( Guia Nacional de Recolhimento de Tributos Estaduais ), e na pratica o processo e interligado a geração da NFe em alguns casos, como os estados já estão disponibilizando o processo com webservice, gostaria de saber se alguém já esta mexendo com isso e se tem algum material para complementar.
GNRE juntamente com a NFE
Enviado: 03 Mar 2014 22:56
por sygecom
runner escreveu:Olá, Amigos.
Estou analisando todo o processo da geração da GNRE ( Guia Nacional de Recolhimento de Tributos Estaduais ), e na pratica o processo e interligado a geração da NFe em alguns casos, como os estados já estão disponibilizando o processo com webservice, gostaria de saber se alguém já esta mexendo com isso e se tem algum material para complementar.
Runner, quais estados ? achei apenas do PE e RJ
GNRE juntamente com a NFE
Enviado: 02 Jun 2014 17:41
por pedrocordista
Eu estou desenvolvendo o projeto GNRE, para cada estado existe suas regras, mas eu empaquei num erro
que não consigo descobrir, nem por reza braba
Código: Selecionar todos
TRY
signedKey := xmldsig:sign(dsigKey, 2) // <---- se eu tiro o TRY surge este erro
//E/10-7 Erro nos parƒmetros: SIGN [ERRO DOS -2147352562 ]
CATCH
aRetorno[1 ] := .F.
MSGPOSTIT("Erro : ao criar da chave do CSP.",;
"Consulta as Regras Estaduais","LOGO_PGL",nil,RED,1000)
oDomDoc:= nil
XMLDSIG:= NIL
RETURN(aRetorno)
END
if (signedKey <> nil)
XMLAssinado := oDOMDoc:xml
XMLAssinado := STRTRAN( XMLAssinado, CHR(10), '' )
XMLAssinado := STRTRAN( XMLAssinado, CHR(13), '' )
PosIni := AT('<SignatureValue>',XMLAssinado)+len('<SignatureValue>')
XMLAssinado := SUBS(XMLAssinado,1,PosIni-1)+;
STRTRAN( SUBS(XMLAssinado,PosIni,len(XMLAssinado)), ' ', '' )
PosIni := AT('<X509Certificate>',XMLAssinado)-1
nP = AT('<X509Certificate>',XMLAssinado)
nResult := 0
DO WHILE nP<>0
nResult := nP
nP = AT('<X509Certificate>',XMLAssinado) //,nP+1)
ENDDO
PosFim := nResult
* MEMOWRIT('35canc5.xml',XMLAssinado,.F.)
XMLAssinado := SUBS(XMLAssinado,1,PosIni)+;
SUBS(XMLAssinado,PosFim,len(XMLAssinado))
* MEMOWRIT('35canc6.xml',XMLAssinado,.F.)
Obrigado
Harbour+minigui(2.3.0)+bcc5