calcular campo de debito e credito

Question

:( tenho uma tabela conta corrente (cliente,data,historico,dc(deb/Cred),valorgostaria de saber como faco para calcular os campospor exemplotodos os lancamentos de creditoe todos os debitoe salvar em u...

Aroldo Zanela · Answer

Colega,Voc� teria algo como:Selecionar os lan�amentos e totalizar de acordo com o par�metro.Adicione o script abaixo na propriedade SQL de um objeto Query:[code:1:e52a64be3c]SELECT SUM(NOME_CAMPO) AS TOTALWHERE dc = :opAND data BETWEEN :inicio AND :termino[/code:1:e52a64be3c]Suponha que tenha dois Edits para receber o resultado e um Button para acionar o c�lculo. D� um duplo click sobre o objeto button e adicione o c�digo abaixo:[code:1:e52a64be3c]// Totaliza o cr�ditoQuery1.Close;Query1.ParamByName(�op�).AsString := �Cred�;Query1.ParamByName(�inicio�).AsDate := DateTimePicker1.Date;Query1.ParamByName(�termino�).AsDate := DateTimePicker2.Date;Query1.Open;// Pega o valor obtido na consulta e atribui para o objeto Edit1 (cr�dito)Edit1.Text := FloatToStrF(Query1.FieldByName(�TOTAL�).AsCurrency,ffNumber,15,2);Query1.Close;Query1.ParamByName(�op�).AsString := �Deb�;Query1.ParamByName(�inicio�).AsDate := DateTimePicker1.Date;Query1.ParamByName(�termino�).AsDate := DateTimePicker2.Date;Query1.Open;Edit2.Text := FloatToStrF(Query1.FieldByName(�TOTAL�).AsCurrency,ffNumber,15,2);[/code:1:e52a64be3c]...

F�rum calcular campo de debito e credito #179625