Update docs and tests

lwasylow · lwasylow · commit f7144991a190 · 2019-04-24T20:38:43.000+01:00
diff --git a/docs/userguide/annotations.md b/docs/userguide/annotations.md
@@ -1245,7 +1245,9 @@ or
 
 Tags are defined as a coma separated list. When executing a tests filtering by tag utPLSQL will find all tests associated with a given tag and execute it. It will apply `OR` logic when resolving a tags so any tests / suites that got matching at least one tag will get executed. 
 
-When a suite gets tagged all of its children will automatically inherit a tag and get executed along the parent.
+When a suite gets tagged all of its children will automatically inherit a tag and get executed along the parent. Parent suit tests are not executed. but a suitepath hierarchy is kept.
+
+Sample tag package.
 
 ```sql
 create or replace PACKAGE ut_sample_test IS
@@ -1257,6 +1259,10 @@ create or replace PACKAGE ut_sample_test IS
    --%tag(test1,sample)
    PROCEDURE ut_refcursors1;
 
+   --%test(Compare Ref Cursors #2)
+   --%tag(test2,sample)
+   PROCEDURE ut_refcursors2;
+   
 END ut_sample_test;
 /
 
@@ -1271,7 +1277,17 @@ create or replace PACKAGE BODY ut_sample_test IS
 
       ut.expect(v_actual).to_equal(v_expected);
    END;
+   
+   PROCEDURE ut_refcursors2 IS
+      v_actual   SYS_REFCURSOR;
+      v_expected SYS_REFCURSOR;
+   BEGIN
+    open v_expected for select 1 as test from dual;
+    open v_actual   for select 2 as test from dual;
 
+      ut.expect(v_actual).to_equal(v_expected);
+   END;
+   
 END ut_sample_test;
 /
 ```
@@ -1280,7 +1296,8 @@ Execution of the test is done by using a new parameter `a_tags`
 
 ```sql
 select * from table(ut.run(a_path => 'ut_sample_test',a_tags => 'suite1'));
-select * from table(ut.run(a_tags => 'suite1'));
+select * from table(ut.run(a_tags => 'test1,test2'));
+select * from table(ut.run(a_tags => 'sample'));
 
 begin
   ut.run(a_path => 'ut_sample_test',a_tags => 'suite1');
diff --git a/test/ut3_user/api/test_ut_run.pkb b/test/ut3_user/api/test_ut_run.pkb
@@ -860,6 +860,17 @@ Failures:%
     ut.expect( l_results ).not_to_be_like( '%test_package_3%' );  
   end;
   
+  procedure suite_with_tag_parent is
+    l_results clob;
+  begin
+    ut3_tester_helper.run_helper.run(a_tags => 'suite2');
+    l_results :=  ut3_tester_helper.main_helper.get_dbms_output_as_clob();
+    --Assert
+    ut.expect( l_results ).to_be_like( '%test_package_1%' );
+    ut.expect( l_results ).to_be_like( '%test_package_2%' );
+    ut.expect( l_results ).not_to_be_like( '%test_package_3%' );  
+  end;
+  
   procedure test_nonexists_tag is
     l_results clob;
     l_exp_message varchar2(4000);
diff --git a/test/ut3_user/api/test_ut_run.pks b/test/ut3_user/api/test_ut_run.pks
@@ -186,6 +186,9 @@ create or replace package test_ut_run is
   --%test(Execute suite and all of its children)
   procedure suite_with_children_tag;  
   
+  --%test(Execute suite and parents)
+  procedure suite_with_tag_parent;   
+  
   --%test(Execute test for non existing tag)
   procedure test_nonexists_tag;    
   
@@ -215,7 +218,7 @@ create or replace package test_ut_run is
 
   --%test(Runs tests from given paths with paths list and a tag)
   procedure tag_run_func_path_list;
-  
+ 
   --%endcontext
   
 end;
