DelphiLexx
Дата: 03.11.2005 15:03:39
Есть хранимая процедура, которая вставляет записи по определенному условию. Но записи не вставляются в таблицу нужно как-то потдвердить транзакцию. Как это сделать?
CREATE PROCEDURE UPD_RGRSN_COEFSNT (
RAWGROUPID INTEGER,
QLT_ID INTEGER,
K1 DOUBLE PRECISION,
K2 DOUBLE PRECISION)
AS
BEGIN
IF (NOT EXISTS (SELECT rgc.RAW_GROUP_ID, rgc.QLT_ID
FROM rgrsn_coeffsnt rgc
WHERE rgc.raw_group_id =:rawgroupid AND
rgc.qlt_id =:qlt_id)) THEN BEGIN
INSERT INTO rgrsn_coeffsnt
(RAW_GROUP_ID, QLT_ID, K1, K2)
VALUES (:rawgroupid, :qlt_id, :K1, :K2);
END
ELSE BEGIN
UPDATE RGRSN_COEFFSNT
SET
K1 =:K1,
K2 =:K2
WHERE RAW_GROUP_ID =:RAWGROUPID AND
QLT_ID =:QLT_ID;
END
suspend;
END