Impressão de caractere & - ecomercial - no Danfe para FORTES - esta quebrando o relatorio

[adilsonpazzini]

Após atualização de sexta dia 03/07/2026 as 21:20 ... na impressão do danfe quando contem o caracteres & - ecomercial .. passou a quebrar o relatorio e trocar pelo que esta no XML 

 

ex: onde tá &  .. ta imprimindo &

 

Vou anexar um print da impressao para analise . 

Desde já agradeço 

 

Adilson Pazzini .

 

 

 

[adilsonpazzini]

Testei versões anteriores .. aparentemente pode ser problema na versao do forte .. pois fiz a atualização por conta do QrCode .. 

vou voltar pra ver se resolve  .

[adilsonpazzini]

Analisando mais afundo ... vi que no gravar o XML .. ta granvando com essa troca ai .. pelo vi .. ta diferente do que gravava antes .. vou tentar ver onde é 

[adilsonpazzini]

Entendi que o xml que está retornando .. em vez por exemplo , de vir para gravar com o & .. vem com o amp;

em vez de vir assim <xNome>QUEIROS & VEICULOS LTDA</xNome> vem igual abaixo 

<xNome>QUEIROS &amp; VEICULOS LTDA</xNome>

o problema não está no fortes .. 

[juliomar.marchetti]

Válida e confere se é algum commit especifico que ocorreu isso

[Velmax]

Sim eu vi hj aqui .. eu voltei uma versão lá de traz que não tinha isso .. mas vou ver certinho o que é . obrigado Juliomar

[adilsonpazzini]

Fiz alguns testes aqui .. e vi que o problema ocorre na leitura tá .. vi que esse dias foi retirado da unit de leitura do xml .. conforme imagem abaixo 

ai fiz o seguinte texte nessa parte pra ver como que gera dos dados na leitura .. 

voltando a opcao de utilizar o ParseText .. ai ele montou corretamente sem jogar o amp; 

 

o Resultado foi esse :

07/07/2026 16:27:59 ObterConteudo := BONS &amp; TEMPOS MTZ

07/07/2026 16:27:59 ObterConteudo C\PARSETEXT:= BONS & TEMPOS MTZ

no caso voltando a funcao ParseText ele jogou o conteu correto no log que criei temporio . 

 

Nas mensagens da infadic.infCpl NF-e acontece o mesmo problema tmb, quando utilizo caracteres que conflitam com xml ex: & " ' etc ...

Editado 7 Julho por adilsonpazzini

[jaidomini]

A Origem do problema está nessa função

Correção em Azul:

function TNFeXmlReader.ObterConteudo(const ANode: TACBrXmlNode;
  const Tipo: TACBrTipoCampo): variant;
begin
  Result := inherited ObterConteudo(ANode, Tipo);

  if Tipo in [tcStr] then
    Result := ParseText(Result)
  else if Tipo in [tcEsp, tcStrOrig] then
    Result := ParseText(Result, False);
end;

[Adonis]

11 horas atrás, jaidomini disse:

A Origem do problema está nessa função

Correção em Azul:

function TNFeXmlReader.ObterConteudo(const ANode: TACBrXmlNode;
  const Tipo: TACBrTipoCampo): variant;
begin
  Result := inherited ObterConteudo(ANode, Tipo);

  if Tipo in [tcStr] then
    Result := ParseText(Result)
  else if Tipo in [tcEsp, tcStrOrig] then
    Result := ParseText(Result, False);
end;

Com essa alteração, corrigiu os problemas com & e '

Porém, agora temos um problema com o Ç

<xProd>JUNTA DE DILATAÇÃO PRETA 25 X 2,5</xProd>
<xNome>*EMPRESA DE TRANSPORTES PAJUÇARA LT</xNome>

 

Editado Sexta as 01:44 por Adonis

[Roger Rodrigues]

23 horas atrás, jaidomini disse:

A Origem do problema está nessa função

Correção em Azul:

function TNFeXmlReader.ObterConteudo(const ANode: TACBrXmlNode;
  const Tipo: TACBrTipoCampo): variant;
begin
  Result := inherited ObterConteudo(ANode, Tipo);

  if Tipo in [tcStr] then
    Result := ParseText(Result)
  else if Tipo in [tcEsp, tcStrOrig] then
    Result := ParseText(Result, False);
end;

 

Essa correção corrigiu o problema com & e ". Para as letras com acentuação ele está removendo o acento, mas pelo mostra corretamente a letra. Ex: Ç vira C, ã vira a, â vira a

Será que o objetivo da revisão 46981 de 30 de junho era esse?

[Celso Marigo Junior]

Enviado commit [47246] revertendo a implementação anterior. Favor poste os resultados aqui.

[jaidomini]

Atualizei o ACBr, Danfe tudo certo!

[juliomar.marchetti]

Obrigado por reportar.

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