Jump to content
Notícias do ACBr

logo_acbr_paygo.png

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


Saiba mais

beneficios.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png click.png click.png

Problema com RLDBResult Fortesreport-ce


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

Recommended Posts

Estou criando um relatório em tempo de execução que irá verificar o DataType de um column de um grid e, caso seja um equivalente a ponto flutuante (ftFloat, ftExtended, ftBCD, ftCurrency, ftFMTBcd e ftSingle) irá gerar um RLDBResult com este campo.
O problema é que campos no tipo (ftFMTBcd e ftSingle) o RLDBResult não calcula os valores, permanece valor 0, vide print: http://prntscr.com/o3vkjr.

Alguém por ventura teria enfrentado este problema e conseguiu uma solução?

  • Like 1
Link to comment
Share on other sites

Encontrei uma maneira de contornar o problema.
Criei um ClientDataSet e alimentei com todos os campos e valores que eu tinha, depois só apontei ao relatório o DataSource.
Segue o código caso alguém quiser seguir meus passos:
 

   cdsTeste.Close;
   cdsTeste.FieldDefs.Clear;
   for I := 0 to Pred(ADQGeradorRelatorio.FieldCount) do
   begin
      case ADQGeradorRelatorio.Fields[I].DataType of
         ftBCD, ftFloat, ftCurrency, ftSingle, ftFMTBcd, ftExtended:
         begin
            cdsTeste.FieldDefs.Add(ADQGeradorRelatorio.Fields[I].FieldName, ftBCD, 0, false);
         end;
         else
         begin
            cdsTeste.FieldDefs.Add(ADQGeradorRelatorio.Fields[I].FieldName,
                                   ADQGeradorRelatorio.Fields[I].DataType,
                                   ADQGeradorRelatorio.Fields[I].Size, false);
         end;
      end;
   end;
   cdsTeste.CreateDataSet;

Basicamente, o que ele vai fazer é tornar ftBCD todos os campos do tipo decimal. Como trabalho com apenas 4 casas decimais não tive problemas com perda de dados.

Link to comment
Share on other sites

  • Este tópico foi criado há 771 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...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.