Fórum Dúvidas com a clausula Sum em um query #186469

Bom dia..

Tenho uma tabela ([b:89fb03106f]Paradox[/b:89fb03106f]), de itens, onde eu necessito dos seguintes totais:
Total de itens em Aberto .. Currency
Qtde de Itens em Aberto .. Integer

Total de Itens Baixados .. Currency
Qtde de Itens Baixados .. Integer

Estou tendo que utilizar duas querys uma para os valores em aberto e outra para os valores baixados, da seguinte forma.

[b:89fb03106f]Query geral, soma todos os itens(Abertos e Baixados[/b:89fb03106f]
SELECT SUM( PD2TOT ) UniTot, SUM( PD2VAL) VlrTot
FROM ´PedItem.DB´ Peditem
WHERE (PEDCOD =:PEDCOD) AND (CLICOD =:CLICOD)

[b:89fb03106f]Esta Query soma somente os itens baixados[/b:89fb03106f]
SELECT SUM(PD2QDE) UniFat, SUM(PD2VAL) VlrFat
FROM ´PedItem.DB´ Peditem
WHERE (PEDCOD=:PEDCOD) AND (CLICOD=:CLICOD)
AND (PD2DOC <> ´ ´)

Para ter os valores que necessito eu procedo da seguinte forma:

TotalQry.Active := true;
BaixQry.Active := true;
EditUniTot.Value := TotalQryUniTot.AsInteger;
EditUniFat.Value := BaixQryUniFat.AsInteger;
EditUniAbe.Value := TotalQryUniTot.AsInteger-BaixQryUniFat.AsInteger;
EditVlrTot.Value := TotalQryVlrtot.Value;
EditVlrFat.Value := BaixQryVlrFat.Value;
EditVlrAbe.Value := TotalQryVlrtot.Value-BaixQryVlrFat.Value;


Minha dúvida, seria possível realizar estes calculos em uma query só?

Se alguém puder me dar uma dica desde já agradeço

Fausto