QuickReport Подсчитать сумму столбца в БД

SlimFIT · Регистрация: 30.03.2009

Студворк — интернет-сервис помощи студентам

Добрый день. Может кто-то подсказать, как правильно производится подсчет суммы значений столбца в QuickReport? Есть запрос, который выводит все заказы для выбранного магазина, в выбранном диапазоне дат. Но не могу понять как вывести сумму заказов магазина за данный период. Может кто-нибудь указать на ошибку? Спасибо.

Нажатие кнопки:

C++
1
2
3
4
5
6
7
8
9
DataModule1->ADOQuery5->Close();
DataModule1->ADOQuery5->SQL->Clear();
DataModule1->ADOQuery5->SQL->Text="select * from orders where id_shop='"+DataModule1->DataSource1->DataSet->FieldByName("id_shop")->Value+"' AND date BETWEEN'"+DateTimePicker1->Date.FormatString("MM.dd.yyyy")+"' AND '"+DateTimePicker2->Date.FormatString("MM.dd.yyyy")+"'";
DataModule1->ADOQuery5->Open();
 
DataModule1->ADOQuery8->Close();
DataModule1->ADOQuery8->SQL->Clear();
DataModule1->ADOQuery8->SQL->Text="select SUM(price) as S from orders where id_shop='"+DataModule1->DataSource1->DataSet->FieldByName("id_shop")->Value+"' AND date BETWEEN'"+DateTimePicker1->Date.FormatString("MM.dd.yyyy")+"' AND '"+DateTimePicker2->Date.FormatString("MM.dd.yyyy")+"'";
DataModule1->ADOQuery8->Open();

Форма с отчетом.

C++
1
2
3
4
5
6
7
8
9
10
11
void __fastcall TForm20::QuickRep1BeforePrint(TCustomQuickRep *Sender,
      bool &PrintReport)
{
QRDBText3->DataSet=DataModule1->ADOQuery5;
QRDBText3->DataField="date";
QRDBText4->DataSet=DataModule1->ADOQuery5;
QRDBText4->DataField="price";
QRDBText5->DataSet=DataModule1->ADOQuery5;
QRDBText5->DataField="cargo";
QRDBText6->DataSet=DataModule1->ADOQuery8;
QRDBText6->DataField="S";

@Sasha · 08.06.2012, 18:11

Так покажи строку после которой вылетвет ошибка?

SlimFIT · 08.06.2012, 19:08 **[ТС]**

Ошибки никакой не выскакивает. Но и в поле QRDBText ничего не отображается.
Разместил вроде все верно: SummaryBand и в нем QRDBText6.

@Sasha · 08.06.2012, 19:40

Select SUM()

SlimFIT · 08.06.2012, 20:48 **[ТС]**

Все равно не считает. Сделал так:
Объявил глобальную переменную в 1ой форме (float s=0

Дописал после запроса присвоение к переменной:

C++
1
2
3
4
5
6
7
DataModule1->ADOQuery8->Close();
DataModule1->ADOQuery8->SQL->Clear();
DataModule1->ADOQuery8->SQL->Text="select SUM(price) as S from orders where id_shop='"+DataModule1->DataSource1->DataSet->FieldByName("id_shop")->Value+"' AND date BETWEEN'"+DateTimePicker1->Date.FormatString("MM.dd.yyyy")+"' AND '"+DateTimePicker2->Date.FormatString("MM.dd.yyyy")+"'";
DataModule1->ADOQuery8->Open();
 
s=DataModule1->ADOQuery8->FieldByName("S")->AsFloat;
FormatFloat("0.00",s);

Во ворой форме заменил QRDBText на QRLabel и дописал код:

C++
1
2
extern s;
QRLabel6->Caption=s;

В отчете отображается в поле сумма значение 0.

@Sasha · 08.06.2012, 22:44

C++
1
2
3
4
5
6
7
8
9
double s = 0;
DataModule1->ADOQuery8->Close();
DataModule1->ADOQuery8->SQL->Clear();
DataModule1->ADOQuery8->SQL->Text="select SUM(price) as S from orders where id_shop='"+DataModule1->DataSource1->DataSet->FieldByName("id_shop")->Value+"' AND date BETWEEN  :Data1 AND :Data2";
DataModule1->ADOQuery8->Parameters->ParamByName("Data1")->Value = DateTimePicker1->DateTime.FormatString("dd.mm.yyyy");
DataModule1->ADOQuery8->Parameters->ParamByName("Data2")->Value = DateTimePicker2->DateTime.FormatString("dd.mm.yyyy");
DataModule1->ADOQuery8->Open();
s=DataModule1->ADOQuery8->FieldByName("S")->AsFloat;
FormatFloat("0.00",s);

SlimFIT · 09.06.2012, 01:17 **[ТС]**

Все равно выводит в качестве результат 0. Даже не считает.

Новые блоги и статьи Все статьи Все блоги /
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20%	Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики. Hrethgir 07.04.2026 Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .	Горе от ума kumehtar 07.04.2026 Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .	Использование значений реквизитов справочника в документе, с определенными условиями и правами Maks 07.04.2026 1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .
Доступность команды формы по условию Maks 07.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .	Уведомление о неверно выбранном значении справочника Maks 06.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .	Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .

@Sasha 4956 / 2420 / 531 Регистрация: 05.06.2008 Сообщений: 7,518 Записей в блоге: 3
	08.06.2012, 18:11
	Так покажи строку после которой вылетвет ошибка? 0

SlimFIT 2 / 2 / 1 Регистрация: 30.03.2009 Сообщений: 61
	08.06.2012, 19:08 [ТС]
	Ошибки никакой не выскакивает. Но и в поле QRDBText ничего не отображается. Разместил вроде все верно: SummaryBand и в нем QRDBText6. 0

@Sasha 4956 / 2420 / 531 Регистрация: 05.06.2008 Сообщений: 7,518 Записей в блоге: 3
	08.06.2012, 19:40
	Select SUM() 0

SlimFIT 2 / 2 / 1 Регистрация: 30.03.2009 Сообщений: 61
	09.06.2012, 01:17 [ТС]
	Все равно выводит в качестве результат 0. Даже не считает. 0