Fórum SQL UNION SUM #272015

Esta me fornecendo uma coluna onde esta mostrando o total de Valor Baixado 20 na mesma coluna, mas somente onde e tabela de Valor 10, mas o que estou tentando fazer e que me retorne a somas dos valores, ou seja, 30, o que estou fazendo de errada, uso Paradox 7 muito Obrigada.

DM.QLivre1.Close;
DM.QLivre1.SQL.Clear;

DM.QLivre1.SQL.Text := ´SELECT CProdCodigo, CProdDescricao, CProdGrupo, CProdValorUnt, CProdValorCus, CValorTotal, Qtd, Data, CdData, CdNome, RecCdAlCliente, RecTitular, ´+
´CDI, Setor, (Select sum(CValorTotal) From CdConta Where CDI = ´C´) as VQCTotalC ´+
´FROM CdConta WHERE Data >=:pInicial and Data<=:pFinal and (CDI = ´C´) ´+

´Union all ´+

´SELECT CProdCodigo, CProdDescricao, CProdGrupo, CProdValorUnt, CProdValorCus, CValorTotal, Qtd, Data, CdData, CdNome, RecCdAlCliente, RecTitular, ´+
´CDI, Setor, (Select sum(CValorTotal) From CdContaBaixada Where CDI = ´C´) as VQCTotalC ´+
´FROM CdContaBaixada WHERE Data >=:pInicial and Data<=:pFinal and (CDI = ´C´) ´+
´Order By Data´;

DM.QLivre1.ParamByName(´pInicial´).AsDateTime := StrToDate(MaskEdit1.Text);
DM.QLivre1.ParamByName(´pFinal´).AsDateTime := StrToDate(MaskEdit2.Text);
DM.QLivre1.Prepare;
DM.QLivre1.Open;