sumar campo y guardar en una variable

[gonza_619]

hola q tal , bueno mi duda es que tengo q sumar un campo de esta tabla por ej:

TABLAPAGO
COD.CLIENTE DETALLE MONTO
1 XXX $5
1 XXX $7
2
3

BIEN AHORA LA IDEA ES SUMAR EL CAMPO MONTO DONDE SEA '1' EL CODCLIENTE Y GUARDAR EN UNA VARIABLE, PARA LUEGO COMPARAR CON OTRO MONTO.
SOLO SE CONSULTA
MUCHAS GRACIAS, SERIA OCN TQUERY?

[[Caral]]

Hola
Se usaria un query pero desconozco si lo hara con el campo moneda, de todos modos pruebalo:

Código SQL [-]
Select sum(MONTO) as Monto from TABLAPAGO 
where CODCLIENTE = 1
Group by COD.CLIENTE DETALLE MONTO

Saludos

[gonza_619]

ok muchas gracias pero la suma a donde se guardaria o asignaria, es qu eno quero mostrar en una grilla sino almacenar el total en una variable tipo float,
seria 'monto' la variable? gracias nuevamente

[[Caral]]

Hola
Da lo mismo donde guardes el dato, este se almacena en el query, es como en un table, ahi esta el dato y lo puedes pasar a un DBEdit, DBgrid, edit, etc. etc.
Saludos

[[Caral]]

Hola
A ver en una variable:

Código Delphi [-]
Var nati: Real;
Begin
Query1.sql.text:= 'Select sum(MONTO) as Monto from TABLAPAGO '+
                     ' where CODCLIENTE = 1 '+
                     ' Group by COD.CLIENTE DETALLE MONTO ';
Query1.Open;
nati:= Query1.Fields[0].Value;
end;

Saludos

[gonza_619]

var mont:real;
begin
query1.SQL.Clear;
Query1.sql.text:= 'Select sum(importe) as Monto from cobranzas where alucurso = xx' ;
Query1.Open;
query1.Active:=true;
mont:= Query1.fields[monto].Value;

bien intente hacerlo me daerror : undeclared identifier 'monto'

esta bien asi ? lo alamcena en mont

gracias

[[Caral]]

Hola
Te esta diciendo que Monto no existe y es asi ya que no lo declaraste en realidad o usas Filebyname o Field.

Código Delphi [-]
var mont:real;
begin
query1.SQL.Clear;
Query1.sql.text:= 'Select sum(importe) as Monto from cobranzas where alucurso = xx' ;
query1.Active:=true;
mont:= Query1.fields[0].Value;

Otra cosa: O lo activas o lo abres, pero las dos son innecesarias juntas.
Saludos