Consulta Do Mdf-E

[Command Perfect]

Boa tarde,

Estou fazendo uma consulta em um MDF-e e está sempre retornando o mesmo cStat “104 - Arquivo processado” e não volto para o cStat “100 - Autorizado o uso do MDF-e”.

 

Está parecendo que o governo não está processando a solicitação. Já fiz o debug e vi que o componente está atualizado. Conforme faq do MDFe em ambiente de homologação o tempo de processamento máximo é de 3 minutos (https://mdfe-portal.sefaz.rs.gov.br/Site/Faq), mais no meu caso já passou de 1 hora.

Os componentes do ACBR já está atualizado até a data e hora desta mensagem.

Informações adicionais

Ambiente: Homologação

Versão do documento fiscal: 100

 

A consulta está sendo realizada desta maneira (uma parte do código).

ACBrMDFe1.WebServices.Recibo.Recibo := aux;

ACBrMDFe1.WebServices.Recibo.Executar;

 

O retorno está sendo testado recuperado desta maneira (uma parte do código).

ACBrMDFe1.WebServices.Recibo.cStat;

 

Está correto a maneira que está sendo recuperada e consultada o MDFe?

Tem outra maneira de realizar a consulta ou testar o retorno?

 

Obrigado.

[Italo Giurizzato Junior]

Boa tarde,

 

Desta forma:

 

sStatus := ACBrMDFe1.WebServices.Recibo.cStat;

 

​você obtêm o status do processamento lote ou seja se ele foi processado ou não.

 

Agora desta outra forma:

 

sStatus  := IntToStr(ACBrMDFe1.WebServices.Retorno.MDFeRetorno.ProtMDFe.Items[0].cStat);

 

Você tem o status do MDF-e, ou seja se ele foi autorizado ou não.

[Command Perfect]

Boa tarde, obrigado por responder, 

 

Depois de consultar esta propriedade não está estanciada.

sStatus  := IntToStr(ACBrMDFe1.WebServices.Retorno.MDFeRetorno.ProtMDFe.Items[0].cStat);

 

Estou fazendo assim 

         ACBrMDFe1.WebServices.Recibo.Recibo := NrRecibo;

         ACBrMDFe1.WebServices.Recibo.Executar;

         sStatus  := IntToStr(ACBrMDFe1.WebServices.Retorno.MDFeRetorno.ProtMDFe.Items[0].cStat);

 

Está correto?

[Italo Giurizzato Junior]

Sim,

 

esta correto, estranho não estar estanciada, peguei essa linha da minha aplicação.

[Juliomar Marchetti]

Apos atualizar voce recompilou os componentes do acbr?

[Command Perfect]

Sim e ainda continuo com o problema. Tanto é que eu faço o Degub no ACBrMDFeWebServices no método TMDFeRecibo.Executar.

Na propriedade FMDFeRetorno.Leitor.Arquivo := FRetWS; é retornado.

 

<retConsReciMDFe versao="1.00" xmlns="http://www.portalfiscal.inf.br/mdfe">

<tpAmb>2</tpAmb>

<verAplic>RS20140627154804</verAplic>

<nRec>419000000849099</nRec>

<cStat>104</cStat>

<xMotivo>Arquivo processado</xMotivo>

<cUF>41</cUF>

<protMDFe versao="1.00">

<infProt Id="MDFe040720141114370780">

<tpAmb>2</tpAmb>

<verAplic>RS20140627154804</verAplic>

<chMDFe>41140700669977000104580010000000261108953686</chMDFe>

<dhRecbto>2014-07-04T11:14:37</dhRecbto>

<digVal>lymUtXLc5ofajSLqb5ioaCpt9z8=</digVal>

<cStat>580</cStat>

<xMotivo>Rejeicao: Falha no Schema XML especifico para o modal</xMotivo>

</infProt>

</protMDFe>

</retConsReciMDFe>

 

No método MDFeRetorno.LerXML; é Adicionado ProtMDFe.Add no while normal.

 

Em seguida depois da consulta na janela Watch List 

ACBrMDFe1.WebServices.Retorno.MDFeRetorno = nil 

 

Alguma sugestão?

Se alguém tem Skype é tem disponibilidade podemos conversar e apresentar o que está acontecendo.

 

Fico no aguardo.

[Italo Giurizzato Junior]

Bom dia,

 

Post como anexo o XML que foi enviado.

[Command Perfect]

Segue em anexo

41140700669977000104580010000000261108953686-mdfe.xml

[Italo Giurizzato Junior]

O componente esta configurado para a versão 1.00a?

 

Você esta os schemas mais atuais que contemplam a nova versão da estrutura do XML?

 

Segundo a Nota Técnica 2013/004 versão 1.00a de Outubro/2014 (página 105) esta faltando dentro do grupo <rodo> as TAGs: tpRod, tpCar e UF.

[Command Perfect]

Os componentes está configurado para a versão 1.00.

conforme disponibilidade do serviço no site https://mdfe-portal.sefaz.rs.gov.br/Site/Servicos

 

O problema do schema eu também pensei que poderia ser isso então copiei do 

..\Exemplos\ACBrMDFe\Delphi\Schemas\

 

As TAG está informada mais não está indo no xml.

Percebi que a unit pmdfeMDFeW está informando esses valores se a versão 1.00a

 

Fiz a alteração para a versão 1.00a e agora está me retornando autorizada.

 

Mais ainda continua com o erro 

sStatus  := IntToStr(ACBrMDFe1.WebServices.Retorno.MDFeRetorno.ProtMDFe.Items[0].cStat);

 

Em anexo os xmls.

 

Alguma sugestão?

41140700669977000104580010000000281439942007-mdfe.xml

419000000849815-pro-rec.xml

[Italo Giurizzato Junior]

Bom dia,

 

Para funcionar, devemos configurar o ACBrMDFe para a versão 1.00a

 

Note que o *-pro-rec.xml traz o status 100: Autorizado o uso do MDF-e

 

Qual é o erro em:

 

sStatus  := IntToStr(ACBrMDFe1.WebServices.Retorno.MDFeRetorno.ProtMDFe.Items[0].cStat);

[Command Perfect]

Segue o erro

 

---------------------------

Debugger Exception Notification

---------------------------

Project CPServico.exe raised exception class $C0000005 with message 'access violation at 0x00fb1fa1: read of address 0x00000024'.

---------------------------

Break   Continue   Help   

---------------------------

[Command Perfect]

Boa tarde, 

 

Na unit "ACBrMDFeWebServicesTMDFeRecibo.Executar" adiciona no retorno.

 

então fiz o teste ACBrMDFe1.WebServices.Recibo.MDFeRetorno.ProtMDFe[0].cStat e recuperou o cstat que está no arquivo "-pro-rec.xml'

 

Pode ser testado assim ou quando tem mais que um retorno pode dar problema?

 

Aguardo retorno.

 

Obrigado

[Italo Giurizzato Junior]

Boa tarde,

 

Revendo o seu post #3, temos:

 

Estou fazendo assim 

         ACBrMDFe1.WebServices.Recibo.Recibo := NrRecibo;

         ACBrMDFe1.WebServices.Recibo.Executar;

         sStatus  := IntToStr(ACBrMDFe1.WebServices.Retorno.MDFeRetorno.ProtMDFe.Items[0].cStat);

 

Esta errado o que você fez, pois se você esta executando o WebServices.Recibo.Executar, não podemos pegar o statuso de WebServices.Retorno e sim do WebServices.Recibo

[Command Perfect]

Boa tarde, 

Obrigado.

Deu certo.

[Doni Delphi]

Pessoal

 

Depois que eu atualizei os componente estou tendo problema na consulta do MDF-e

Após consultar carregando o arquivo

 

AcbrMDFe1.Manifestos.Clear;

AcbrMDFe1.Manifestos.LoadFromFile(arquivo);

AcbrMDFe1.Consultar;

 

esta dando status = 215 rejeição: Falha no schema xml

 

Mas tenho usado

AcbrMDFe1.Configuracoes.geral.VersaoDF := ve100a;

 

Pacote de schemas : PL_MDFe_100a_NT032014

 

Alguma ideia

[Italo Giurizzato Junior]

Bom dia Doni,

 

Faça o seguinte teste, inclua o segundo parâmetro no LoadFromFile:

 

AcbrMDFe1.Manifestos.LoadFromFile(arquivo, True);

[Command Perfect]

Bom dia,

Também passei por esse problema do LoadFromFile 

Ai passei a recuperando o XML do banco, 

 

Utilizo assim:

 

      AcbrMDFe1.Manifestos.Clear;

      AcbrMDFe1.Manifestos.LoadFromString(vXml);

 

Obrigado.

[Doni Delphi]

Italo,

 

Funcionou adicionando o True como parâmetro no LoadFromFile

 

Obrigado

[francinaldoac]

Como faço para gerar o xml do MDF-e através da consulta do MDF-e.

Meu problema, após envio o arquivo XML não foi enviado com o numero do protocolo, como fazer isso através da consulta do MDF-e, ou até mesmo através da consulta do Recibo novamente, isso é possível?

 

Obrigado!

[Italo Giurizzato Junior]

Bom dia Francinaldo,

O seu problema não é gerar o XML e sim torna-lo um arquivo digital valido juridicamente.

O XML do MDF-e assinado você tem, correto?

O que esta faltando é o protocolo de autorização.

Pois bem, você deve carregar esse XML usando o método LoadFromFile e depois executar o método Consultar.