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

Skip to content
Merged
Changes from 1 commit
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
Next Next commit
Document a bug with capturing DBMS_OUTPUT before test run.
  • Loading branch information
jgebal committed May 30, 2018
commit 1175203bf6cf49baa13baad1c9b4d7138fc04aca
22 changes: 16 additions & 6 deletions test/api/test_ut_runner.pkb
Original file line number Diff line number Diff line change
Expand Up @@ -180,25 +180,35 @@ end;';
procedure run_keep_dbms_output_buffer is
l_expected dbmsoutput_linesarray;
l_actual dbmsoutput_linesarray;
l_lines number := 100;
l_results ut3.ut_varchar2_list;
l_lines number := 10000;
begin
--Arrange
create_test_spec();
create_test_body(0);

l_expected := dbmsoutput_linesarray(
'A text placed into DBMS_OUTPUT',
'Another line',
lpad('A very long line',10000,'a')
);
dbms_output.put_line(l_expected(1));
dbms_output.put_line(l_expected(2));
dbms_output.put_line(l_expected(3));
for i in 1 .. 300 loop
l_expected.extend;
l_expected(l_expected.last) := 'line '||i;
end loop;

for i in 1 .. l_expected.count loop
dbms_output.put_line(l_expected(i));
end loop;

--Act
ut3.ut.run('test_cache');
select *
bulk collect into l_results
from table(ut3.ut.run('test_cache'));

--Assert
dbms_output.get_lines(lines => l_actual, numlines => l_lines);
for i in 1 .. l_expected.count loop
for i in 1 .. l_lines loop
ut.expect(l_actual(i)).to_equal(l_expected(i));
end loop;
drop_test_package();
Expand Down