Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Добавление данных через ХП [D5, IB6.x]

nick-from © (2002-11-20 23:38:00)
Сделал таблицу:

CREATE DOMAIN Id_Domain AS INTEGER NOT NULL CHECK (VALUE > 0);

CREATE DOMAIN Category_Domain AS VARCHAR(30) CHARACTER SET WIN1251 NOT NULL COLLATE PXW_CYRL;

CREATE DOMAIN ItemsCount_Domain AS INTEGER DEFAULT 0 NOT NULL CHECK (VALUE > -1);

CREATE DOMAIN Boolean_Int_Domain AS INTEGER DEFAULT 0 NOT NULL CHECK (VALUE IN (0, 1))

CREATE TABLE Categories
(
Id Id_domain,
Category Category_domain,
ItemsCount ItemsCount_domain,
IsCorruptible Boolean_Int_Domain,
CONSTRAINT pkCategories PRIMARY KEY (Id)
);

Потом сделал процедуру для добавления данных в эту таблицу:

CREATE PROCEDURE ADD_TO_CATEGORIES
(
ID INTEGER,
CATEGORY VARCHAR(30),
ITEMSCOUNT INTEGER,
ISCORRUPTIBLE INTEGER
)
AS
BEGIN
INSERT INTO Categories
(Id, Category, ItemsCount, IsCorruptible)
VALUES
(:Id, :Category, :ItemsCount, :IsCorruptible);
END;

Как вызвать эту процедуру у клиента?
(Последовательность действий в коде Delphi)
после того как кинул компонент и задал свойства БД и процедуры ?

nick-from (2002-11-22 00:30:00) [1]
А какая разница между ExecProc и ExecProcedure ?

AndrewVolkov (2002-11-21 13:14:00) [2]
Меня про исключительные не спрашивали :-))
Это уже вопрос не по базам :-))

BoxTer (2002-11-21 07:18:00) [3]
>AndrewVolkov
Это все замечательно, а вдруг???? искл. ситуация на серваке, шо тогда???
я бы маненько переделал:
try
Transaction.StartTransaction;
stored_Procedure.Params[1].Text:=text;
stored_Procedure.Params[2].Text:=.text;
stored_Procedure.Params[3].AsDateTime:=Date;
stored_Procedure.ExecProc;
Transaction.Commit;
except
Transaction.RollBackTransaction.
end;

AndrewVolkov (2002-11-20 23:43:00) [4]
Transaction.StartTransaction;
stored_Procedure.Params[1].Text:=text;
stored_Procedure.Params[2].Text:=.text;
stored_Procedure.Params[3].AsDateTime:=Date;
stored_Procedure.ExecProc;
Transaction.Commit;

Transaction - Имя твоей транзакции
stored_Procedure - Имя процедуры

и главное Params для Stored procedure добавь.
да вот вроде и усе

Наверх

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