Mario, a pergunta que você não respondeu foi a seguinte: O cdsDebitoCliente possui o field (campo) DEBITO no "Fields Editor" ? Dê um duplo clique no cdsDebitoCliente e verifique se os campos CLICODIGO, CLINOME e DEBITO estão no seu ClientDataSet.
Provavelmente o cdsCadPagto possui os campos CLICODIGO, CODPAGTO, DTPAGTO, VALOR, CLINOME E DEBITO. Verifique isso. 2009/5/5 Mario Rodrigues <marioirodrig...@gmail.com> > > > Humberto e Daniel, > > O meu cdsCadPagto o select dele é esse: > select P.CLICODIGO, P.CODPAGTO, P.DTPAGTO, P.VALOR, CLI.CLINOME, CLI.DEBITO > from PAGTO P INNER JOIN CLIENTE CLI ON CLI.CLICODIGO = P.CLICODIGO WHERE > P.CODPAGTO =:CODPAGTO > ja o cdsDebitoCliente tem o sql: > select CLICODIGO, CLINOME, DEBITO from CLIENTE where CLICODIGO =:CLICODIGO > > O q ta me deixando doido...é q como ja disse uso esse mesmo procedimento no > salvar...so q a acao é contraria.. > ja revi...ja refiz...ja recriei os cds...enfim...iniciante sofre > hehehehe...mas é assim mesmo...a onda é nao desistir... > > Daniel...como eu poderia fazer para para pegar o erro..nao consegui achar > nada falando para o D2007.. > Podes me ajudar? > > > 2009/5/5 Humberto Oliveira > <holiveira.wordpr...@gmail.com<holiveira.wordpress%40gmail.com> > > > > > > > > > É o que o nosso colega Daniel falou. Algum erro estava sendo retornado > após > > o ApplyUpdates. > > O seu ClientDataSet possui o campo DEBITO? > > O Exception está alegando que não existe a coluna DEBITO no > ClientDataSet. > > O problema pode estar aí. > > Provavelmente no "salvar", o seu ClientDataSet possui o campo no qual > você > > faz a sua aritmética. > > > > Verifique e nos posicione. > > > > > > 2009/5/5 Mario Rodrigues > > <marioirodrig...@gmail.com<marioirodrigues%40gmail.com> > <marioirodrigues%40gmail.com> > > > > > > > > > > > > > > Humberto, > > > > > > Coloquei oApplyUpdate apos o delete e deu o segunte erro: > > > First chance exception at $7C812AEB. Exception class TDBXError with > > message > > > 'Column unknown > > > DEBITO At line 6, column 14'. > > > depois esse: > > > First chance exception at $7C812AEB. Exception class TDBXError with > > message > > > 'Column unknown > > > DEBITO At line 7, column 2'. > > > depois > > > First chance exception at $7C812AEB. Exception class EDatabaseError > with > > > message 'Unable to execute Query'. > > > Uso o delphi 2007...clico em continuar...aparece as mensagens acima...e > > no > > > final mostra a mensagem de excluido com sucesso...porem...quando clico > em > > > ok...os dados voltam(da pra ver o form atras em branco)... > > > tb testei tirar as seguintes linhas > > > //dtsCadPagto.DataSet.Close; > > > //dtsCadPagto.DataSet.Open; > > > dai so aparece a mensagem de excluido com sucesso...mas nao exclui > > > > > > o impressionante é q uso o mesmo codigo no salvar..so q ao inves de > somar > > > ele diminui!! > > > > > > > > > 2009/5/5 Humberto Oliveira > > > <holiveira.wordpr...@gmail.com<holiveira.wordpress%40gmail.com> > <holiveira.wordpress%40gmail.com> > > <holiveira.wordpress%40gmail.com> > > > > > > > > > > > > > > > > > > > Já fez o teste colocando o ApplyUpdates após o Delete, ao invés de > > > colocar > > > > no envento do seu ClientDataSet? > > > > > > > > Faz um teste e avisa aí. > > > > > > > > 2009/5/5 Mario Rodrigues > > > > <marioirodrig...@gmail.com<marioirodrigues%40gmail.com> > <marioirodrigues%40gmail.com> > > <marioirodrigues%40gmail.com> > > > <marioirodrigues%40gmail.com> > > > > > > > > > > > > > > > > > > > > > > > > > > > > Alisson, > > > > > > > > > > Pois é...e é isso q esta sendo feito...alias o ApplyUpDates esta > > sendo > > > > > feito > > > > > no cdsCadPagtoAfterDelete e no cdsCadPagtoAfterPost da seguinte > > > > > maneira...cdsCadPagto.ApplyUpdates(0);.... > > > > > Veja só preciso somar o valor...e isso acontece...a unica coisa q > nao > > > > > acontece é o delete...q acho q esta certo...tens alguma ideia? > > > > > > > > > > > > > > > 2009/5/5 Alisson <alss...@yahoo.com.br > > > > > <alssnco%40yahoo.com.br><alssnco% > 40yahoo.com.br><alssnco% > > 40yahoo.com.br><alssnco% > > > 40yahoo.com.br><alssnco% > > > > 40yahoo.com.br>> > > > > > > > > > > > > > > > > > > > > > > > Que coisa mais confusa! Quando você quer excluir um registro > basta > > > > fazer: > > > > > > > > > > > > Dataset.Delete; > > > > > > Dataset.ApplyUpdates(0); > > > > > > > > > > > > __________________________________________________ > > > > > > Faça ligações para outros computadores com o novo Yahoo! > Messenger > > > > > > http://br.beta.messenger.yahoo.com/ > > > > > > > > > > > > > > > > > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > > > > > > > > > > > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > > > > > > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > [As partes desta mensagem que não continham texto foram removidas]