6
0
mirror of https://github.com/FirebirdSQL/firebird-qa.git synced 2025-01-22 21:43:06 +01:00
firebird-qa/tests/bugs/core_4002_test.py

116 lines
2.8 KiB
Python

#coding:utf-8
#
# id: bugs.core_4002
# title: Error message "index unexpectedly deleted" in database trigger on commit transaction
# decription:
# tracker_id: CORE-4002
# min_versions: ['2.5.3']
# versions: 2.5.3
# qmid: None
import pytest
from firebird.qa import db_factory, isql_act, Action
# version: 2.5.3
# resources: None
substitutions_1 = []
init_script_1 = """
create or alter trigger trg_commit active on transaction commit position 999 as
begin
end;
create or alter procedure test_gg as begin end;
commit;
recreate global temporary table g2(id int);
commit;
recreate global temporary table g1 (
id int primary key,
tt varchar(100) not null,
bb blob sub_type 1 segment size 80 not null
) on commit delete rows;
commit;
recreate global temporary table g2 (
id int primary key ,
id_g1 int not null references g1,
tt varchar(100) not null,
bb blob sub_type 1 segment size 80 not null
) on commit delete rows;
commit;
set term ^ ;
create or alter procedure test_gg
as
declare i int = 0;
begin
in autonomous transaction do
while (i<100) do
begin
insert into g1 (id, tt, bb) values (:i, rand(), rand());
insert into g2 (id, id_g1, tt, bb) values (:i*1000+1, :i, rand(), rand());
insert into g2 (id, id_g1, tt, bb) values (:i*1000+2, :i, rand(), rand());
insert into g2 (id, id_g1, tt, bb) values (:i*1000+3, :i, rand(), rand());
insert into g2 (id, id_g1, tt, bb) values (:i*1000+4, :i, rand(), rand());
insert into g2 (id, id_g1, tt, bb) values (:i*1000+5, :i, rand(), rand());
i=i+1;
end
end^
commit^
create or alter trigger trg_commit
active on transaction commit position 999
as
declare variable id integer;
declare variable tt varchar(100);
declare variable bb blob sub_type 1;
declare variable id_g1 integer;
declare variable tt_2 varchar(100);
declare variable bb_2 blob sub_type 1;
declare i int=0;
begin
for select id, tt, bb
from g1
order by id
into :id, :tt, :bb
do
begin
for select id_g1, tt, bb
from g2
where id_g1=:id
order by id
into :id_g1, :tt_2, :bb_2
do
begin
i=i+1;
end
end
end^
set term ;^
commit;
"""
db_1 = db_factory(page_size=4096, sql_dialect=3, init=init_script_1)
test_script_1 = """
execute procedure test_gg;
commit;
"""
act_1 = isql_act('db_1', test_script_1, substitutions=substitutions_1)
@pytest.mark.version('>=2.5.3')
def test_1(act_1: Action):
act_1.execute()