mirror of
https://github.com/FirebirdSQL/firebird-qa.git
synced 2025-01-22 21:43:06 +01:00
76 lines
1.7 KiB
Python
76 lines
1.7 KiB
Python
#coding:utf-8
|
|
|
|
"""
|
|
ID: issue-8063
|
|
ISSUE: https://github.com/FirebirdSQL/firebird/issues/8063
|
|
TITLE: (var)char variables/parameters assignments fail in Stored Procedures with subroutines
|
|
DESCRIPTION:
|
|
NOTES:
|
|
[02.04.2024] pzotov
|
|
Test code has been changed to be minimal reproducable.
|
|
|
|
Confirmed bug on 6.0.0.305 8a4f691; 5.0.1.1371 295758d
|
|
Checked on 6.0.0.305 73551f3; 5.0.1.1371 48915d1 (intermediate snapshots).
|
|
"""
|
|
|
|
import pytest
|
|
from firebird.qa import *
|
|
|
|
db = db_factory()
|
|
|
|
test_script = """
|
|
set bail on;
|
|
set list on;
|
|
set term ^;
|
|
create or alter procedure sp_test_1 returns (
|
|
o_char varchar(10)
|
|
) sql security invoker
|
|
as
|
|
declare outer_v varchar(10) character set utf8; -- <<< [!] <<< charset *utf8* must be specified here to reproduce
|
|
|
|
declare function f_inner returns int as
|
|
begin
|
|
outer_v = current_user;
|
|
return 1;
|
|
end
|
|
|
|
begin
|
|
outer_v = current_user;
|
|
o_char = outer_v;
|
|
suspend;
|
|
end
|
|
^
|
|
|
|
create or alter procedure sp_test_2 returns (
|
|
o_char varchar(10)
|
|
) sql security invoker
|
|
as
|
|
declare outer_v varchar(10) character set utf8;
|
|
begin
|
|
outer_v = current_user;
|
|
o_char = outer_v;
|
|
suspend;
|
|
end
|
|
^
|
|
set term ^;
|
|
commit;
|
|
|
|
select o_char as sp_1 from sp_test_1;
|
|
|
|
select o_char as sp_2 from sp_test_2;
|
|
"""
|
|
|
|
act = isql_act('db', test_script, substitutions=[ ('[ \\t]+', ' ') ])
|
|
|
|
@pytest.mark.version('>=5.0.1')
|
|
def test_1(act: Action):
|
|
|
|
expected_stdout = f"""
|
|
SP_1 {act.db.user}
|
|
SP_2 {act.db.user}
|
|
"""
|
|
act.expected_stdout = expected_stdout
|
|
act.execute(combine_output = True)
|
|
assert act.clean_stdout == act.clean_expected_stdout
|
|
|