Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Вычисление суммы по группам [D5, DBF]


ss300 ©   (2003-05-28 13:48:00) 

Имеется такая таблица dbf

cod sum
---------------
1 200
1 300
2 100
1 50
2 500


Как просуммировать поле sum и сохранить в массиве по группам cod, т.е. где cod=1 просуммировать отдельно , а 2 отдельно

заранее спс


ss300   (2003-05-28 14:36:00) [1]

да, не работает

а КИС это корпоративные информационные системы

ок, щас проверю, спасиб


Stas   (2003-05-28 14:23:00) [2]

А что если Sum взять в квадратные скобаки всеравно не работает ?
А что такое КИС ?


Соловьев   (2003-05-28 14:21:00) [3]

взять в кавычки:
Select t1."cod",sum(t1."sum") from table t1
GroupBy t1."cod"


ss300   (2003-05-28 14:18:00) [4]

ок, но есть одна проблема!!!
поле sum сходится с функцией sum
как быть? неохота программным путем переименовывать
с таким полем базу формирует КИС. Изменить никак нельзя :((


Stas   (2003-05-28 14:03:00) [5]

Думаю только так:

While not table1.eof do
begin
i:=Table.fieldbyName("cod").asInteger;
a[i]:=Table.fieldbyName("Column1").asfloat;
Table1.next;
end;
Column1 - Название колонки в которой у тебя сумма


ss300   (2003-05-28 13:55:00) [6]

а как результат присвоить в массив??


Stas   (2003-05-28 13:50:00) [7]

Select cod,sum([sum]) from table
GroupBy cod


Наверх

Титульная страница Поиск, карта сайта Написать письмо