[firebase-br] Problemas com calculos

omar l m rosa omar em conesul.inf.br
Ter Abr 24 08:30:13 -03 2007


parece que so existe um parametro...
então daria exceção na passagem do parametro 1 e 2...


----- Original Message -----
From: "Marcelo Castro - [www.ligteltelecom.com.br]"
<marcelo.castro em ligteltelecom.com.br>
To: "FireBase" <lista em firebase.com.br>
Sent: Tuesday, April 24, 2007 12:21 AM
Subject: [firebase-br] Problemas com calculos


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