Wanting it to Not Round Off

[NewToProgramming]

I have a query that pulls numbers from a table field. These numbers are not whole numbers, they have decimals. When I use the query to gather up those numbers and add them together, it rounds them off to the whole number.
How do you stop that from happening?

 

[NewToProgramming]

Oh, here is the code to help with any questions.
Query := TQuery.Create( nil );
I := 1;
R := 0;
Query.DataBaseName := Table1.DataBaseName;
Query.SQL.Add( 'SELECT (field) as whatever from db.Db' );
try
Query.Open;
Query.First;
while not Query.Eof and (i<=10) do
begin
R := R + Query.FieldByName('Whatever').AsInteger ;
Query.Next;
Inc(i);
Form3.Edit1.Text := FormatFloat(FormatSpec, R div 10);
end;
finally
Query.Free;
end;
Result := True;
end;

 

[swampBoogie]

use

Query.SQL.Add( 'SELECT sum(field) as whatever from db.Db' );

and skip the loop in your code.

The data type problem has to do with client language you are using and is not a SQL issue.

 

[NewToProgramming]

When I did that it sumed up all my records. I only want it to sum up the lowest 10.

 

[swampBoogie]

Oh, I missed that part. Most DBMS has some facility for limiting the number of rows returned.

E.g.

top in SQL server and Access

limit in Mysql and Progress

first in Interbase/Firebird

olap functions

Which dbms are you using?

 

[NewToProgramming]

I fixed it. Thank you,
Mark