Inconsistência de dados no retorno da consulta do MDF-e

[Juliano Do Amaral Chaves]

Olá

 

Estou implementando a consulta do MDF-e através da chaveMDF-e, no entanto percebi um inconsistência nos dados retornado quando o MDF-e está cancelado, caso o MDF-e esteja autorizado ou encerrado o retorno esta correto, mas quando esta cancelado está havendo inconsistência, segue abaixo exemplificação do problema:

Estou pegado os dados da seguinte forma:

    // DADOS DE AUTORIZAÇÃO DE ENVIO DO MDFE
    // Aqui é que está o problema, pois quando a consulta é de um MDF-e autorizado ou encerrado, os dados retornando é da Autorização, porem se a consulta é de uma MDF-e cancelado o
    retorno é do evento de cancelamento e não da autorização de envio

    Protocolo :=                      ACBrMDFe.WebServices.Consulta.Protocolo;
    DtAutorizacao :=              ACBrMDFe.WebServices.Consulta.DhRecbto;


    // DADOS DE AUTORIZAÇÃO DO EVENTO DO MDFE QUE PODE SER DE ENCERRAMENTO OU CANCELAMENTO DEPENDO DO STATUS
   // Aqui retorna perfeitamente tanto para MDF-e encerrado quanto para cancelado

    ProtocoloEvento :=          ACBrMDFe.WebServices.Consulta.procEventoMDFe.Items[0].RetEventoMDFe.retEvento.Items[0].RetInfEvento.nProt;
    DtAutorizacaoEvento :=  ACBrMDFe.WebServices.Consulta.procEventoMDFe.Items[0].RetEventoMDFe.retEvento.Items[0].RetInfEvento.dhRegEvento;Cancelado)
    Justificativa :=                  ACBrMDFe.WebServices.Consulta.procEventoMDFe.Items[0].RetEventoMDFe.InfEvento.DetEvento.xJust;

     // Acredito que ficaria mais legível se as propriedades básicas do retorno do evento fossem encapsulados diretamente na consulta, por exemplo
     "ACBrMDFe.WebServices.Consulta.RetEvento.nProt", caso seja necessário pegar outras informações do evento poderia ser feito por "ACBrMDFe.WebServices.Consulta.DetEvento", porem é
     só uma sugestão

    

 

[Juliano Do Amaral Chaves]

Observação, o fórum poderia ter um botão para visualizar o tópico antes de salvar, ou aumentar o tempo para alteração,  pois tentei melhorar a apresentação do texto e incluir as imagens e não consegui, se tivesse um botão de excluir eu teria excluído e feito novamente, pois como ninguém tinha respondido ainda, não vi motivos para colocar tantas restrições

Editado 24 Junho, 2019 por Juliano Do Amaral Chaves
Melhor visualização

[Juliano Do Amaral Chaves]

Para corrigir o problema fiz as seguintes alterações no ACBr:

1) No arquivo "pmdfeRetConsSitMDFe.pas" na função "TRetConsSitMDFe.LerXml" alterei a condição:

   de:      if FcStat in [100, 132] then
   para:  if FcStat in [100, 101, 132] then

Ou seja, se o MDF-e estiver cancelado, carrega os do protocolo de autorização para o objeto "protMDFe", isso porque acredito que para cancelar um MDF-e ele precisa estar autorizado.

2) No arquivo "ACBrMDFeWebServices.pas" na função "TMDFeConsulta.TratarResposta" fiz a seguintes alterações

  Removi a variavel: "MDFCancelado"

  Removi a linha: "MDFCancelado := False;"

  Removi o bloco:

      if retEvento.Items[J].RetInfEvento.tpEvento = teCancelamento then
        begin
          MDFCancelado := True;
          FProtocolo := retEvento.Items[J].RetInfEvento.nProt;
          FDhRecbto := retEvento.Items[J].RetInfEvento.dhRegEvento;
          FPMsg := retEvento.Items[J].RetInfEvento.xMotivo;
        end;

  Alterei a condição:
    
    De: if (not MDFCancelado) and (NaoEstaVazio(MDFeRetorno.protMDFe.nProt))  then
    
    Para: if (NaoEstaVazio(MDFeRetorno.protMDFe.nProt))  then


