Ainda Erro Na Nota De Estancia Velha (Provedor Tecnos)

[danielpohren]

Bom dia.

Estou apanhando muito deste provedor...

 

Copiei para a minha pasta de schemas o conteudo da pasta "abrasf1" e o conteudo da pasta "tecnos", ficando entao minha pasta com 2 arquivos. Acredito que estou com os schemas corretos.

 

Debugando vi que foi selecionado o provedor tecnos corretamente...

 

Ao enviar a nota, é disparada a exception da unit AcbrNFSEUtil linha 755:

    Não foi possível carregar o arquivo: <Rps xmlns="http://www.nfse-tecnos.com.br/nfse.xsd"><tcDeclaracaoPrestacaoServico><InfDeclaracaoPrestacaoServico><Rps Id="12014011424640001030000000000000134"><IdentificacaoRps><Numero>1</Numero><Serie>UNICA</Serie><Tipo>1</Tipo></IdentificacaoRps><DataEmissao>2014-01-16T00:00:00</DataEmissao><Status>1</Status><Signature xmlns="http://www.w3.org/2000/09/xmldsig#" Id="Ass_12014011424640001030000000000000134"><SignedInfo><CanonicalizationMethod Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315" /><SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1" /><Reference URI="#12014011424640001030000000000000134"><Transforms><Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature" /><Transform Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315" /></Transforms><DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" /><DigestValue></DigestValue></Reference></SignedInfo><SignatureValue></SignatureValue><KeyInfo><X509Data><X509Certificate></X509Certificate></X509Data></KeyInfo></Signature></Rps>

 

 

No inicio da Function AssinarXML, primeira linha, o valor da variavel AXML está:

<Rps xmlns="http://www.nfse-tecnos.com.br/nfse.xsd"><tcDeclaracaoPrestacaoServico><InfDeclaracaoPrestacaoServico><Rps Id="12014011424640001030000000000000134"><IdentificacaoRps><Numero>1</Numero><Serie>UNICA</Serie><Tipo>1</Tipo></IdentificacaoRps><DataEmissao>2014-01-16T00:00:00</DataEmissao><Status>1</Status></Rps><IdCidade>4307609</IdCidade><Competencia>2014-01-16T00:00:00</Competencia><Servico><tcDadosServico><Valores><ValorServicos>100.00</ValorServicos><ValorPis>0.00</ValorPis><ValorCofins>0.00</ValorCofins><ValorInss>0.00</ValorInss><ValorIr>0.00</ValorIr><ValorCsll>0.00</ValorCsll><ValorIss>2.00</ValorIss><BaseCalculo>100.00</BaseCalculo><Aliquota>0.02</Aliquota><DescontoIncondicionado>0.00</DescontoIncondicionado><DescontoCondicionado>0.00</DescontoCondicionado></Valores><IssRetido>2</IssRetido><ItemListaServico>104</ItemListaServico><CodigoCnae>6920601</CodigoCnae><CodigoTributacaoMunicipio>6</CodigoTributacaoMunicipio><Discriminacao>MAO DE OBRA - R$ 100,00;</Discriminacao><CodigoMunicipio>4307609</CodigoMunicipio><ExigibilidadeISS>1</ExigibilidadeISS></tcDadosServico></Servico><Prestador><CpfCnpj><Cnpj>01142464000103</Cnpj></CpfCnpj><InscricaoMunicipal>20119/5614</InscricaoMunicipal></Prestador><Tomador><IdentificacaoTomador><CpfCnpj><Cnpj>91697052000114</Cnpj></CpfCnpj></IdentificacaoTomador><RazaoSocial>JH COUROS E PELES LTDA</RazaoSocial><Endereco><Endereco>R. CARLOS AFONSO BRAUNGER</Endereco><Numero>450</Numero><Bairro>SANTO AFONSO</Bairro><CodigoMunicipio>4307609</CodigoMunicipio><Uf>RS</Uf><Cep>93600000</Cep></Endereco><Contato><Telefone>35846000</Telefone><Email>[email protected]</Email></Contato></Tomador><NaturezaOperacao>1</NaturezaOperacao><OptanteSimplesNacional>1</OptanteSimplesNacional><IncentivoFiscal>2</IncentivoFiscal></InfDeclaracaoPrestacaoServico></tcDeclaracaoPrestacaoServico></Rps>

 

 

