Multiplicação dentro de sql

[ToPronto N'Area]

Saca só pessoal tenho este sql

Sql = "SELECT P.PRODUTO, P.ESTOQUE, P.VALOR, P.GRUPO, SUM(D.ENTRADA) AS SOMENT, SUM (D.SAIDA) AS SOMSAI, "

Sql = Sql & "D.CODIGOPRODUTO FROM PRODUTO AS P INNER JOIN DETESTOQUE AS D "

Sql = Sql & "ON D.CODIGOPRODUTO = P.CODIGO "

Sql = Sql & "WHERE D.DATA BETWEEN #" & Format(FrmParSaidaPorPeriodo.Ctxt(0).Text, "mm/dd/yyyy") & "# AND #" & Format(FrmParSaidaPorPeriodo.Ctxt(1).Text, "mm/dd/yyyy") & "#"

Sql = Sql & "GROUP BY P.PRODUTO, D.CODIGOPRODUTO, P.ESTOQUE, P.VALOR, P.GRUPO"

Sql = Sql & " ORDER BY P.GRUPO"

E diga-se de passagem ta funcionando show de bola! top mesmo!

Porem preciso fazer este sql

Sql = "SELECT P.PRODUTO, P.ESTOQUE, P.VALOR, P.GRUPO, SUM(D.ENTRADA) AS SOMENT, SUM (D.SAIDA) AS SOMSAI, Sum(SOMSAI * p.valor) as VlrProdSai, "

Sql = Sql & "D.CODIGOPRODUTO FROM PRODUTO AS P INNER JOIN DETESTOQUE AS D "

Sql = Sql & "ON D.CODIGOPRODUTO = P.CODIGO "

Sql = Sql & "WHERE D.DATA BETWEEN #" & Format(FrmParSaidaPorPeriodo.Ctxt(0).Text, "mm/dd/yyyy") & "# AND #" & Format(FrmParSaidaPorPeriodo.Ctxt(1).Text, "mm/dd/yyyy") & "#"

Sql = Sql & "GROUP BY P.PRODUTO, D.CODIGOPRODUTO, P.ESTOQUE, P.VALOR, P.GRUPO"

Sql = Sql & " ORDER BY P.GRUPO"

vocês repararam q agora eu tenho tres suns e o ternceiro tem de fazer o calculo utilizando o resultado do ultimo!

A pergunta é existe a possibiilidade de fazer isto?

Ou tem outra forma de se fazer isto?

Bom desde já agradeço a atenção de todos q passarem por aqui!

Abraços!

[ToPronto N'Area]

Obrigado a todos q passaram por aqui!

Consegui a resposta em outro forum!

Da uma olhada os meritos são de TREZE e IVANHOE

O sql pode ficar assim

Sql = "SELECT P.PRODUTO, P.ESTOQUE, P.VALOR, P.GRUPO, SUM(D.ENTRADA) AS SOMENT, SUM (D.SAIDA) AS SOMSAI, (SUM (D.SAIDA) * p.valor) as VlrProdSai, "

Sql = Sql & "D.CODIGOPRODUTO FROM PRODUTO AS P INNER JOIN DETESTOQUE AS D "

Sql = Sql & "ON D.CODIGOPRODUTO = P.CODIGO "

Sql = Sql & "WHERE D.DATA BETWEEN #" & Format(FrmParSaidaPorPeriodo.Ctxt(0).Text, "mm/dd/yyyy") & "# AND #" & Format(FrmParSaidaPorPeriodo.Ctxt(1).Text, "mm/dd/yyyy") & "#"

Sql = Sql & "GROUP BY P.PRODUTO, D.CODIGOPRODUTO, P.ESTOQUE, P.VALOR, P.GRUPO"

Sql = Sql & " ORDER BY P.GRUPO"

Ou ainda assim

Sql = "SELECT P.PRODUTO, P.ESTOQUE, P.VALOR, P.GRUPO, SUM(D.ENTRADA) AS SOMENT, SUM (D.SAIDA) AS SOMSAI, (SOMSAI * p.valor) as VlrProdSai, "

Sql = Sql & "D.CODIGOPRODUTO FROM PRODUTO AS P INNER JOIN DETESTOQUE AS D "

Sql = Sql & "ON D.CODIGOPRODUTO = P.CODIGO "

Sql = Sql & "WHERE D.DATA BETWEEN #" & Format(FrmParSaidaPorPeriodo.Ctxt(0).Text, "mm/dd/yyyy") & "# AND #" & Format(FrmParSaidaPorPeriodo.Ctxt(1).Text, "mm/dd/yyyy") & "#"

Sql = Sql & "GROUP BY P.PRODUTO, D.CODIGOPRODUTO, P.ESTOQUE, P.VALOR, P.GRUPO"

Sql = Sql & " ORDER BY P.GRUPO"

sem o sum

Eu testei e ficou show de bola!

Abraço a todos