Erro ao carregar XML assinado no Xharbour.

[Luiz Alberto da Silva Lope]

Olá pessoal.

Tenho uma rotina escrita em xHarbour que precisa carregar XML's de NFC-e. Essa rotina utiliza a classe TXmlDocumento (txml.prg) e, ao carregar o XML já assinado, apresenta erro no trecho abaixo:

<Transforms>
  <Transform  Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature"></Transform >
  <Transform  Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315"></Transform >
</Transforms>

Durante os testes identificamnos que o erro ocorre devido ao espaço ao fechar a tag "</Transform' '>".

Tenho outras rotinas escritas em Delphi que conseguem carregar o XML sem erros.

Então alterei a Unit, testei e o erro não ocorreu novamente.

ACBrXmlWriter.pas

[Luiz Alberto da Silva Lope]

Bom dia.

Acredito que meu texto não esclareceu o problema. Vou tentar explicar melhor:

A correção que eu sugeri é pra remover os espaços em branco no nome da tag TRANSFORM.

Ao fazer a assinatura do XML está gerando estes espaços branco, conforme a imagem acima.

Esses espaços são desnecessários. Na maioria das vezes não causa problema algum, mas no caso do XHARBOUR, o parser de XML acusa erro na leitura desta tag.

[Alexandre de Paula]

Boa tarde,

Criada a TK-7223 para avaliação.

Obrigado pela contribuição.

[Italo Giurizzato Junior]

Boa tarde @Luiz Alberto da Silva Lope,

Já esta no SVN.