Thanks to visit codestin.com
Credit goes to github.com

Skip to content

Commit 966a1ce

Browse files
PazusPazus
committed
wrong test source code. fixed
1 parent 399f707 commit 966a1ce

1 file changed

Lines changed: 13 additions & 20 deletions

File tree

‎tests/ut_test/ut_test.ApplicationInfoOnExecution.sql‎

Lines changed: 13 additions & 20 deletions
Original file line numberDiff line numberDiff line change
@@ -100,45 +100,38 @@ begin
100100
dbms_lob.append(l_output,l_output_data(i));
101101
end loop;
102102

103-
gv_before_all_client_info varchar2(200);
104-
gv_before_each_client_info varchar2(200);
105-
gv_before_test_client_info varchar2(200);
106-
gv_after_test_client_info varchar2(200);
107-
gv_after_each_client_info varchar2(200);
108-
gv_after_all_client_info varchar2(200);
109-
110-
execute immediate 'begin :i := ut_output_tests.gv_before_all_client_info; end;' into l_client_info;
111-
if not nvl(l_client_info = 'Test: ut_output_tests (before all)', false) then
103+
execute immediate 'begin :i := ut_output_tests.gv_before_all_client_info; end;' using out l_client_info;
104+
if not nvl(l_client_info = 'Suite: ut_output_tests (before_all)', false) then
112105
dbms_output.put_line('Wrong before all text: '||l_client_info);
113106
l_result := false;
114107
end if;
115-
execute immediate 'begin :i := ut_output_tests.gv_before_each_client_info; end;' into l_client_info;
116-
if not nvl(l_client_info = 'Test: ut_output_tests (before each)', false) then
108+
execute immediate 'begin :i := ut_output_tests.gv_before_each_client_info; end;' using out l_client_info;
109+
if not nvl(l_client_info = 'Test: the_test (before_each)', false) then
117110
dbms_output.put_line('Wrong before each text: '||l_client_info);
118111
l_result := false;
119112
end if;
120-
execute immediate 'begin :i := ut_output_tests.gv_before_test_client_info; end;' into l_client_info;
121-
if not nvl(l_client_info = 'Test: ut_output_tests (before test)', false) then
113+
execute immediate 'begin :i := ut_output_tests.gv_before_test_client_info; end;' using out l_client_info;
114+
if not nvl(l_client_info = 'Test: the_test (before_test)', false) then
122115
dbms_output.put_line('Wrong before test text: '||l_client_info);
123116
l_result := false;
124117
end if;
125-
execute immediate 'begin :i := ut_output_tests.gv_after_test_client_info; end;' into l_client_info;
126-
if not nvl(l_client_info = 'Test: ut_output_tests (after test)', false) then
118+
execute immediate 'begin :i := ut_output_tests.gv_after_test_client_info; end;' using out l_client_info;
119+
if not nvl(l_client_info = 'Test: the_test (after_test)', false) then
127120
dbms_output.put_line('Wrong after test text: '||l_client_info);
128121
l_result := false;
129122
end if;
130-
execute immediate 'begin :i := ut_output_tests.gv_after_each_client_info; end;' into l_client_info;
131-
if not nvl(l_client_info = 'Test: ut_output_tests (after each)', false) then
123+
execute immediate 'begin :i := ut_output_tests.gv_after_each_client_info; end;' using out l_client_info;
124+
if not nvl(l_client_info = 'Test: the_test (after_each)', false) then
132125
dbms_output.put_line('Wrong after each text: '||l_client_info);
133126
l_result := false;
134127
end if;
135-
execute immediate 'begin :i := ut_output_tests.gv_after_all_client_info; end;' into l_client_info;
136-
if not nvl(l_client_info = 'Test: ut_output_tests (after all)', false) then
128+
execute immediate 'begin :i := ut_output_tests.gv_after_all_client_info; end;' using out l_client_info;
129+
if not nvl(l_client_info = 'Suite: ut_output_tests (after_all)', false) then
137130
dbms_output.put_line('Wrong after all text: '||l_client_info);
138131
l_result := false;
139132
end if;
140133

141-
if nvl(l_output like '%0 failed, 0 errored, 0 disabled, 0 warning(s)%',false) then
134+
if not nvl(l_output like '%0 failed, 0 errored, 0 disabled, 0 warning(s)%',false) then
142135
l_result := false;
143136
for i in 1 .. l_num_lines loop
144137
dbms_output.put_line(l_output_data(i));

0 commit comments

Comments
 (0)