OnGetTableName TClientDataSet

Delphi

07/06/2006

olá pessoal

estou tendo um problema que a muito não consigo resolver.
eu uso o TSQLConnection TSQLDataSet TDataSetProvider e depois
todo o TClientDataSet que eu crio eu relaciono ao provider

eu faço um select num cds e logo depois eu dou um delete, ex.:

cds2.close;
cds2.CommandText := ´select * from Programador´;
cds2.open;

cds1.close;
cds1.CommandText :=
´Select Cod_Chamado from Chamado union all Select Cod_Manutencao from Manutencao´
cds1.open;
cds1.close;
cds1.free;

cds2.delete;
cds2.ApplyUpdates(0);

Dá erro... o TableName do evento OnGetTableName fica com o valor de ´Chamado´ e não de ´Programador´. Por isso ele dá o erro indicando que os campos da tabela de programador não existem;

já criei um datasetprovider para cada clientdataset e continua a mesma coisa.

Vi que isso é uma coisa do TSQLResolver. Mas não consegui limpar esse ´buffer´ que parece ser do clientdataset


Miuuudo

Miuuudo

Curtidas 0
POSTAR