Correção na DANFe FastReport para envio de NF-e de serviço

[rodrigo4t]

Olá pessoal,

Eu tive de fazer uma correção na unit ACBrNFeDANFEFRDM.pas, depois de tentar emitir uma NF-e de serviços prestados. Eu não vou postar a Unit toda, pois há modificações decorrentes da minha versão do fastreport, mas o erro foi corrigido no método TACBrNFeFRClass.Create.

No trecho onde eram definidos os campos da cdsDadosProdutos, os campos de valos do ISS e vase de cálculo do ISS eram criados como Float. O problema é que todos os outros campos de totais são definidos como String, e convertidos de String para Float posteriormente, no momento da impressão.

Quanto um destes dois campos fosse preenchido, a impressão dispararia um erro de conversão.

Onde antes era:

        FieldDefs.Add('vISSQN'    , ftFloat);
        FieldDefs.Add('vBcISSQN'  , ftFloat);

Eu modifiquei para:

        FieldDefs.Add('vISSQN'    , ftString, 18);
        FieldDefs.Add('vBcISSQN'  , ftString, 18);

Assim seguindo o mesmo padrão dos outros campos de valor, como ICMS, IPI, frete, seguro, etc.

 

EDIT: Lembrando que estou me referindo ao compontente da Trunk2.

 

Editado 23 Outubro, 2015 por rodrigo4t

[Juliomar Marchetti]

Acho que seus fontes estão desatualizados !

pois está correto conforme mencionou no svn a um tempo já!

[Régys Silveira]

Você está desatualizado eu enviei essa correção já tem umas 3 semanas.