Jump to content

botao.pngbotao.png

botao.pngbotao.png

logo_acbr_paygo.png

TEF ACBr PayGo
Seja um revendedor e ofereça uma solução completa para seu cliente.


botao.png

beneficios.png

Conversão de Caracteres (AnsiString para String)


  • Este tópico foi criado há 1511 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui

Recommended Posts

Boa tarde.

Estou vendo que resolveram estender o suporte ao Delphi 7 por mais tempo. "Talvez" isto tenha a ver com esta alteração.

Na unit PcnRetinutNFe na function TRetInutNFe.LerXml: Boolean; existe a linha 140

      (*DR08 *)FxMotivo  := Leitor.rCampo(tcStr, 'xMotivo');

FxMotivo é tipo String;

e Leitor.rCampo retorna uma Variant. E ai, se o campo for tipo String, faz uma chamada em assim:

     tcStr     : result := ReverterFiltroTextoXML(ConteudoTag);

Mas ReverterFiltroTextoXML retorna um AnsiString;

Dai no Delphi Seatlle o Motivo fica com erros de acentuação. Tudo bem que não é nada crítico, mas fica parecendo que somos incompetentes né.

Eu acho alterando ReverterFiltroTextoXML para retornar String resolve isso.

 

 

Link to post
Share on other sites
18 horas atrás, ubaltino disse:

Estou vendo que resolveram estender o suporte ao Delphi 7 por mais tempo. "Talvez" isto tenha a ver com esta alteração

Não tem não. O anúncio explica o motivo.

19 horas atrás, ubaltino disse:

Eu acho alterando ReverterFiltroTextoXML para retornar String resolve isso

Por favor, se quiser reportar algum problema, dê informações completas de como reproduzir.

Se quiser sugerir uma correção, anexe o arquivo alterado com a correção.

[]'s

Consultor SAC ACBr

Elton
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
Link to post
Share on other sites
3 horas atrás, ubaltino disse:

Ok. Tudo bem. Eu não afirmei que era a causa. Disse "talvez".

Eu não disse que você afirmou que era a causa. Se ler novamente meu post notará que eu só citei você. Não fiz nenhuma afirmação sobre o que você disse ou não.

3 horas atrás, ubaltino disse:

Mas e a questão do erro de conversão? No momento que pega a resposta de uma NFe Inutilizada usando o Delphi Seatlle?

Já expliquei como proceder, veja abaixo:

4 horas atrás, EMBarbosa disse:

Por favor, se quiser reportar algum problema, dê informações completas de como reproduzir.

Se quiser sugerir uma correção, anexe o arquivo alterado com a correção.

 

3 horas atrás, ubaltino disse:

Será que é só eu que estou passando por isso?

Sinceramente, não sei...

[]'s

Consultor SAC ACBr

Elton
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
Link to post
Share on other sites
  • Este tópico foi criado há 1511 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...