[firebase-br] OFF Topic - erro no commandtext do clientdataset

Reijanio Nunes Ribeiro rnribeiro em gmail.com
Ter Maio 29 16:08:21 -03 2007


bom dia pessoal tenho um form tem um dbgrid um e alguns labels e un
SqlDataset, 1 datasetprovider e um Clientdataset o sqldataset ta ligado em
um sqlconnection no data module o commandtext ta em branco o datasetprovider
ta ligado no sqldataset e o clientdataset ta ligado no datasetprovider e
toda x q tento ativar o clientdatast(dsplocal) da esse erro MISSING QUERY,
TABLE NAME OR PROCEDURE, sei q ta dizendo q ta faltando o commandtext no
sqldataset mais se marcar o PoAllowCommandtext no dsp n pode usar o
commandtext do clientdataset

componente         nome                   conexionname
   commandtext     poAllowCommandText
sqldataset            sqldatasetlocal     dm.conexao            /\
datasetprovider     dsp_datasetlocal   sqldatasetlocal
       |                   true
clientdataset        datasetlocal          dsp_datasetlocal  //lancado na
procedure totais_caixa

procedure TFFinanceiro.totais_caixa;
var
TotalCredito, TotalDebito: Real;
begin
//verifica e seleciona a aba pq todos os forms estaum contas receber
//contas recebidas, contas pagar, contas pagas e CAIXA estão
// em tabsheets nesse form
if pagecontrol1.tabindex = 0 then
begin
//soma os totais em credito
datasetlocal.close;
datasetlocal.commandtext := 'select sum (valor) as totalcredito from
caixa where tipo like'+#39+'C'+#39;
datasetlocal.open // so lembrando q a propriedade poAllowComandText
// do dsp_datasetLocal está marcada pra TRUE
//passa os valores em creditos
TotalCredito := datasetlocal.fieldByName(TotalCredito).AsFloat;
//passa valores para um label no form chamado lblTotalCreditos
lblTotalCreditos.caption := 'Total em creditos: R$'+formatFloat('###,
###,##0.00', TotalCredito);
______________________________________________________

//soma os totais em debito
datasetlocal.close; //esse data set local é o clientdataset
datasetlocal.commandtext := 'select sum (valor) as totaldebito from
caixa where tipo like'+#39+'D'+#39;
datasetlocal.open
//passa os valores em creditos
TotalCredito := datasetlocal.fieldByName(TotalDebito).AsFloat;
//passa valores para um label no form chamado lblTotalDebitos
lblTotalDebitos.caption := 'Total em debitos: R$'+formatFloat('###,
###,##0.00', TotalDebito);
_________________________________________________________

//calcula a diferenca(saldo) entre totalCredito e TotalDébito
lblSaldosCaixa.Caption ;= 'Saldo: R$'+formatfloat('###,###,##0.00'
TotalCredito - Totaldebito);
end;
end;



Mais detalhes sobre a lista de discussão lista