Добрый день всем! Я не сильна в pl/sql, так что нужна помощь. Надо создать процедуру, при запуске которой будут сверятся 2 таблички, если не совпадают данные, то будет происходить update или insert. Я сделала одну версию с MERGE, но там я не могу пометить проапдейчиные записи.
Вот второй вариант, но update не работает. Может кто-нибудь посоветовать что-то?
CREATE OR REPLACE PROCEDURE check_firm IS
v_gt firm_mdm%ROWTYPE;
BEGIN
FOR b IN (SELECT mdm_id,
s_firm_name_rus,
f_firm_name_rus,
f_firm_name_eng,
inn,
kpp,
archiv
FROM firm
WHERE NOT EXISTS (SELECT * FROM firm_mdm WHERE firm_mdm.mdm_id = firm.mdm_id))
LOOP
INSERT INTO firm_mdm
(mdm_id, s_firm_name_rus, s_firm_name_eng, f_firm_name_rus, inn, kpp, archiv, time_stamp, created)
VALUES
(b.mdm_id, b.s_firm_name_rus, b.f_firm_name_rus, b.f_firm_name_eng, b.inn, b.kpp, b.archiv, SYSDATE, 1);
END LOOP;
FOR c IN (SELECT * FROM firm)
LOOP
IF firm.s_firm_name_rus <> firm_mdm_gt.s_firm_name_rus THEN

UPDATE firm_mdm
SET firm_mdm.s_firm_name_rus = firm.s_firm_name_rus,
firm_mdm.time_stamp = SYSDATE,
firm_mdm.created = 1;
END IF;
END LOOP;
END;

Dimitry Sibiryakov,
дело в том ,что на входе нет параметров у процедуры.
Поэтому, при update выходит ошибка
ORA-01422: Точная выборка возвращает количество строк больше запрошенного

Т.е. при условии if она сравнивает с множеством, я так понимаю.

andrey_anonymous, дак я и написала, чтоб указали на ошибку. Самой найти не получается

andrey_anonymous,
FOR c IN (SELECT * FROM firm)
LOOP
SELECT * INTO v_gt FROM firm_mdm;
IF c.s_firm_name_rus <> v_gt.s_firm_name_rus THEN
UPDATE firm_mdm
SET firm_mdm.s_firm_name_rus = c.s_firm_name_rus,
firm_mdm.time_stamp = SYSDATE,
firm_mdm.created = 1
WHERE v_gt.mdm_id = c.mdm_id;
END IF;
END LOOP;

где v_gt firm_mdm%ROWTYPE;
но и так не работает.

SY,
мне надо не по одному полю, там в примере просто только одно. Необходимо пометить измененные записи по любому полю

CREATE OR REPLACE PROCEDURE load_contractor_equeue(res OUT NUMBER) IS l_count NUMBER;

l_count_new NUMBER;

l_count_new2 NUMBER;

BEGIN
res := 0;
SELECT COUNT(firm.mdm_id) INTO l_count FROM firm;
MERGE INTO firm_mdm p
USING (SELECT mdm_id,
s_firm_name_rus,
f_firm_name_rus,
f_firm_name_eng ,
inn,
kpp,
archiv
FROM firm) p1
ON (p.mdm_id = p1.mdm_id)
WHEN MATCHED THEN
UPDATE
SET p.s_firm_name_rus = p1.s_firm_name_rus,
p.s_firm_name_eng = p1.f_firm_name_eng,
p.f_firm_name_rus = p1.f_firm_name_rus,
p.inn = p1.inn,
p.kpp = p1.kpp,
p.archiv = p1.archiv,
p.time_stamp = sysdate,
p.created = '1'
where p.s_firm_name_rus <> p1.s_firm_name_rus or
p.f_firm_name_rus <> p1.f_firm_name_rus or
p.inn <> p1.inn or
p.kpp <> p1.kpp or
p.archiv <> p1.archiv
WHEN NOT MATCHED THEN
INSERT
(p.mdm_id, p.s_firm_name_rus, p.f_firm_name_rus, p.inn, p.kpp, p.archiv,p.time_stamp,p.created)
VALUES
(p1.mdm_id, p1.s_firm_name_rus, p1.f_firm_name_rus, p1.inn, p1.kpp, p1.archiv, sysdate, '1');
SELECT COUNT(firm_mdm.mdm_id) INTO l_count_new FROM firm_mdm;
IF l_count = l_count_new THEN
res := 1;
dbms_output.put_line('MERGE выполнен успешно,кол-во строк FIRM_MDM=' || l_count_new ||
', кол-во строк FIRM_MDM= ' || l_count);
ELSE
dbms_output.put_line('MERGE не выполнен');
END IF;
EXCEPTION
WHEN OTHERS THEN
ROLLBACK;
COMMIT;
END load_contractor_equeue;

Бельфя, да, я понимаю. Просто не могу придумать, как это сделать иначе

SY, блин, спасибо! С MERGE и where все работает! Я даже не знаю, почему не пробовала его раньше добавлять. Не так часто (очень редко) MERGE использую.