Dúvidas Sobre Comprovante de entrega na NF-e

[Jhonlenon Ribeiro]

Bom dia, estou tentando enviar o comprovante de entrega de NF-e e me retorna a seguinte mensagem: 

Erro: Falha na validação da Mensagem do Evento: Schema do Evento não foi definido

Meu ACBr está atualizado e o schemas também...alguém já passou por esse problema?

[Juliana Tamizou]

Boa tarde.

O mesmo ocorre no demo?

Att.

[CALS]

Boa tarde!

Quanto ao envio do comprovante de entrega da NFe não tive problemas, porém estou tendo problemas com o cancelamento do comprovante de entrega sempre me retorna o mensagem:

Falha na validação dos dados do Evento: 'Cancelamento do Comprovante de Entrega da NF-e' violates enumeration constraint of 'Cancelamento Comprovante de Entrega da NF-e'.
The element '{http://www.portalfiscal.inf.br/nfe}descEvento' with value 'Cancelamento do Comprovante de Entrega da NF-e' failed to parse.
 

Já preenchi a tag descEvento com conteúdo "Cancelamento Comprovante de Entrega da NF-e", "Cancelamento do Comprovante de Entrega da NF-e", ou deixei sem atribuição, pois o ACBR atribui o padrão, mas mesmo assim tenho esse retorno de erro.

Eu estou com o ACBR e Schemas atualizados, e no Demo da NFe no ACBR não está tratando o evento de comprovante de entrega.

O que mais posso fazer ou onde estou errando?

[Jhonlenon Ribeiro]

Talves pode ser algum erro no meu código...eu fiz baseado no comprovante de entrega do CT-e que deu certo....

   DM.AtualizaConfigAcBr;//--------Carrega as COnfigurações do componente ACBrNF-e
   DM.BUSCAR_DADOS_LOJA;
   DM.ACBrNFe1.NotasFiscais.Clear;
   DM.ACBrNFe1.NotasFiscais.LoadFromString(QryXMLNFeXmlNfe.AsString,False);
   DM.ACBrNFe1.NotasFiscais.Count;

   DM.EVENTO_NFe := 'Comprovante de Entrega Eletrônico';

   VALIDA_ERRO  :='';
   try
     iLote := 0;
     DM.ACBrNFe1.EventoNFe.Evento.Clear;
     with DM.ACBrNFe1.EventoNFe.Evento.New do
      begin
        infEvento.nSeqEvento                  := 1;
        infEvento.chNFe                       := txt_chave_nfe.Text;
        infEvento.CNPJ                        := DM.CNPJ_EMPRESA;
        infEvento.dhEvento                    := now;
        infEvento.tpEvento                    := teComprEntrega;

        infEvento.detEvento.nProt             := DM.ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.nProt;
        infEvento.detEvento.dhEntrega         := (txt_dataemissao.Date + txt_hora.Time);
        infEvento.detEvento.nDoc              := Trim(txt_documento.Text);
        infEvento.detEvento.xNome             := Trim(txt_nome.Text);
        infEvento.detEvento.hashComprovante   := CalcularHashArquivo(EdtLocal.Text, infEvento.chNFe);
        infEvento.detEvento.dhHashComprovante := Now;
     end;
     iLote := 1; // Numero do Lote do Evento
     DM.ACBrNFe1.EnviarEvento(iLote);
   Except
     on E: Exception do
     begin
        VALIDA_ERRO := 'SIM';
        if Application.MessageBox(pChar('Erro: ' + E.Message),'SYSPDV', MB_OK) = IDOK then
        Abort;
     end;
   end;

Editado 17 Junho, 2021 por JHONLENON

[Antonio Carlos L]

Não haveria relação com esse post :

 

 

[BigWings]

15 minutos atrás, JHONLENON disse:

        infEvento.tpEvento                    := teComprEntrega;

Creio que o tipo correto seja teComprEntregaNFe.

[Dirley Brito]

Assim funcionou para mim, ainda não terminei a implementação

         with ACBrNFe1.EventoNFe.Evento.New do
         begin
              InfEvento.cOrgao          := 91;
              infEvento.nSeqEvento      := 1;
              infEvento.chNFe           :=
              infEvento.CNPJ            := 
              infEvento.dhEvento        := 
              infEvento.tpEvento        := teComprEntregaNFe;
              infEvento.detEvento.dhEntrega     := 
              infEvento.detEvento.nDoc          := 
              infEvento.detEvento.xNome         := 
              infEvento.detEvento.hashComprovante   := 
              infEvento.detEvento.dhHashComprovante := 
              infEvento.detEvento.verAplic := '1.00';
              infEvento.detEvento.versao := '4.00';
              infEvento.detEvento.cOrgaoAutor := 
         end;

[Jhonlenon Ribeiro]

BigWings fiz a alteração do teComprEntrega para teComprEntregaNFe ai deu esse erro agora

 

Erro: Falha na validação dos dados do Evento: 1824 - Element '{http://www.portalfiscal.inf.br/nfe}verAplic': '' is not a valid value of the atomic type '{http://www.portalfiscal.inf.br/nfe}TVerAplic'.
 

[Jhonlenon Ribeiro]

Agora estou com esse erro...

 

Erro: Falha na validação dos dados do Evento: 1824 - Element '{http://www.portalfiscal.inf.br/nfe}cOrgaoAutor': '0' is not a valid value of the atomic type '{http://www.portalfiscal.inf.br/nfe}TCOrgaoIBGE'.
 

[Jhonlenon Ribeiro]

Eu consegui resolver....pode encerrar o topico.

 infEvento.detEvento.cOrgaoAutor       := 43 //--------Aqui passei o codigo da UF emitente

[BigWings]

Obrigado por reportar.

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