Notei que na linha 727:

 

            AXML := copy(AXML, 1, pos('</Rps>', AXML) - 1);

 

 

É capado fora da variavel AXML todo o conteudo da nota (prestador, tomador, serviço) ficando apenas o cabeçalho dela

 

<Rps xmlns="http://www.nfse-tecnos.com.br/nfse.xsd"><tcDeclaracaoPrestacaoServico><InfDeclaracaoPrestacaoServico><Rps Id="12014011424640001030000000000000134"><IdentificacaoRps><Numero>1</Numero><Serie>UNICA</Serie><Tipo>1</Tipo></IdentificacaoRps><DataEmissao>2014-01-16T00:00:00</DataEmissao><Status>1</Status>

 

Ficando daí como no erro apresentado acima, apenas o cabeçalho e a assinatura....

 

 

Please, onde estou errando?

 

Obrigado!

 

 

 

[Italo Giurizzato Junior]

Boa noite Daniel,

 

Favor atualizar os fontes e testar novamente.

[danielpohren]

Bom dia!

Fontes atualizados, apresentou o mesmo comportamento, a variavel aXML ao final do processo apresenta apenas o header e a assinatura....

 O Copy da linha 726 do acbrnfseutils.pas tira fora tudo que vem depois da tag <Status>1</Status>

 

[Italo Giurizzato Junior]

Bom dia Daniel,

 

Favor atualizar os fontes e testar novamente usando a opção [Gerar e Enviar Lote] do programa exemplo.

[danielpohren]

Bom dia!

Atualizando o status desta, tinha dado erro na hora de baixar o NFSEUtils.pas agora estou com ele correto aqui, então não está mais apresentando o erro descrito anteriormente de apagar parte do XML.

 

Agora o que me acontece é ao mandar o arquivo para homologação receber o retorno:

 

Erro Código E0800 - Sequencia de entrada nao estava em um formato incorreto

 

Alguém sabe o que é este erro?

 

Muito obrigado!

[danielpohren]

Italo, postei esta resposta anterior antes de ver a sua, favor desconsiderar...

Vou fazer o teste e ponho o resultado aqui

 

Obrigado!

[danielpohren]

Bom dia!

Testei neste botão do programa demo, e tive o seguinte retorno:

 

---------------------------

Demo_acbrnfse

---------------------------

Código Erro : E0800

Mensagem... : Sequencia de entrada nao estava em um formato incorreto. -

Correção... : Erro no processamento do envio

Provedor... : Tecnos

 

---------------------------

OK   

---------------------------

[Rafael Müler]

Bom dia Daniel,

 

Estou fazendo alguns testes no mesmo provedor, e no início me retornava o erro exatamente como o seu. Então li o tópico e segui o conselho do Ítalo e usei o teste que consta nos exemplos do ACBRNFSE, e lá esse erro não acontece, passou e agora estou resolvendo outros ajustes.

 

Então sugiro que use realmente o teste como está lá, pois é algum campo do teu xml faltando provavelmente

 

exemplo: pra mim faltava informar      

 

Servico.CodigoPais := 1058; // Brasil

Servico.MunicipioIncidencia := StrToIntDef(edtCodCidade.Text, 0);

 

fui comparando o xml que era gerado por mim e o que o exemplo gerava, até o erro sumir

[danielpohren]

Beleza, vou atualizar os meus fontes dos exemplos e tentar de novo.

Obrigado!

[Rodrigo Crovador]

 

Bom dia!

Testei neste botão do programa demo, e tive o seguinte retorno:

 

---------------------------

Demo_acbrnfse

---------------------------

Código Erro : E0800

Mensagem... : Sequencia de entrada nao estava em um formato incorreto. -

Correção... : Erro no processamento do envio

Provedor... : Tecnos

 

---------------------------

OK   

---------------------------

 

 

Daniel, observei que há uma barra "/" em sua inscrição municipal. Envie apenas números.

Editado 13 Fevereiro, 2014 por Rodrigo Crovador