Essas alterações faz com que o retorno das propriedades "ACBrMDFe.WebServices.Consulta.Protocolo" e "ACBrMDFe.WebServices.Consulta.DhRecbto" retorne os dados do protocolo de autorização e não do protocolo do evento de cancelamento

Vou anexar o patch

 

 

MDF-e Consulta Protocolo de Autorização.patch

[Juliano Do Amaral Chaves]

Para efeito de confirmação da alteração feita, segue em anexo os dados do XML de retorno da consulta do MDF-e Cancelado

[Juliana Tamizou]

Bom dia.

Por favor anexe os fontes alterados.

Att.

[Juliano Do Amaral Chaves]

3 horas atrás, Juliana Tamizou disse:

Bom dia.

Por favor anexe os fontes alterados.

Att.

Bom dia

Segue em anexo

Att

pmdfeRetConsSitMDFe.pas ACBrMDFeWebServices.pas

[Juliana Tamizou]

Boa tarde.

Obrigada pela análise, alteração adicionada para validação.

Att.

[Italo Giurizzato Junior]

Bom dia Juliano,

Estou analisando as suas alterações, caso estejam tudo OK, enviarei para o repositório.

[Juliano Do Amaral Chaves]

2 minutos atrás, Italo Jurisato Junior disse:

Bom dia Juliano,

Estou analisando as suas alterações, caso estejam tudo OK, enviarei para o repositório.

Bom dia

Muito obrigado pela atenção

Fico no aguardo

[Italo Giurizzato Junior]

Bom dia Juliano,

A rotina de tratamento de resposta da consulta que você alterou no ACBrMDFeWebServices é a mesma na NF-e e CT-e.

Note que podemos dividir o XML de retorno a consulta em 3 partes.

Na primeira temos a situação atual do documento que segundo o seu exemplo acusa que o mesmo esta cancelado.

Na segunda temos o grupo <protMDFe> que contem as informações referente ao protocolo de autorização.

A terceira parte só vai constar se o MDF-e possuir eventos vinculados a ele, logo podemos ter uma lista, ou seja, o grupo <procEventoMDFe> pode aparecer diversas vezes.

No seu exemplo como o MDF-e foi cancelado temos apenas um evento que é o de cancelamento e suas informações estão dentro do grupo mencionando acima.

Pela rotina atual temos o seguinte:

// Na linha abaixo temos o protocolo da situação atual do MDFe,
// esse protocolo pode ser de autorização ou de cancelamento ou de encerramento
numProtAtual := ACBrMDFe1.WebServices.Consulta.Protocolo;

// Na linha abaixo temos o protocolo de autorização
numProtAutor := ACBrMDFe1.WebServices.Consulta.protMDFe.nProt;

// Abaixo temos um loop onde temos o numero do protocolo dos eventos vinculados ao MDFe
  for i := 0 to ACBrMDFe1.WebServices.Consulta.procEventoMDFe.Count -1 do
    numProtEvento[ i ] := ACBrMDFe1.WebServices.Consulta.procEventoMDFe.Items[ i ].RetEventoMDFe.retEvento.Items[0].RetInfEvento.nProt;

No meu entendimento ao realizar a consulta, dependendo do que deseja você vai ter que escolher uma das 3 formas acima para obter o numero do protocolo (por exemplo).

[Juliano Do Amaral Chaves]

9 horas atrás, Italo Jurisato Junior disse:

Bom dia Juliano,

A rotina de tratamento de resposta da consulta que você alterou no ACBrMDFeWebServices é a mesma na NF-e e CT-e.

Note que podemos dividir o XML de retorno a consulta em 3 partes.

Na primeira temos a situação atual do documento que segundo o seu exemplo acusa que o mesmo esta cancelado.

