同時トランザクションから呼び出されるプロシージャがあります。
//Some actions here
INSERT INTO table1
(table1_id, table1_val1, table1_val2, table1_val3)
VALUES
(gettablenewid('TABLE1'), val1, val2, val3);
INSERT INTO table1
(table1_id, table1_val1, table1_val2, table1_val3)
VALUES
(gettablenewid('TABLE1'), val1, val2, val3);
INSERT INTO table1
(table1_id, table1_val1, table1_val2, table1_val3)
VALUES
(gettablenewid('TABLE1'), val1, val2, val3);
//some other actions
関数 gettablenewid コード (id_table は各テーブルの PK を格納します):
create or replace
function GetTableNewId(tablename in varchar2)
return number is
PRAGMA AUTONOMOUS_TRANSACTION;
Result number;
cursor c1 is SELECT ig.id_value+1 id_new
FROM id_table ig
WHERE ig.table_identifier = tablename
FOR UPDATE of ig.id_value;
begin
for c1_rec in c1 loop
UPDATE id_table ig
SET ig.id_value = c1_rec.id_new
WHERE current of c1 ;
Result:=c1_rec.id_new;
end loop;
commit;
return(Result);
end GetTableNewId;
table1_id の ORA-00001 で INSERT ステートメントが失敗することがありますが、その理由がわかりません。