Запрос по вычислению суммы заказа

@heatingtea · Регистрация: 25.01.2021

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

С помощью запроса вычислить сумму заказа которая будет вставляться в таблицу Журнал заказов в поле "Итог" нажатием кнопки "Рассчитать итог". Суммой заказа будет являться сумма полей "Итог" из таблицы Заказы, с одинаковым номером заказа. То есть клиент заказывает несколько блюд и в итоге получается итоговая сумма.

@SeGun · 18.01.2023, 13:38

Сначала сделайте запрос на обновление, который будет заносить в поле итог цену умноженную на количество товара (блюд).
Этот запрос должен срабатывать сразу после добавления блюда в заказ.

@heatingtea · 18.01.2023, 19:19 **[ТС]**

Я хотела сделать через запрос это, но не смогла понять как

@Пытливый · 18.01.2023, 20:41

Посмотрел вашу базу. Есть некоторые замечания.
1. Таблица Заказы не содержит главного ключа. Таблица заказы не имеет связи с таблицей Меню, т.е. смысл Меню вообще пропадает. В заказе вы должны указать Код из Меню, а уже по нему вы получите Блюдо и его Цену, а потому поле Цена в таблице Заказы лишнее. Поле Итог является вычисляемым и потому оно тоже не нужно.
2. Главные ключи у вас строковые, что исключает их автоматическую генерацию и как следствие вы их формируете вручную. Так делать не стоит, для главных ключей есть тип поля счетчик.
3. Вы смешали в одной таблице Меню, две разные сущности Меню и Блюда. Меню формируется из блюд и вот в блюде должен быть его тип и вес, а в меню блюдо и его цена. У вас списка Блюд нет вообще.
4. В журнале заказов поле Итог тоже не нужно, т.к. оно тоже получается запросом по детализации заказа.

Добавлено через 5 минут
Вообще вам придется хоть немного попрактиковаться в написании запросов, благо Акцес в этом вопросе очень дружественен.

@SeGun · 18.01.2023, 21:33

Сообщение от heatingtea

Я хотела сделать через запрос это, но не смогла понять как

Ну скажем так:

Delphi
1
2
3
4
5
6
7
8
9
procedure TForm2.Button10Click(Sender: TObject);
begin
  if DataModule1.ADOQuery5.Modified then
  DataModule1.ADOQuery5.Post;
  DataModule1.ADOQuery6.SQL.Clear;
  DataModule1.ADOQuery6.SQL.Add('Update [Заказы] Set Итог=[Цена]*[Кол-во] Where [Номер заказа]=:Param1');
  DataModule1.ADOQuery6.Parameters.ParamByName('Param1').Value :=Form2.DBLookupComboBox1.KeyValue;
  DataModule1.ADOQuery6.ExecSQL;
end;

Ну и все замечания которые высказал тов. Пытливый неплохо-бы исправить.

Добавлено через 35 минут
Да. И т.к. количество целое число (клиент не может получить половину порции) по умолчанию, при добавлении заказа там должна появляться хотя бы 1.

@Пытливый · 19.01.2023, 01:08

Сообщение от SeGun

клиент не может получить половину порции

Вообще то может. Очень часто девушки заказывают половинку порции.

@SeGun · 19.01.2023, 08:45

Сообщение от Пытливый

Вообще то может. Очень часто девушки заказывают половинку порции.

Теоретически должен иметь такую возможность (если в базе к-во не целое число, как в данном случае).

@heatingtea · 20.01.2023, 08:42 **[ТС]**

Вставила код в кнопку "Рассчитать итог" на вкладке "Заказы", почему то не работает

@SeGun · 20.01.2023, 09:02

Когда суммы заказов уже есть в таблице Заказы, итог в чеке рассчитать уже проще.
Сегодня покажу как.

Добавлено через 8 минут
В принципе, аналогичный запрос на обновление, с тем лишь отличием что обновляем таблицу "Журнал заказов" и не умножением а подсчётом суммы SQL оператор SUM(Итог) по таблице Заказы.

Попробуйте сделать самостоятельно, если не получится вечером покажу как.

@heatingtea · 20.01.2023, 09:34 **[ТС]**

Нет, вы не поняли, я не могу сделать запрос на умножение, который вы отправили. Запрос для "журнала заказов" мне тоже нужен, но сначала я хочу чтобы работала кнопка на "Заказах"

Добавлено через 10 минут
При нажатии на кнопку, в поле цена и итог ничего не появляется

@D1973 · 20.01.2023, 09:39

Сообщение от heatingtea

почему то не работает

офигительно точный диагноз!

heatingtea, что значит "не работает"? Ошибка? Неверный результат? Что-то еще?

Сообщение от heatingtea

Вставила код в кнопку

Что именно вставили? Куда именно вставили? Где Ваш код?

Почему проблема у Вас, а угадывать должны мы? Это ведь только в Ваших интересах - предоставить как можно более полную информацию.

@heatingtea · 20.01.2023, 21:20 **[ТС]**

Спасибо за замечания, не могли бы вы посмотреть мою базу данных теперь, единственное что я не сделала это не разделила меню и блюда, но хотелось бы знать правильно ли я расставила ключевые поля и связи.

