Alteração na UNIT pcnLeitor

[alexandre.eduardo]

Srs,

Uso delphi 7 e acabo de finalizar a conversão para o trunk2. Detectei um problema que foi necessário alterar a unit pcnLeitor na função  function TLeitor.rAtributo(Atributo: string): variant;

Segue em anexo a unit original e a que tive que alterar.

 

AlteracaoACBR.txt

[Daniel Simoes]

Compilo o trunk2 a meses no D7, sem problemas...

de mais detalhes, porque você acha que a sua modificação é necessária??

[alexandre.eduardo]

Foi necessário esse ajuste pois processndo um xml na chamada abaixo:

"ACBrNFe.NotasFiscais.LoadFromFile( "ArquivoXml.Xml" );"

retornava a mensagem "Não encontrei o atributo: versao".

isso dava porque:

Na unit "pcnNFeR", método "LerXml", linha 133 que possui o conteúdo "VersaoInfNFe := Leitor.rAtributo('versao=');"...
o método "Leitor.rAtributo('versao=');" retorna o valor "http://www.portalfiscal.inf.br/nfe", onde este pertence a tag "xmlns".

 

Obrigado pela pronta resposta. 

espero ter conseguido explicar...

Atenciosamente

Alexandre Costa.

[Daniel Simoes]

Por favor anexe (zip) as Units modificadas, para comparação (diff)

 

[alexandre.eduardo]

Segue,

pcnLeitor.zip

[Daniel Simoes]

poderia por favor, anexar um exemplo de XML onde o problema ocorria ?

[alexandre.eduardo]

Boa tarde Daniel,

Como o xml que usei é um de cliente assinado, omiti algumas informações por segurança. 

Segue em anexo o xml. 

O que ocorria era que a função ao buscar o atrituto VERSAO não trazia o 3.0 mas o conteudo da tag seguinte conforme abaixo.

<nfeProc xmlns="http://www.portalfiscal.inf.br/nfe" versao="3.10">
<NFe xmlns="http://www.portalfiscal.inf.br/nfe">
<infNFe Id="NFe9999999999999999999999999999999999999" versao="3.10">

 

 

exemploXML.xml

Editado 6 Janeiro, 2016 por alexandre.eduardo
Omitir informacoes de cliente

[Italo Giurizzato Junior]

Boa tarde Daniel,

Eu já acompanho esse caso a algum tempo.

O problema é que o XML da NF-e em questão não é gerado pelo ACBr e sim por uma outra solução e os caras fizeram uma lambança no XML note que os conteúdos dos atributos da TAG nfeProc são delimitados com apostrofes e o resto com aspas e isso faz com que o componente se perca.

Se tivessem feito da forma correta ou seja sempre usar aspas a leitura ocorreria sem nenhum problema.

Dai podemos ver a qualidade das demais soluções.

[Daniel Simoes]

Italo,

Obrigado pelas explicações... deixo a você a decisão de acatar ou não a modificação... a meu ver, não teria problemas, pois não traz nenhum efeito colateral nos usuários atuais do ACBr...

[Italo Giurizzato Junior]

Daniel,

Contribuição enviada para o repositório.

Obrigado Alexandre.