test_output_buffer.pck finished

Pazus · Pazus · commit a444afd8f933 · 2017-07-03T23:04:37.000+03:00
diff --git a/tests2/test_output_buffer.pck b/tests2/test_output_buffer.pck
@@ -12,8 +12,11 @@ create or replace package test_output_buffer is
   --%test(Does not send line if null text given)
   procedure test_doesnt_send_on_null_text;
   
-  --test(Sends a line into buffer table)
+  --%test(Sends a line into buffer table)
   procedure test_send_line;
+  
+  --%test(Waits For The Data To Appear For Specified Time)
+  procedure test_waiting_for_data;
 
 end test_output_buffer;
 /
@@ -75,5 +78,25 @@ create or replace package body test_output_buffer is
     ut.expect(l_result).to_equal(c_expected);
   end;
   
+  procedure test_waiting_for_data is
+    l_result   varchar2(4000);
+    l_remaining integer;
+    l_expected varchar2(4000);
+    l_reporter ut_reporter_base := ut_documentation_reporter();
+  begin
+  --Act
+    l_expected := lpad('a text',4000,',a text');
+    ut_output_buffer.send_line(l_reporter, l_expected);
+
+    select * into l_result from table(ut_output_buffer.get_lines(l_reporter.reporter_id,0));
+
+    ut.expect(l_result).to_equal(l_expected);
+
+    select count(1) into l_remaining from ut_output_buffer_tmp where reporter_id = l_reporter.reporter_id;
+
+    ut.expect(l_remaining).to_equal(0);
+    
+  end;
+  
 end test_output_buffer;
 /