@SeGun · 20.01.2023, 21:24

heatingtea
Кнопки работают.
Проект прилагаю.
Делал для модуля администратор, для официанта по аналогии.

@SeGun · 20.01.2023, 21:27

Да в свете новых, правильных автоинкрементных ключевых полей может и не заработать.

Хотя - пробуйте.

@heatingtea · 20.01.2023, 21:49 **[ТС]**

Спасибо большое, всё работает! Буду пытаться переделать программу под базу данных

@Пытливый · 20.01.2023, 22:50

Что касается замечаний по новой структуре БД:
Главные ключи таблиц создаются для целостности данных, они не обязательно должны идти последовательно, но они должны быть уникальны поэтому поле-счетчик использовать для чего то другого не надо.
В таблице столики Номер столика у вас и главный ключ и номер столика - это ошибка. Дело в том, что счетчик нельзя изменять руками, а в случае удаления или отказа от записи счетчик все равно увеличит свое значение и как следствие вместо последовательного ряда номеров столиков 1,2,3,4 вы получите 1,2,5,9. Для главного ключа это не важно, а вот нумерация столиков такой быть не должна.
Таблица Журнал заказов, главного ключа не содержит - видимо пропустили.

Добавлено через 5 минут
Таблица Заказы тоже имеет поле Номер заказа как счетчик. Нумерация заказов обычно ежегодно начинается заново, а с полем счетчик такой фокус не прокатит, да и разрывы в нумерации заказов тоже нежелательны, так что тоже исправьте.

@heatingtea · 21.01.2023, 08:30 **[ТС]**

Хотела задать ещё один вопрос по поводу программы, зачем подключать ещё один ADOQuery, если уже есть тот, который подключается к "Заказам"? И можно ли сделать запрос для кнопки "Рассчитать итог" такого же вида как ваш, потому что я использовала другой способ

Delphi
1
2
3
4
procedure TDataModule1.ADOQuery1CalcFields(DataSet: TDataSet);
begin
   ADOQuery5DSDesigner5.AsInteger:=ADOQuery5DSDesigner3.AsInteger*ADOQuery5DSDesigner4.AsInteger;
end;

@SeGun · 21.01.2023, 09:42

Сообщение от heatingtea

Хотела задать ещё один вопрос по поводу программы, зачем подключать ещё один ADOQuery, если уже есть тот, который подключается к "Заказам"?

Результат запроса всего одно поле сумма заказа ADOQuery7, при этом должно быть еще сохранено перемещение по DbGrid ADOQuery6.

Сообщение от heatingtea

И можно ли сделать запрос для кнопки "Рассчитать итог" такого же вида как ваш, потому что я использовала другой способ

Да можно просто там будет не сумма, а умножение.

Добавлено через 11 минут

Сообщение от Пытливый

Таблица Заказы тоже имеет поле Номер заказа как счетчик. Нумерация заказов обычно ежегодно начинается заново, а с полем счетчик такой фокус не прокатит, да и разрывы в нумерации заказов тоже нежелательны, так что тоже исправьте.

Кроме ключевого поля счётчик, можно добавить еще поле для подсчёта целочисленного внутреннего номера в заказе и увеличивать с каждой новой позицией на 1.
Для нового заказа начинать с 1.

Добавлено через 17 минут
Единственный нюанс, при добавлении в старый заказ, придётся находить запросом максимальное значение этого поля.

SQL
1
SELECT MAX(поле подсчёта позиций в заказе (пока назовем его так)) FROM Заказы  WHERE [Номер заказа]=:Param1

И затем, полученное значение увеличивать на 1 для каждой новой позиции.

@heatingtea · 21.01.2023, 10:12 **[ТС]**

Извините, а можно хотя бы пример как сделать запрос на умножение

@SeGun · 21.01.2023, 10:27

Тот что в 5 м посте - он рабочий.
Только используйте для нужной кнопки, я его по моему на официантском интерфейсе проверял.

Новые блоги и статьи Все статьи Все блоги /
Расчёт токов в цепи постоянного тока igorrr37 05.01.2026 / * Дана цепь постоянного тока с сопротивлениями и напряжениями. Надо найти токи в ветвях. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа и решает её. Последовательность действий:. . .	Новый CodeBlocs. Версия 25.03 palva 04.01.2026 Оказывается, недавно вышла новая версия CodeBlocks за номером 25. 03. Когда-то давно я возился с только что вышедшей тогда версией 20. 03. С тех пор я давно снёс всё с компьютера и забыл. Теперь. . .	Модель микоризы: классовый агентный подход anaschu 02.01.2026 Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .	Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Programma_Boinc 28.12.2025 Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / ********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / ********/ gallery/ bKBkQFf Пост отсюда. . .
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США. Programma_Boinc 26.12.2025 Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .	Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Programma_Boinc 23.12.2025 Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .	PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Как объединить две одинаковые БД Access с разными данными VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.

Запрос по вычислению суммы заказа

Решение

Решение

