Manifesto NFe Rejeicao: Assinatura difere do calculado

[VagnerCiec]

Ola galera!

Após a ultima atualização do ACBr não consigo manifestar a NFe sempre da

Rejeicao: Assinatura difere do calculado

Em qualquer tipo de manifestação
-Recebimento
-Ciencia
-Desconhecimento

Tenho uma copia do executável compilado de antes de atualizar o ACBr e simplesmente funciona o Manifesto!
FrmPrincipalManifesto.ACBrNFe.EnviarEvento(1);
Com o mesmo certificado digital e com os mesmos SCHEMAS que vem com o ACBr!

Porém mesmo que não consiga fazer o Manifesto com o ACBr atualizado
FrmPrincipalManifesto.ACBrNFe.EnviarEvento(1);
eu consigo fazer a normalmente a operação com o ACBr atualizado
ACBrNFe.DistribuicaoDFePorUltNSU(CUF, CNPJ, inttostr(UNSU));


Sendo assim o certificado digital está funcionando!

Está indo os dois arquivo de evento!
O que devo fazer pra achar o problema pois não teve alteração nenhuma no código foi somente atualizado o ACBr?

1-ped-eve.xml

1-eve.xml

[VagnerCiec]

Só pra complementar!

Segue os arquivos do executável antigo, antes de atualizar o ACBr!

1-eve.xml

2102101517122344693700019055001000005487100005487501-procEventoNFe.xml

1-ped-eve.xml

[Italo Giurizzato Junior]

Bom dia Vagner,

Abra os arquivo *-ped-eve.xml gerado pela aplicação (antes de atualizar o ACBr) e o mesmo arquivo gerado pela aplicação com o ACBr atualizado.

Use o bloco de notas.

Note que o XML gerado através da aplicação com o ACBr atualizado possui espaços em brancos entre as TAGs.

Verifique se existe esta linha:

Configuracoes.Geral.IdentarXML := True

ou se essa propriedade esta com esse valor no Object.

Caso afirmativo favor atribuir o valor False.

[VagnerCiec]

3 horas atrás, Italo Jurisato Junior disse:

Bom dia Vagner,

Abra os arquivo *-ped-eve.xml gerado pela aplicação (antes de atualizar o ACBr) e o mesmo arquivo gerado pela aplicação com o ACBr atualizado.

Use o bloco de notas.

Note que o XML gerado através da aplicação com o ACBr atualizado possui espaços em brancos entre as TAGs.

Verifique se existe esta linha:

Configuracoes.Geral.IdentarXML := True

ou se essa propriedade esta com esse valor no Object.

Caso afirmativo favor atribuir o valor False.

Boa tarde Italo!

Realmente a opção estava marcada, porém verificando os logs ela já estava marcada antes!
Mas graças a você resolvi, eu nunca iria pesar em meche ali porque desde o inicio do projeto eu já marquei aquela opção!

Usando o Bloco de notas eu não consegui ver a diferença de espaços, utilizei o Notepad++ ai sim consegui ver 
Configuracoes.Geral.IdentarXML := False                                                                        Configuracoes.Geral.IdentarXML := True

 

Beleza!
Esse ta resolvido!
Agora tem mas uma duvida sobre o mesmo assunto!

[VagnerCiec]

Após manifestar a nota aparece a seguinte mensagem


Notei que que o ACBr monta a mensagem conforme teria que a aparecer!

aMsg := Format(ACBrStr('Versão Layout: %s ' + LineBreak +
                         'Ambiente: %s ' + LineBreak +
                         'Versão Aplicativo: %s ' + LineBreak +
                         'Status Código: %s ' + LineBreak +
                         'Status Descrição: %s ' + LineBreak),
                 [FEventoRetorno.versao, TpAmbToStr(FEventoRetorno.tpAmb),
                  FEventoRetorno.verAplic, IntToStr(FEventoRetorno.cStat),
                  FEventoRetorno.xMotivo]);

Porém não retorna o xMotivo, mas até onde eu vi está programado para aparecer!
Logo fui nas propriedades e não consegui identificar o porque o motivo não aparece!

Pois aparecendo o motivo e mas interessante para a pessoa que está vendo e até mesmo pra mim, pra não ser necessário abrir o XML!

Qual o processo para que o xMotivo apareça?

[Italo Giurizzato Junior]

Boa tarde Vagner,

Você tem certeza que o conteúdo de xMotivo não é mostrado?

[VagnerCiec]

1 hora atrás, Italo Jurisato Junior disse:

Boa tarde Vagner,

Você tem certeza que o conteúdo de xMotivo não é mostrado?

Sim, tenho certeza

Essa e a mensagem completa!
Deveria mostrar o Xmotivo ai, conforme o codigo do ACBr manda, mas não aparece!

[Italo Giurizzato Junior]

Boa noite Vagner,

Referente a imagem que você postou, o conteúdo de xMotivo é apresentado na linha cujo titulo é: Status Descrição, ou seja, Lote de evento processado esse é o conteúdo de xMotivo.

[VagnerCiec]

7 minutos atrás, Italo Jurisato Junior disse:

Boa noite Vagner,

Referente a imagem que você postou, o conteúdo de xMotivo é apresentado na linha cujo titulo é: Status Descrição, ou seja, Lote de evento processado esse é o conteúdo de xMotivo.

Boa noite chefe!
Eu esperava que ele mostrasse o xMotivo da tag InfEvento por isso disse que não mostrava!
Porque de qualquer forma o evento vai ser processado, e dessa forma o usuario não sabe o que aconteceu!
Se foi vinculado
Se tem duplicidade
Ou seja o que for
Processado vai ser sempre!

 

Seria possivel fazer com que a mensagem saia os dois xMotivo e o XEvento para que o usuário tenha mas comodidade e saiba o que realmente aconteceu?
 

<xMotivo>Lote de evento processado</xMotivo>
<xMotivo>Evento registrado e vinculado a NF-e</xMotivo>
<xEvento>Ciencia da Operacao</xEvento>

Se tiver como eu fazer por aqui eu gostaria de saber!
Ou se você pode fazer por ai e disponibilizar no SVN!

1-eve.xml

Eu percebi como funciona!
Porém se eu adicionar aqui, quando atualizar o ACBr vai apagar o que eu fiz!

Todo e qualquer usuário acha bom ver o que aconteceu!
Adicionando essas três linhas ficaria melhor do que ja ta!
 

<xMotivo>Lote de evento processado</xMotivo>
InfEvento
<xMotivo>Evento registrado e vinculado a NF-e</xMotivo>
<xEvento>Ciencia da Operacao</xEvento>
InfEvento

[Italo Giurizzato Junior]

Vagner,

Na sua aplicação tente da seguinte forma para obter as informações dentro do grupo <infEvento>:

xMotivo := ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[ x ].RetInfEvento.xMotivo;

xEvento := ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[ x ].RetInfEvento.xEvento;

dhRegistro := ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[ x ].RetInfEvento.dhRegEvento;

nProtocolo := ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[ x ].RetInfEvento.nProt;