Программа для складского учета (Delphi+SQL)

@Pandos · Регистрация: 12.04.2015

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

Помогите решить проблему.
Программа для складского учета.

Итоговая сводная таблица формируется на основании прихода и расхода и отражает по каждому виду материала общий приход, общий расход и остаток.(В дальнейшем будет переделано под обычную таблицу приход-расход-остаток)
Проблема в том, что в итоговой таблице количество расхода умножается столько, сколько раз этот материала поступал.

Например: Нам пришел Бетон два раза: 1 раз - 200 кг, 2 раз- 400 кг - итого: 600кг. А потратили мы 1 раз из этого всего 300 кг.

В сводной таблице отражается:
________________________________________ ___________________________
Наименование|Количество всего пришло|Количество всего выдали|Остаток
________________________________________ ___________________________
Бетон |200 |300 |-100
________________________________________ ___________________________
Бетон |400 |300 |100

А должно быть
________________________________________ ___________________________
Наименование|Количество всего пришло|Количество всего выдали|Остаток
________________________________________ ___________________________
Бетон |600 |300 |300

@krapotkin · 12.04.2015, 21:31

эммм, а где поправить-то нужно?

@Pandos · 12.04.2015, 23:39 **[ТС]**

прикладываю файл

@Pandos · 12.04.2015, 23:41 **[ТС]**

я забыл приложить файл он прям под вашим ответом.
запрос на выборку данных записан в самой программе на форме DM(в ADOQueryItog)

@krapotkin · 13.04.2015, 13:01

это перебор, тем более что delphi 7 у меня уж 15 лет нет, а access вообще никогда не стоял

вопрос-то должен звучать по-другому
у меня есть таблица TABLE1 - движение товара, примерно такая
ID, ATIME, PRODUCT_ID, QTY
PRODUCT_ID - код товара в справочнике товаров
"QTY" - аналог нашего "К-во"
приход QTY>0 расход QTY<0

вопрос - написать SQL-запрос. который выводит товар и сумму движения по товару
(я думаю, еще и при условии - в заданный временной период)

тогда ответ:

общий баланс

SQL
1
SELECT PRODUCT_ID, SUM(QTY) FROM TABLE1 WHERE ATIME BETWEEN(:TIME1 AND :TIME2) GROUP BY 1

только приходы

SQL
1
SELECT PRODUCT_ID, SUM(QTY) FROM TABLE1 WHERE QTY>0 ATIME BETWEEN(:TIME1 AND :TIME2) GROUP BY 1

только расходы

SQL
1
SELECT PRODUCT_ID, SUM(QTY) FROM TABLE1 WHERE QTY<0 ATIME BETWEEN(:TIME1 AND :TIME2) GROUP BY 1

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

SQL
1
2
3
4
5
SELECT
  (SELECT PRODUCT_ID, SUM(QTY) FROM TABLE1 WHERE QTY>0 ATIME BETWEEN(:TIME1 AND :TIME2) GROUP BY 1)  AS _IN,
  (SELECT PRODUCT_ID, SUM(QTY) FROM TABLE1 WHERE QTY<0 ATIME BETWEEN(:TIME1 AND :TIME2) GROUP BY 1)  AS _OUT,
  (SELECT PRODUCT_ID, SUM(QTY) FROM TABLE1 WHERE ATIME BETWEEN(:TIME1 AND :TIME2) GROUP BY 1) AS TOTAL
FROM Table1

вот как-то так

@Pandos · 14.04.2015, 19:17 **[ТС]**

А при чем здесь Access. Тут используется SQL

@krapotkin · 14.04.2015, 21:02

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

ADOQueryItog

интересно ADOquery он в какую базу лазит?

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .

@Pandos 2 / 2 / 0 Регистрация: 12.04.2015 Сообщений: 5

	Программа для складского учета (Delphi+SQL) 12.04.2015, 15:48. Показов 5115. Ответов 6 Метки нет (Все метки) Помогите решить проблему. Программа для складского учета. Итоговая сводная таблица формируется на основании прихода и расхода и отражает по каждому виду материала общий приход, общий расход и остаток.(В дальнейшем будет переделано под обычную таблицу приход-расход-остаток) Проблема в том, что в итоговой таблице количество расхода умножается столько, сколько раз этот материала поступал. Например: Нам пришел Бетон два раза: 1 раз - 200 кг, 2 раз- 400 кг - итого: 600кг. А потратили мы 1 раз из этого всего 300 кг. В сводной таблице отражается: ________________________________________ ___________________________ Наименование\|Количество всего пришло\|Количество всего выдали\|Остаток ________________________________________ ___________________________ Бетон \|200 \|300 \|-100 ________________________________________ ___________________________ Бетон \|400 \|300 \|100 А должно быть ________________________________________ ___________________________ Наименование\|Количество всего пришло\|Количество всего выдали\|Остаток ________________________________________ ___________________________ Бетон \|600 \|300 \|300 0

@krapotkin 6847 / 4674 / 1463 Регистрация: 14.04.2014 Сообщений: 20,660 Записей в блоге: 21
	12.04.2015, 21:31
	эммм, а где поправить-то нужно? 0

@Pandos 2 / 2 / 0 Регистрация: 12.04.2015 Сообщений: 5
	12.04.2015, 23:41 [ТС]
	я забыл приложить файл он прям под вашим ответом. запрос на выборку данных записан в самой программе на форме DM(в ADOQueryItog) 0

@Pandos 2 / 2 / 0 Регистрация: 12.04.2015 Сообщений: 5
	14.04.2015, 19:17 [ТС]
	А при чем здесь Access. Тут используется SQL 0