@SeGun 126 / 106 / 20 Регистрация: 23.05.2015 Сообщений: 694
	18.01.2023, 13:38
	Сначала сделайте запрос на обновление, который будет заносить в поле итог цену умноженную на количество товара (блюд). Этот запрос должен срабатывать сразу после добавления блюда в заказ. 0

@heatingtea 24 / 2 / 0 Регистрация: 25.01.2021 Сообщений: 134
	18.01.2023, 19:19 [ТС]
	Я хотела сделать через запрос это, но не смогла понять как 0

@Пытливый 3763 / 2267 / 705 Регистрация: 29.05.2013 Сообщений: 9,622
	18.01.2023, 20:41
	Посмотрел вашу базу. Есть некоторые замечания. 1. Таблица Заказы не содержит главного ключа. Таблица заказы не имеет связи с таблицей Меню, т.е. смысл Меню вообще пропадает. В заказе вы должны указать Код из Меню, а уже по нему вы получите Блюдо и его Цену, а потому поле Цена в таблице Заказы лишнее. Поле Итог является вычисляемым и потому оно тоже не нужно. 2. Главные ключи у вас строковые, что исключает их автоматическую генерацию и как следствие вы их формируете вручную. Так делать не стоит, для главных ключей есть тип поля счетчик. 3. Вы смешали в одной таблице Меню, две разные сущности Меню и Блюда. Меню формируется из блюд и вот в блюде должен быть его тип и вес, а в меню блюдо и его цена. У вас списка Блюд нет вообще. 4. В журнале заказов поле Итог тоже не нужно, т.к. оно тоже получается запросом по детализации заказа. Добавлено через 5 минут Вообще вам придется хоть немного попрактиковаться в написании запросов, благо Акцес в этом вопросе очень дружественен. 1

@heatingtea 24 / 2 / 0 Регистрация: 25.01.2021 Сообщений: 134
	20.01.2023, 08:42 [ТС]
	Вставила код в кнопку "Рассчитать итог" на вкладке "Заказы", почему то не работает 0

@SeGun 126 / 106 / 20 Регистрация: 23.05.2015 Сообщений: 694
	20.01.2023, 09:02
	Когда суммы заказов уже есть в таблице Заказы, итог в чеке рассчитать уже проще. Сегодня покажу как. Добавлено через 8 минут В принципе, аналогичный запрос на обновление, с тем лишь отличием что обновляем таблицу "Журнал заказов" и не умножением а подсчётом суммы SQL оператор SUM(Итог) по таблице Заказы. Попробуйте сделать самостоятельно, если не получится вечером покажу как. 1

@heatingtea 24 / 2 / 0 Регистрация: 25.01.2021 Сообщений: 134
	20.01.2023, 09:34 [ТС]
	Нет, вы не поняли, я не могу сделать запрос на умножение, который вы отправили. Запрос для "журнала заказов" мне тоже нужен, но сначала я хочу чтобы работала кнопка на "Заказах" Добавлено через 10 минут При нажатии на кнопку, в поле цена и итог ничего не появляется 0

@SeGun 126 / 106 / 20 Регистрация: 23.05.2015 Сообщений: 694
	20.01.2023, 21:27
	Да в свете новых, правильных автоинкрементных ключевых полей может и не заработать. Хотя - пробуйте. 1

@heatingtea 24 / 2 / 0 Регистрация: 25.01.2021 Сообщений: 134
	20.01.2023, 21:49 [ТС]
	Спасибо большое, всё работает! Буду пытаться переделать программу под базу данных 0

@Пытливый 3763 / 2267 / 705 Регистрация: 29.05.2013 Сообщений: 9,622
	20.01.2023, 22:50
	Сообщение было отмечено heatingtea как решение Решение Что касается замечаний по новой структуре БД: Главные ключи таблиц создаются для целостности данных, они не обязательно должны идти последовательно, но они должны быть уникальны поэтому поле-счетчик использовать для чего то другого не надо. В таблице столики Номер столика у вас и главный ключ и номер столика - это ошибка. Дело в том, что счетчик нельзя изменять руками, а в случае удаления или отказа от записи счетчик все равно увеличит свое значение и как следствие вместо последовательного ряда номеров столиков 1,2,3,4 вы получите 1,2,5,9. Для главного ключа это не важно, а вот нумерация столиков такой быть не должна. Таблица Журнал заказов, главного ключа не содержит - видимо пропустили. Добавлено через 5 минут Таблица Заказы тоже имеет поле Номер заказа как счетчик. Нумерация заказов обычно ежегодно начинается заново, а с полем счетчик такой фокус не прокатит, да и разрывы в нумерации заказов тоже нежелательны, так что тоже исправьте. 1

@heatingtea 24 / 2 / 0 Регистрация: 25.01.2021 Сообщений: 134
	21.01.2023, 10:12 [ТС]
	Извините, а можно хотя бы пример как сделать запрос на умножение 0

@SeGun 126 / 106 / 20 Регистрация: 23.05.2015 Сообщений: 694
	21.01.2023, 10:27
	Тот что в 5 м посте - он рабочий. Только используйте для нужной кнопки, я его по моему на официантском интерфейсе проверял. 1