Na segunda temos o grupo <protMDFe> que contem as informações referente ao protocolo de autorização.

A terceira parte só vai constar se o MDF-e possuir eventos vinculados a ele, logo podemos ter uma lista, ou seja, o grupo <procEventoMDFe> pode aparecer diversas vezes.

No seu exemplo como o MDF-e foi cancelado temos apenas um evento que é o de cancelamento e suas informações estão dentro do grupo mencionando acima.

Pela rotina atual temos o seguinte:

// Na linha abaixo temos o protocolo da situação atual do MDFe,
// esse protocolo pode ser de autorização ou de cancelamento ou de encerramento
numProtAtual := ACBrMDFe1.WebServices.Consulta.Protocolo;

// Na linha abaixo temos o protocolo de autorização
numProtAutor := ACBrMDFe1.WebServices.Consulta.protMDFe.nProt;

// Abaixo temos um loop onde temos o numero do protocolo dos eventos vinculados ao MDFe
  for i := 0 to ACBrMDFe1.WebServices.Consulta.procEventoMDFe.Count -1 do
    numProtEvento[ i ] := ACBrMDFe1.WebServices.Consulta.procEventoMDFe.Items[ i ].RetEventoMDFe.retEvento.Items[0].RetInfEvento.nProt;

No meu entendimento ao realizar a consulta, dependendo do que deseja você vai ter que escolher uma das 3 formas acima para obter o numero do protocolo (por exemplo).

Boa noite

Entendi, mas neste caso então no caso do MDF-e encerrado está retornando errado, pois esta retornando o protocolo de autorização e não do encerramento,  veja as imagens do debug que postei quando abrir o tópico 
Foi por isso que achei que a propriedade ACBrMDFe1.WebServices.Consulta.Protocolo teria que retornar o protocolo de autorização, achei inconsistente

MDF-e Encerrado : numProtAutor := ACBrMDFe1.WebServices.Consulta.Protocolo;
MDF-e Cancelado: numProtAtual := ACBrMDFe1.WebServices.Consulta.Protocolo;

Da forma que você falou o correto seria:

MDF-e Encerrado : numProtAtual := ACBrMDFe1.WebServices.Consulta.Protocolo;
MDF-e Cancelado: numProtAtual := ACBrMDFe1.WebServices.Consulta.Protocolo ;

De qualquer forma obrigado pela explicação, pois acredito que muito devem se confundir com o esse retorno

[Italo Giurizzato Junior]

Bom dia Juliano,

Por favor anexe o retorno da consulta de um MDF-e apenas autorizado, um outro que foi cancelado e por fim de outro que foi encerrado para que eu possa analisar como esta vindo esses retornos.

[Juliano Do Amaral Chaves]

Em 05/07/2019 at 08:35, Italo Jurisato Junior disse:

Bom dia Juliano,

Por favor anexe o retorno da consulta de um MDF-e apenas autorizado, um outro que foi cancelado e por fim de outro que foi encerrado para que eu possa analisar como esta vindo esses retornos.

Bom dia

Segue em anexo os arquivos solicitados

Autorizado.xml Cancelado.xml Encerrado.xml

[Italo Giurizzato Junior]

Boa tarde Juliano,

Favor atualizar os fontes, fiz um tratamento para os MDF-e que foram encerrados.

[Juliano Do Amaral Chaves]

2 horas atrás, Italo Jurisato Junior disse:

Boa tarde Juliano,

Favor atualizar os fontes, fiz um tratamento para os MDF-e que foram encerrados.

Boa tarde

Vi a alteração que você fez, desta forma não vai mais ter inconsistência e propriedade "ACBrMDFe1.WebServices.Consulta.Protocolo" sempre vai retornar o protocolo atual considerando o evento atual ou no caso de não haver evento retorna o protocolo de autorização.

Ainda não testei, mas acredito que vai funcionar

Por mim pode fechar o tópico

Muito Obrigado

[Italo Giurizzato Junior]

Obrigado por reportar.

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