Fórum Somar no QRExpr #223234

30/03/2004

0

Como devo fazer para obter o resultado da divisão de dois QRexpr ??

QRExpr1.expression = SUM(Table1Qtd) = 200
QRExpr2.expression = SUM(Table1Soma) = 50

QRExpr3 deverá ser = 0,25, ou seja, QREXpr2 / QRExpr1 ou,
QRLabel1 = 0,25

Obrigado

CBier


Cbier

Cbier

Responder

Posts

30/03/2004

Pezzin

QRExpr3.expression = SUM(Table1Soma) / SUM(Table1Qtd)


Responder

Gostei + 0

30/03/2004

Cbier

Preciso calcular o resultado do QRExpr e não os campos da Table.

Exemplo:

Resultado do QRExpr1 = 200
Resultado do QRExpr2 = 50

Estes resultados são obtidos através de campos de tabelas filtrados.

Item Qtd
1 50 (QRexpr2)
2 45 (QRexpr2)
3 105 (QRExpr2)

Total 200 (QRExpr1)

daí

50 / 200 = 0,25 * 100 = 25¬
45 / 200 = 0,225 * 100 = 22,5¬
105 / 200 = 0,525 * 100 = 52,5¬

Total 100¬

CBier


Responder

Gostei + 0

30/03/2004

Cbier

Alguém pode me ajudar com esta problema ??

Obrigado

CBier


Responder

Gostei + 0

31/03/2004

Cbier

Pessoal,

Alguém pode me ajudar com este problema ??

CBier


Responder

Gostei + 0

31/03/2004

Valdir.santos

Olha, já tentei utilizar o valor de um QRExpr p/ fazer outro cálculo e não consegui. O jeito foi criar variáveis Double, e no evento OnPrint dos QRExpr, atribuir o valor da expressão na variável. Daí utiliza-se a variável ao invés do componente QRExpr.

Exemplo:

fDspMes60:=QRExpr1.Value.dblResult;


Valdir.


Responder

Gostei + 0

31/03/2004

Cbier

Veja se está certo desta forma:

No onprint do QRExpr3

QRExpr3.expression:=(QRExpr1.Value.dblResult/QRExpr2.Value.dblResult)*100;

CBier


Responder

Gostei + 0

01/04/2004

Valdir.santos

Tente colocar:

QRExpr3.Value.dblResult:=(QRExpr1.Value.dblResult/QRExpr2.Value.dblResult)*100;

Mas eu acho que no lugar de QRExpr3 vc deveria colocar um QRLabel e fazer:
QRLabel.Caption:=(QRExpr1.Value.dblResult/QRExpr2.Value.dblResult)*100;

Valdir.


Responder

Gostei + 0

01/04/2004

Cbier

Valeu,

Vou tentar dessa forma.

CBier


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar