Ir para conteúdo
  • Cadastre-se

dev botao

Cancelamento de NFe


Ver Solução Respondido por BigWings,
  • Este tópico foi criado há 1324 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Membros Pro

Boa tarde,

Estou fazendo o cancelamento de NFe, mas estou tendo dúvida sobre o cStat do Retorno.

A nota esta com 48 horas de emissão, então deveria retornar erro, informando que a nota está fora do prazo de cancelamento.

      ACBrNFe.EventoNFe.Evento.Clear;
      with ACBrNFe.EventoNFe.Evento.New do
      begin
        infEvento.chNFe                    := dsNotasSaidas.DataSet.FieldByName('ChaveNFe_NotaSaida_Material').AsString;
        infEvento.detEvento.nProt  := dsNotasSaidas.DataSet.FieldByName('ProtocNFe_NotaSaida_Material').AsString;
        infEvento.CNPJ                     := vCNPJCertificado;
        infEvento.dhEvento               := LerDataHoraAtual;
        infEvento.tpEvento               := teCancelamento;
        infEvento.detEvento.xJust := Justificativa;
      end;

      Retorno := ACBrNFe.EnviarEvento(1);

      vCodRetorno := ACBrNFe.WebServices.Consulta.cStat;
      vRetorno    := IntToStr(ACBrNFe.WebServices.EnvEvento.cStat);

       Retornos:
           Retorno          = true
           vCodRetorno = 100
           vRetorno        = 128   (Lote de Evento Processado: o lote foi processado), quando deveria retornar o cStat 135 (Evento registrado e vinculado a NF-e: recebido...)

Como saber se o procedimento de cancelamento foi efetivado?

Grato pela atenção

Link para o comentário
Compartilhar em outros sites

  • Moderadores
  • Solution
3 minutos atrás, Luiz Carlos de Lima disse:

Como saber se o procedimento de cancelamento foi efetivado?

 

ACBrNFe1.EnviarEvento(nLote);

cStat := ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat;
nProt := ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.nProt;
xMotivo := ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo;

 

  • Curtir 3
Equipe ACBr BigWings
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

 

 

Link para o comentário
Compartilhar em outros sites

  • Consultores

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.

Consultor SAC ACBr

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

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 1324 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • 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.