mirror of
https://github.com/FirebirdSQL/firebird-qa.git
synced 2025-01-23 14:03:06 +01:00
97 lines
3.0 KiB
Python
97 lines
3.0 KiB
Python
#coding:utf-8
|
|
#
|
|
# id: functional.gtcs.execute_statement_within_procedure
|
|
# title: GTCS/tests/CF_ISQL_27. EXECUTE STATEMENT within a stored procedure could lead to a problems
|
|
# decription:
|
|
# ::: NB :::
|
|
# ### Name of original test has no any relation with actual task of this test: ###
|
|
# https://github.com/FirebirdSQL/fbtcs/blob/master/GTCS/tests/CF_ISQL_27.script
|
|
#
|
|
# Discuss in fb-devel (subj: "Vulcan, CF_ISQL_27.sql"):
|
|
# https://sourceforge.net/p/firebird/mailman/message/17631672/
|
|
#
|
|
# Author said that example from this test did not return any error (and he expacted this)
|
|
# plus either did not return value into output parameter or even lead server to crash
|
|
# (when such SP was called twise).
|
|
# For current FB versions no error occurs and output value is issued w/o any problems.
|
|
#
|
|
# Checked on: 4.0.0.1803 SS; 3.0.6.33265 SS; 2.5.9.27149 SC.
|
|
#
|
|
# tracker_id:
|
|
# min_versions: ['2.5.0']
|
|
# versions: 2.5
|
|
# qmid: None
|
|
|
|
import pytest
|
|
from firebird.qa import db_factory, isql_act, Action
|
|
|
|
# version: 2.5
|
|
# resources: None
|
|
|
|
substitutions_1 = []
|
|
|
|
init_script_1 = """"""
|
|
|
|
db_1 = db_factory(sql_dialect=3, init=init_script_1)
|
|
|
|
test_script_1 = """
|
|
create generator gen_test1;
|
|
set generator gen_test1 to 1111111;
|
|
create generator gen_test2;
|
|
set generator gen_test2 to 2222222;
|
|
set term ^;
|
|
create procedure rpl$generator_values
|
|
returns (
|
|
gen_name varchar(31),
|
|
gen_value integer
|
|
)
|
|
as
|
|
begin
|
|
for
|
|
select rdb$generator_name
|
|
from rdb$generators
|
|
where coalesce (rdb$system_flag, 0) = 0
|
|
order by 1
|
|
into :gen_name do
|
|
begin
|
|
execute statement 'select gen_id(' || gen_name || ',0) from rdb$database' into :gen_value;
|
|
suspend;
|
|
end
|
|
end
|
|
^
|
|
set term ;^
|
|
commit;
|
|
|
|
set list on;
|
|
select 'point-1' msg, p.* from rpl$generator_values p;
|
|
select 'point-2' msg, p.* from rpl$generator_values p;
|
|
|
|
"""
|
|
|
|
act_1 = isql_act('db_1', test_script_1, substitutions=substitutions_1)
|
|
|
|
expected_stdout_1 = """
|
|
MSG point-1
|
|
GEN_NAME GEN_TEST1
|
|
GEN_VALUE 1111111
|
|
|
|
MSG point-1
|
|
GEN_NAME GEN_TEST2
|
|
GEN_VALUE 2222222
|
|
|
|
MSG point-2
|
|
GEN_NAME GEN_TEST1
|
|
GEN_VALUE 1111111
|
|
|
|
MSG point-2
|
|
GEN_NAME GEN_TEST2
|
|
GEN_VALUE 2222222
|
|
"""
|
|
|
|
@pytest.mark.version('>=2.5')
|
|
def test_execute_statement_within_procedure_1(act_1: Action):
|
|
act_1.expected_stdout = expected_stdout_1
|
|
act_1.execute()
|
|
assert act_1.clean_expected_stdout == act_1.clean_stdout
|
|
|