Ir para conteúdo
  • Cadastre-se

dev botao

  • Este tópico foi criado há 4298 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Postado

Boa tarde pessoal.

 

Procurei em alguns posts do fórum mas não achei nada que pudesse me ajudar. Estou implementando a carta de correção no meu software e está dando o seguinte erro ao executar em modo de produção:

 

TAG:<envEvento xmlns="http://www.portalfiscal.inf.br/nfe" versao="1.00"><evento xmlns="http://www.portalfiscal.inf.br/nfe" versao="1.00"><infEvento Id="ID1101104212110493698000019055001000000613100000613501"><detEvento versao="1.00"> ID:HP20/xCorrecao()

 

O estranho é que em homologação não dá erro nenhum. Abaixo segue o meu código para olharem. Se alguém souber o que pode ser por favor me avise.

 

 

ACBrNFe.EventoNFe.Evento.Clear;
 
with ACBrNFe.EventoNFe.Evento.Add do begin
  infEvento.chNFe               := wChvEvento;
  infEvento.CNPJ                := fRetornaCampoQualquer('TEMPRESA', 'CODEMP', 'CNPEMP', [dstDadosEMPFIL.AsInteger]);
  infEvento.dhEvento            := wDatEvento;
  infEvento.tpEvento            := teCCe;
  infEvento.nSeqEvento          := wSeqEvento;
  infEvento.detEvento.xCorrecao := wCorEvento;
  infEvento.detEvento.xCondUso  := 'A Carta de Correcao e disciplinada pelo paragrafo 1o-A do art. 7o do Convenio S/N, ' +
                                                     'de 15 de dezembro de 1970 e pode ser utilizada para regularizacao de erro ocorrido na emissao de ' +
                                                     'documento fiscal, desde que o erro nao esteja relacionado com: I - as variaveis que determinam o valor ' +
                                                     'do imposto tais como: base de calculo, aliquota, diferenca de preco, quantidade, valor da operacao ou da ' +
                                                     'prestacao; II - a correcao de dados cadastrais que implique mudanca do remetente ou do destinatario; III - ' +
                                                     'a data de emissao ou de saida.';
end;
 
// Envio da carta de correção
if   ACBrNFe.EnviarEventoNFe(1) then begin
     ...
     with TStringList.Create do begin
       Text := ACBrNFe.WebServices.EnvEvento.RetornoWS;
       SaveToFile(wCaminhoNFe + wNroNFeCompleto + '-ProcCartaCorrecao-' + IntToStr(wSeqEvento) + '.xml');
       Free;
     end;
 
  • Moderadores
Postado

De cara eu acho que seu problema está

 

detEvento.xCorrecao := wCorEvento;

infEvento.detEvento.xCondUso  := 'A Carta de Correcao e disciplinada pelo paragrafo 1o-A do art. 7o do Convenio S/N, ' +

 

não deveria estar ao contrario???

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Transparent-02.png
 

 

  • Moderadores
Postado

Você não deve preencher nada em infEvento.detEvento.xCondUso.

 

Tente remodelar sua rotinas utilizando como exemplo a demonstrada nesse artigo: 

http://www.regys.com.br/como-enviar-uma-carta-de-correcao-utilizando-o-acbrnfe/

 

Verifique também se o seu cliente está liberado para trabalhar em modo de produção.

Equipe ACBr

Régys Borges da Silveira

http://www.regys.com.br

certificacao delphicertificacao delphi
  • 2 meses depois ...
Postado

Regys, a linha ACBrNFe1.EventoNFe.Evento.Clear da rotina que enviou está apresentando um erro que a propriedade EventoNfe não foi identificada. Será que está faltando declarar alguma Unit? Ou será atualização de versão?

  • Consultores
Postado

Bom dia Warlen,

 

Eu lhe perguntei se você atualizou também os fontes da pasta PCN2, porque muitos atualizam somente a pasta ACBrNFe2 acreditando que esta atualizando o componente, mas o componente se utilizada de varios outros fontes espalhados em outras pastas.

 

Agora se você fez uma atualização geral, é preciso verificar se o icone do fonte: ACBrNFe.pas que encontra-se na pasta: ...\Fontes\ACBrNFe2 esta com uma bolinha verde, caso contrario apague esse arquivo e baixe-o novamente.

Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / Araraquara-SP

Araraquara - A era dos Trólebus

Postado

Italo, obrigado pelo retorno.

Fui checar o ícone dos fontes e ele está amarelo. Pq ocorre isso? Pois fiz a atualzação da forma que o Régys orientou. Através do Acbrinstall.

Fiz a atualização tbm direto pelo tortoiseSVN Update. E o ícone continua amarelo. O que deve está ocorrendo?

Valeu

  • Consultores
Postado

Boa tarde Warlen,

 

Isso ocorre porque existe uma divergencia entre o fonte que você tem e o que encontra-se no repositório e o Tortoise não é capaz de resolver.

 

Logo, exclua todos os arquivos que por ventura estejam com um triangulo amarelo em seu icone e atualizar através do Tortoise ou ACBrInstall.

Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / Araraquara-SP

Araraquara - A era dos Trólebus

  • 2 semanas depois ...
Postado

Italo,

Fiz o que recomendeu e agora tenho certeza que os arquivos estão atualizados. Porém tenho uma outra mensagem de erro.

"Falha na validação dos dados do Envio do Evento. Validate failed because the document does not contain exactly on root node"

Parece que é um erro de estrutura de XML. Mas se for isso, como pode ter passado no validador e transmitido sem problemas?

 

valeu

  • Este tópico foi criado há 4298 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...