Sql para montar balancete agrupado

Delphi

04/07/2006

:?: Olá a todos. Preciso montar dois balancetes que informe as despesas agrupadas por grupo de contas.
1o. Balancete.
M_Aux := ´Select A.Pln_Conta, A.Pag_DtCadastro, ´;
M_Aux := M_Aux + ´A.Pag_Vencto, A.Pag_Pagto, ´;
M_Aux := M_Aux + ´C.Pln_Conta, C.Pln_Descricao, ´;
M_Aux := M_Aux + ´Sum(A.Pag_Liquido) Valor ´;
M_Aux := M_Aux + ´FROM PAGAMENTOS A, PLANO C, ´;

M_Aux := M_Aux + ´Where (A.Pln_Conta = C.Pln_Conta) ´;
M_Aux := M_Aux + ´And (A.Pln_Conta >= :PlnIni) ´;
M_Aux := M_Aux + ´And (A.Pln_Conta <= :PlnFim) ´;
M_Aux := M_Aux + ´And (A.Cco_Cod >= :CcoIni) ´;
M_Aux := M_Aux + ´And (A.Cco_Cod <= :CcoFim) ´;
// --- Data de Pagamento
If EdtDtPagI.Text = ´ / / ´ then // Data de Pagamento
Begin
M_Aux := M_Aux + ´And (A.Pag_Pagto <= :DtPagF) ´;
end
else
Begin
M_Aux := M_Aux + ´And (A.Pag_Pagto >= :DtPagI) ´;
M_Aux := M_Aux + ´And (A.Pag_Pagto <= :DtPagF) ´;
end;

M_Aux := M_Aux + ´Group By Pln_Conta´;

dm.SqlDtStPagar.CommandText := M_Aux;

dm.SqlDtStPagar.Parambyname(´PlnIni´).AsString := EdtPlnI.Text;
dm.SqlDtStPagar.Parambyname(´PlnFim´).AsString := EdtPlnF.Text;
dm.SqlDtStPagar.Parambyname(´CcoIni´).AsString := EdtCcoI.Text;
dm.SqlDtStPagar.Parambyname(´CcoFim´).AsString := EdtCcoF.Text;
// --- Data de Pagamento
If EdtDtPagI.Text = ´ / / ´ then // Data de Pagamento
Begin
X_Data := StrToDate(EdtDtPagF.Text);
dm.SqlDtStPagar.Parambyname(´DtPagF´).AsDate := X_Data;
end
else
Begin
X_Data := StrToDate(EdtDtPagI.Text);
dm.SqlDtStPagar.Parambyname(´DtPagI´).AsDate := X_Data;
X_Data := StrToDate(EdtDtPagF.Text);
dm.SqlDtStPagar.Parambyname(´DtPagF´).AsDate := X_Data;
end;

dm.CliDtStPagar.Open;
=>>> O problema. O sistema retorna o erro:
INVALID COLUMN REFERENCE´. PROCESS STOPED, mas quando declaro:
M_Aux := ´Select A.Pln_Conta, A.Pag_DtCadastro, ´;
M_Aux := M_Aux + ´Sum(A.Pag_Liquido) Valor ´;
M_Aux := M_Aux + ´FROM PAGAMENTOS A ´
ai o sistema roda.
=== 2o. Balancete. Preciso somar tambem os valore pagos que estão em outra tabela CAIXA campo CAX_VALOR, mas precisaria que fosse adicionado a mesma variavel que esta sendo criada VALOR.
O que devo fazer para que funcione??
Obrigado a todos.
Neto


Neto

Neto

Curtidas 0
POSTAR