[firebase-br] Problemas com calculos

Marco A. marcobolacha em yahoo.com.br
Ter Abr 24 09:55:26 -03 2007


vc ja tentou depurar para ver se ela entra nas suas condicoes?

"Marcelo Castro - [www.ligteltelecom.com.br]"
<marcelo.castro em ligteltelecom.com.br> escreveu
na mensagem news:001501c7861f$e8dbde20$69410a0a em NotebookToshiba...
Instrução SQL na QrySomaItem :

UPDATE PEDIDOLOG SET PED_QTDE = (SELECT SUM(PLI_QTDE) AS QTDETOTAL FROM
PEDLOGITEM WHERE PED_NUMERO = :PED_NUMERO),

PED_VALOR = (SELECT SUM(PLI_VALUNIT) AS VALORTOTAL FROM PEDLOGITEM WHERE
PED_NUMERO = :PED_NUMERO) WHERE PED_NUMERO = :PED_NUMERO




procedure TDM_Server.DspVendaLogAfterUpdateRecord(Sender: TObject;
  SourceDS: TDataSet; DeltaDS: TCustomClientDataSet;
  UpdateKind: TUpdateKind);
begin
        If SourceDS = QryVendaLog THEN
          If UpdateKind = ukInsert THEN
          begin
              QrySomaItem.Params[0].Value := FNumVendaLog;
              QrySomaItem.Params[1].Value := FNumVendaLog;
              QrySomaItem.Params[2].Value := FNumVendaLog;
              QrySomaItem.ExecSQL;
          END;
end;

O problema é não é executado a qrysomaitem ou acontece algum erro porém este
erro não é apresentado, somente não é atualizado a tabela PEDIDOLOG .

Se eu executar a instrução SQL da qrysomaitem no IB Console funciona 100 %.

Alguém pode me ajudar neste problema ?

Alguém sabe como fazer um procedure ou trigger para isso acima funcionar
corretamente ?
______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
Para editar sua configuração na lista, use o endereço
http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
Para consultar mensagens antigas: http://firebase.com.br/pesquisa







Mais detalhes sobre a lista de discussão lista