mirror of
https://github.com/FirebirdSQL/firebird-qa.git
synced 2025-01-22 13:33:07 +01:00
61 lines
1.3 KiB
Python
61 lines
1.3 KiB
Python
#coding:utf-8
|
|
|
|
"""
|
|
ID: issue-4938
|
|
ISSUE: 4938
|
|
TITLE: Regression: SP "Domain" and "Type Of" based variables referring BLOB with
|
|
sub_type < 0 no longer work
|
|
DESCRIPTION:
|
|
JIRA: CORE-4623
|
|
FBTEST: bugs.core_4623
|
|
"""
|
|
|
|
import pytest
|
|
from firebird.qa import *
|
|
|
|
db = db_factory()
|
|
|
|
test_script = """
|
|
create or alter procedure sp_test as begin end;
|
|
recreate table test (id int);
|
|
commit;
|
|
set term ^;
|
|
execute block as
|
|
begin
|
|
execute statement 'drop domain dm_01';
|
|
when any do begin end
|
|
end
|
|
^
|
|
set term ;^
|
|
commit;
|
|
|
|
create domain dm_01 as blob sub_type -32768 segment size 32000;
|
|
recreate table test (b_field dm_01);
|
|
commit;
|
|
|
|
set term ^;
|
|
create or alter procedure sp_test (
|
|
b01 blob sub_type -32768 segment size 32000,
|
|
b02 type of column test.b_field,
|
|
b03 dm_01
|
|
) as
|
|
begin
|
|
end
|
|
^
|
|
create or alter trigger test_bi0 for test active before insert position 0 as
|
|
declare b01 blob sub_type -32768 segment size 32000;
|
|
declare b02 type of column test.b_field;
|
|
declare b03 dm_01;
|
|
begin
|
|
end
|
|
^
|
|
set term ;^
|
|
commit;
|
|
"""
|
|
|
|
act = isql_act('db', test_script)
|
|
|
|
@pytest.mark.version('>=3')
|
|
def test_1(act: Action):
|
|
act.execute()
|