• 0
Sign in to follow this  
Nelson Pereira

Calculo de variaveis

Question

Bom dia pessoal,  estou necessitado de ajuda.

Estou usando um relatório no meu sistema que está vinculado a um dataset. No meu relatório tenho 3 campos que passo a explicar:  "PreçoGrupo" ; "PreçoTotal" ; "PercTotal".

O "PreçoGrupo" é alimentado por um valor do meu dataset (PRECstRp), que no relatório já está configurado para ir buscar o custo dos produtos por Grupo. e o campo "PreçoTotal" também é alimentado pelo (PRECstRp) que por sua vez está configurado no relatório para ser a soma de todos os grupos.... até aqui tudo bem..o meu problema vem a segui, com o campo "PercTotal', que tem de ser alimentado com a seguinte formula ( "PreçoGrupo" / "PreçoTotal" ) * 100...isto para cada linha do relatório, pois cada linha corresponde a um grupo diferente de produtos.

 

Porém os valores  de "PercTotal' não estão batendo certo.

 

Alguém me pode ajudar a ver se estou alimentado as variavies de forma correta?

Estou usando o segiinte: 

         Dim CustoGrupo As Double
         Dim CustoTotal As Double

 For Each row As DataRow In ds.Tables("Dados2").Rows

            row("TotalGrupo") = CDbl(row("PRECstRp"))
            row("TotalGeral") = CDbl(row("PRECstRp"))

            CustoGrupo += CDbl(row("TotalGrupo"))
            CustoTotal += CDbl(row("TotalGeral"))

            If CustoGrupo > 0 Then
               row("PercTotal") = (CustoGrupo / CustoTotal) * 100
            Else
               row("PercTotal") = 0
            End If

         Next

         Return ds

 

 

 

 

Share this post


Link to post
Share on other sites

0 answers to this question

Recommended Posts

There have been no answers to this question yet

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Sign in to follow this