NFC-e - MG Retorno de Consulta

[EdmarFrazao]

6 horas atrás, josadac disse:

Boa tarde Pessoal,

Fiz como o Ítalo orientou, baixei os fontes, recompilei e deu certo.

Muito obrigado a todos pela atenção.

Gratio,

Josadac

E só atualizar o arquivo .pas e reinstalar o ACBr. Que funciona 

[farnetani]

Sefaz já me respondeu.

[Jonas Costa]

Boa tarde, aqui também funcionou e nos salvou, porém só tive que incluir o "RemoverNameSpace" em...
function TNFeInutilizacao.TratarResposta: Boolean; (Linha 2656)

só percebemos hoje quando houve um caso de inutilização.

Muito obrigado pelo apoio

[johnbh3]

Essa solução esta no SVN ou precisa baixar o .pas?

9 minutos atrás, Jonas Costa disse:

Boa tarde, aqui também funcionou e nos salvou, porém só tive que incluir o "RemoverNameSpace" em...
function TNFeInutilizacao.TratarResposta: Boolean; (Linha 2656)

só percebemos hoje quando houve um caso de inutilização.

Muito obrigado pelo apoio

???

function TNFeInutilizacao.TratarResposta: Boolean;
var
  NFeRetorno: TRetInutNFe;
begin
  NFeRetorno := TRetInutNFe.Create;
  try
    FPRetWS := SeparaDadosArray(['nfeInutilizacaoNF2Result',
                                 'nfeInutilizacaoNFResult',
                                 'nfeResultMsg'],FPRetornoWS );

    VerificarSemResposta;

    RemoverNameSpace;
    NFeRetorno.Leitor.Arquivo := ParseText(FPRetWS);
    NFeRetorno.LerXml;

[Jonas Costa]

 

Baixe o .pas ontem... mas pelo trecho que vc citou , o seu ja tem... o meu problema era somente esse, agora estudo tudo funcionando perfeitamente 

[BigWings]

19 minutos atrás, johnbh3 disse:

Essa solução esta no SVN ou precisa baixar o .pas?

Já está no repositório, inclusive para o método de inutilização.

[johnbh3]

2 horas atrás, BigWings disse:

Já está no repositório, inclusive para o método de inutilização.

Top!
Deu certinho!
Mandei o like ai!
Abraços!!!

[Fabrício G. Araújo]

Parece que o pessoal dos servidores de MG estão começando a consertar as coisas... Estava disposto a esperar a correção dos servidores, mas devido a pressão dos clientes com aquela famosa alegação: "O sistema do meu concorrente da esquina está emitido, porque o do meu sistema não?", então por livre e espontânea pressão fiz o ajuste disponibilizado no repositório.

Ontem consegui reproduzir o problema em homologação, onde funcionou de boa o ajuste. Hoje quando fui testar novamente já vi que em homologação já está respondendo corretamente. Ontem estava na versão W-1.4.26 e hoje está na versão W-1.4.27.

Em produção ainda continua o problema dos servidores (versão W-1.4.23), mas como em homologação já está resolvido, acredito que a qualquer momento devem resolver o de produção também.

Agradeço muito a equipe do ACBr, e a todos os colegas da lista que ajudaram na solução.

[Jonatas de Alencar Alves]

Olá,

existe um problema na solução aplicada em relação ao problema em MG, onde são geradas namespaces xmlns="http://www.portalfiscal.inf.br/nfe" indiscriminadamente.

A solução aplicada foi esta:

procedure TNFeWebService.RemoverNameSpace;
begin
  FPRetWS := StringReplace(FPRetWS, ' xmlns="http://www.portalfiscal.inf.br/nfe"',
                                    '', [rfReplaceAll, rfIgnoreCase]);
end;

na unit ACBrNFeWebServices.pas.

O problema nesta solução, é que são excluídas todas as ocorrências deste namespace, até mesmo a do a cabeçalho, de forma indiscriminada, ou seja, para todas as UF's.

A consequência disto é que em sistemas que utilizam mapeamento de "XSD", e naturalmente, realizam binding do conteúdo "xml", retornam exceção "EIntfCastError", pela ausência do TargetNamespace "http://www.portalfiscal.inf.br/nfe" no "xml".

Aplicamos uma adequação de acordo com o cenário, sendo que código é este:

 

procedure TNFeWebService.RemoverNameSpace;
begin
     if UpperCase( FPConfiguracoesNFe.WebServices.UF ) = 'MG' then // Luis 01/11/2019
     begin
          FPRetWS := StringReplace( FPRetWS, ' xmlns="http://www.portalfiscal.inf.br/nfe"', '', [ rfReplaceAll, rfIgnoreCase ] ) ;
     end ;
end;

 

Utilizando a seguinte lógica: Quando a UF do emitente for diferente de MG, o "xml" recebido da SEFAZ será utilizado da forma original, porém quando a UF for MG, então será aplicada a alteração original, e nossa recomendação é que nos sistemas que utilizam a biblioteca "xmldom", reponham o namespace "na mão".

Obs: Em anexo a unit mencionada acima, contendo as alterações relatadas.

Grato!

ACBrNFeWebServices.pas

[Italo Giurizzato Junior]

Boa tarde Jonatas,

Primeiramente precisamos saber se a SEFAZ-MG já corrigiu o problema que ela provocou.

Se sim, podemos desabilitar essa função.

[luis.sicnet]

Se o problema é para corrigir um erro que ocorre somente no estado de Minas Gerais, e somente na emissão de NFC-e, acho que o código deveria ser:

 

procedure TNFeWebService.RemoverNameSpace;
begin
     if ( UpperCase( FPConfiguracoesNFe.WebServices.UF ) = 'MG' ) and ( FPConfiguracoesNFe.Geral.ModeloDF = moNFCe ) then
     begin
          FPRetWS := StringReplace( FPRetWS, ' xmlns="http://www.portalfiscal.inf.br/nfe"', '', [ rfReplaceAll, rfIgnoreCase ] ) ;
     end ;
end;
 

[EMBarbosa]

Em 01/11/2019 at 19:02, Jonatas de Alencar Alves disse:

existe um problema na solução aplicada em relação ao problema em MG, onde são geradas namespaces xmlns="http://www.portalfiscal.inf.br/nfe" indiscriminadamente.

Em 04/11/2019 at 16:49, Italo Jurisato Junior disse:

Primeiramente precisamos saber se a SEFAZ-MG já corrigiu o problema que ela provocou.

Em 04/11/2019 at 16:55, luis.sicnet disse:

Se o problema é para corrigir um erro que ocorre somente no estado de Minas Gerais, e somente na emissão de NFC-e

Olá pessoal,

   Nos parece que a SEFAZ-MG já corrigiu o problema, então enviamos uma remoção do código relacionado a isso.

   Mesmo assim, o @André Ferreira de Moraes nos forneceu um ajuste no arquivo pcnLeitor.pas que corrige o problema permanentemente.

   Fiz vários testes simulando xmls de retorno com NameSpaces nas tags e tudo funcionou corretamente.

   Sugerimos a todos que façam testes e reportem qualquer problema.

   As alterações foram enviadas ao SVN na revisão 18149.

   Muito obrigado a todos.