@@ -4,41 +4,29 @@ create or replace package body test_output_buffer is
44 l_result varchar2(4000);
55 l_remaining integer;
66 l_expected varchar2(4000);
7- l_reporter ut3.ut_reporter_base :=ut3. ut_documentation_reporter ();
7+ l_buffer ut3.ut_output_buffer_base := ut3.ut_output_table_buffer ();
88 begin
99 --Act
1010 l_expected := lpad('a text',4000,',a text');
11- ut3.ut_output_buffer. send_line(l_reporter, l_expected);
11+ l_buffer. send_line(l_expected);
1212
13- select * into l_result from table(ut3.ut_output_buffer. get_lines(l_reporter.reporter_id ,0));
13+ select * into l_result from table(l_buffer. get_lines(0 ,0));
1414
1515 ut.expect(l_result).to_equal(l_expected);
1616
17- select count(1) into l_remaining from ut3.ut_output_buffer_tmp where reporter_id = l_reporter.reporter_id ;
17+ select count(1) into l_remaining from ut3.ut_output_buffer_tmp where output_id = l_buffer.output_id ;
1818
1919 ut.expect(l_remaining).to_equal(0);
2020 end;
2121
22- procedure test_doesnt_send_on_null_id is
23- l_cur sys_refcursor;
24- begin
25- delete from ut3.ut_output_buffer_tmp;
26- --Act
27- ut3.ut_output_buffer.send_line(null,'a text to send');
28-
29- open l_cur for select * from ut3.ut_output_buffer_tmp;
30-
31- ut.expect(l_cur).to_be_empty;
32- end;
33-
3422 procedure test_doesnt_send_on_null_text is
35- l_cur sys_refcursor;
23+ l_cur sys_refcursor;
3624 l_result integer;
37- l_reporter ut3.ut_reporter_base := ut3.ut_documentation_reporter ();
25+ l_buffer ut3.ut_output_buffer_base := ut3.ut_output_table_buffer ();
3826 begin
3927 delete from ut3.ut_output_buffer_tmp;
4028 --Act
41- ut3.ut_output_buffer. send_line(l_reporter, null);
29+ l_buffer. send_line(null);
4230
4331 open l_cur for select * from ut3.ut_output_buffer_tmp;
4432 ut.expect(l_cur).to_be_empty;
@@ -47,30 +35,33 @@ create or replace package body test_output_buffer is
4735 procedure test_send_line is
4836 l_result varchar2(4000);
4937 c_expected constant varchar2(4000) := lpad('a text',4000,',a text');
50- l_reporter ut3.ut_reporter_base := ut3.ut_documentation_reporter ();
38+ l_buffer ut3.ut_output_buffer_base := ut3.ut_output_table_buffer ();
5139 begin
52- ut3.ut_output_buffer. send_line(l_reporter, c_expected);
40+ l_buffer. send_line(c_expected);
5341
54- select text into l_result from ut3.ut_output_buffer_tmp where reporter_id = l_reporter.reporter_id ;
42+ select text into l_result from ut3.ut_output_buffer_tmp where output_id = l_buffer.output_id ;
5543
5644 ut.expect(l_result).to_equal(c_expected);
5745 end;
5846
5947 procedure test_waiting_for_data is
60- l_result varchar2(4000);
48+ l_result varchar2(4000);
6149 l_remaining integer;
62- l_expected varchar2(4000);
63- l_reporter ut3.ut_reporter_base := ut3.ut_documentation_reporter();
50+ l_expected varchar2(4000);
51+ l_buffer ut3.ut_output_buffer_base := ut3.ut_output_table_buffer();
52+ l_start timestamp;
53+ l_duration interval day to second;
6454 begin
6555 --Act
6656 l_expected := lpad('a text',4000,',a text');
67- ut3.ut_output_buffer.send_line(l_reporter, l_expected);
68-
69- select * into l_result from table(ut3.ut_output_buffer.get_lines(l_reporter.reporter_id,0));
57+ l_buffer.send_line(l_expected);
58+ l_start := systimestamp;
59+ select * into l_result from table(l_buffer.get_lines(1,1));
60+ l_duration := systimestamp - l_start;
7061
7162 ut.expect(l_result).to_equal(l_expected);
72-
73- select count(1) into l_remaining from ut3.ut_output_buffer_tmp where reporter_id = l_reporter.reporter_id ;
63+ ut.expect(l_duration).to_be_greater_than(interval '1' second);
64+ select count(1) into l_remaining from ut3.ut_output_buffer_tmp where output_id = l_buffer.output_id ;
7465
7566 ut.expect(l_remaining).to_equal(0);
7667
0 commit comments