Проведение платежа

@Elizium33 · Регистрация: 16.04.2013

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

Добрый вечер!
Подскажите, пожалуйста, как получить информацию о проведенных платежах, т.е. какой запрос нужно составить(желательно используя при этом триггер или хранимую процедуру) и что в какую таблице нужно добавить что бы это можно было сделать.
Таблицы: Master (Tabel_nomer, FIO_master, Adres, INN, Nom_strax_svid, Data_roj);
Izdelie(Nomer_modeli, Nazvanie_modeli,Tip_izdelya,Material, Razmer,Opisanie);
Zakazchik (ID_zakazchika, Naimen_zakazchika, Adres_zakazchika, Pasport, INN_zakazchika,Bank_rekvizity);
Zakaz (Nomer_zakaza, Tabel_nomer,Nomer_modeli,ID_zakazchika,D ata_zakaza,Data_ispolnenya, Cena, Kolvo, Summa)

Первые таблица Заказ связана со всеми таблицами. СУБД Ms SQL Server 2000

@asd24 · 18.05.2013, 23:52

Не советую добавлять новые колонки для платежей в уже имеющиеся таблицы - они созданы для других целей. Создайте новую таблицу Payments (ID_Payment, Nomer_zakaza, Data_oplaty, Summa_oplaty)
Наполняете её информацией по оплате - номер заказа, по которому внесли оплату; дату оплаты; сумму, которую вес заказчик.
Процедура для получения полной информации о платежах:

T-SQL
1
2
3
4
5
CREATE PROCEDURE payments_info_get
AS 
SELECT z.Nomer_zakaza, p.Data_oplaty, p.Summa_oplaty
FROM Payments p
    INNER JOIN Zakaz z ON z.Nomer_zakaza = p.Nomer_zakaza

Процедура для получения информации в указанный период:

T-SQL
1
2
3
4
5
6
7
8
CREATE PROCEDURE payments_info_get
    @StartDate DATETIME,
    @EndDate DATETIME
AS 
SELECT z.Nomer_zakaza, p.Data_oplaty, p.Summa_oplaty
FROM Payments p
    INNER JOIN Zakaz z ON z.Nomer_zakaza = p.Nomer_zakaza
WHERE p.Data_oplaty BETWEEN @StartDate AND @EndDate

@Elizium33 · 18.05.2013, 23:58 **[ТС]**

Спасибо, выручили) А Вы случайно не знаете,как это потом вызвать из приложения в Delphi

@asd24 · 19.05.2013, 00:17

К сожалению, в Delphi не силен.
Если правильно помню, то вам изначально необходимо подготовить приложение для работы с БД. В Delphi 7 есть вкладка ADO - в ней лежат все необходимые компоненты(соединение, датасеты, процедуры)
После этого в коде необходимо определить по каким событиям (OnClick например) необходимо вызывать те или иные компоненты с процедурами.
Почитайте тут - должно помочь:
http://codingrus.ru/readarticle.php?article_id=759

Новые блоги и статьи Все статьи Все блоги /
Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .	SDL3 для Web (WebAssembly): Сборка SDL3 и Box2D из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .	SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .	И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.	«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»

@Elizium33 4 / 4 / 1 Регистрация: 16.04.2013 Сообщений: 85

	Проведение платежа 18.05.2013, 23:17. Показов 879. Ответов 3 Метки нет (Все метки) Добрый вечер! Подскажите, пожалуйста, как получить информацию о проведенных платежах, т.е. какой запрос нужно составить(желательно используя при этом триггер или хранимую процедуру) и что в какую таблице нужно добавить что бы это можно было сделать. Таблицы: Master (Tabel_nomer, FIO_master, Adres, INN, Nom_strax_svid, Data_roj); Izdelie(Nomer_modeli, Nazvanie_modeli,Tip_izdelya,Material, Razmer,Opisanie); Zakazchik (ID_zakazchika, Naimen_zakazchika, Adres_zakazchika, Pasport, INN_zakazchika,Bank_rekvizity); Zakaz (Nomer_zakaza, Tabel_nomer,Nomer_modeli,ID_zakazchika,D ata_zakaza,Data_ispolnenya, Cena, Kolvo, Summa) Первые таблица Заказ связана со всеми таблицами. СУБД Ms SQL Server 2000 0

@Elizium33 4 / 4 / 1 Регистрация: 16.04.2013 Сообщений: 85
	18.05.2013, 23:58 [ТС]
	Спасибо, выручили) А Вы случайно не знаете,как это потом вызвать из приложения в Delphi 0

@asd24 107 / 107 / 5 Регистрация: 28.12.2012 Сообщений: 207
	19.05.2013, 00:17
	К сожалению, в Delphi не силен. Если правильно помню, то вам изначально необходимо подготовить приложение для работы с БД. В Delphi 7 есть вкладка ADO - в ней лежат все необходимые компоненты(соединение, датасеты, процедуры) После этого в коде необходимо определить по каким событиям (OnClick например) необходимо вызывать те или иные компоненты с процедурами. Почитайте тут - должно помочь: http://codingrus.ru/readarticle.php?article_id=759 1