CTe 3.0 - Could not convert variant of type (UnicodeString) into type (Double)

[Luiz Carlos de Lima]

Boa tarde,

Na migração para a versão do CTe 3.0, estou com problema na emissão do DACTE.fr3 (Fast Report) estou com este erro "Could not convert variant of type (UnicodeString) into type (Double)". Já debuguei e cheguei até o FrxClass, mas não consegui descobrir qual o campo está dando o erro. Na impressão do DACTE2vias.fr3 a impressão é normal.  Anexo XML.

Agradeço alguma ajuda.

Grato - Luiz Carlos

21170215204984000108570010000383731000383736-cte.xml

[Luiz Carlos de Lima]

Depois de muitos testes descobri que o problema só acontece quando estou debugando. Mas ainda não descobri o que esta causando o erro.

[Italo Giurizzato Junior]

Boa noite Luiz,

Em execução normal o problema não ocorre, somente em modo "debug"?

Se sim, pode ser alguma coisa no Delphi ou no Fast.

[Leandro Araújo]

Verifiquei o mesmo erro, quando em Debug, e mais especialmente quando no grupo dos impostos é informado o indicador de Simples Nacional, com outras tributações não aconteceu esse erro.

Teria alguma coisa a ver com a estrutura do .xml ao componente ler o mesmo para gerar o DACTE?

<ICMS>
<ICMSSN>
<indSN>1</indSN>
</ICMSSN>
</ICMS>

Observei que sempre estoura no abaixo método da unit frxClass.pas:

function TfrxCustomMemoView.CalcAndFormat(const Expr: WideString; Format: TfrxFormat): WideString;
 // ...
begin
	// ....
      Result := FormatData(FValue, Format); // <- Para nessa linha (6812 na versão do FastReport que tenho)
  finally
  end;
end;

Ao que tudo indica alguma coisa com algum memo do .fr3, mas não consegui identificar.

[SisComp - Proc. de Dados]

Olá amigos, também estava com o mesmo problema que nossos amigos do tópico, consegui resolver o problema e coloquei o arquivo em anexo no post. Peço que se possível para os senhores moderadores subir para o Trunk2

o problema estava nos campos referentes ao ICMS, base, aliquota, valor, redução, valor redução.

anteriormente estava setando vazio em um campo que tinha formatação de valor ai apresentava o erro de conversão, retirei a formatação padrão do memo e formatei manualmente, segue abaixo como estava e como ficou depois da correção.

ANTES

[IIF(<CalculoImposto."TXTSITTRIB">  = 'SN - SIMPLES NACIONAL',''<CalculoImposto."VBC">)]

DEPOIS

[IIF(<CalculoImposto."TXTSITTRIB">  = 'SN - SIMPLES NACIONAL','',FormatFloat('0.00',<CalculoImposto."VBC">))]

 

DACTE_Ve300.fr3

[Juliomar Marchetti]

Bom dia

subi a sua sugestão ao svn.

Obrigado.

[luisclaudio_jr]

Boa Tarde , 

tem mais um detalhe no meu caso, tive que  alterar o tipo da variável  intNr_Nota na  procedure  PageHeader1OnBeforePrint para string ;

procedure PageHeader1OnBeforePrint(Sender: TfrxComponent);
var
  intNr_Nota : string; //  Está como -> Integer mudei  para string ;
begin
 

end;

[Juliomar Marchetti]

36 minutos atrás, luisclaudio_jr disse:

Boa Tarde , 

tem mais um detalhe no meu caso, tive que  alterar o tipo da variável  intNr_Nota na  procedure  PageHeader1OnBeforePrint para string ;

procedure PageHeader1OnBeforePrint(Sender: TfrxComponent);
var
  intNr_Nota : string; //  Está como -> Integer mudei  para string ;
begin
 

end;

Isso seria onde?

anexe o fonte alterado para poder comparar.

[luisclaudio_jr]

Ola dentro do FR3, segue ,

 

DACTE30.fr3

[Juliomar Marchetti]

Em 18/10/2017 at 16:46, luisclaudio_jr disse:

Ola dentro do FR3, segue ,

 

DACTE30.fr3

Bom dia

subi a correção e corrigi os demais arquivos também

Obrigado.