)
procedure test_do_stuff;
-
+
end;]';
execute immediate q'[create or replace package body check_junit_reporting is
procedure test_do_stuff is
@@ -18,12 +18,12 @@ create or replace package body test_tfs_junit_reporter as
end;
end;]';
-
+
execute immediate q'[create or replace package check_junit_rep_suitepath is
--%suitepath(core)
--%suite(check_junit_rep_suitepath)
--%displayname(Check JUNIT Get path for suitepath)
-
+
--%test(check_junit_rep_suitepath)
--%displayname(Check JUNIT Get path for suitepath)
procedure check_junit_rep_suitepath;
@@ -38,7 +38,7 @@ create or replace package body test_tfs_junit_reporter as
execute immediate q'[create or replace package check_junit_flat_suitepath is
--%suitepath(core.check_junit_rep_suitepath)
--%suite(flatsuitepath)
-
+
--%beforeall
procedure donuffin;
end;]';
@@ -49,8 +49,85 @@ create or replace package body test_tfs_junit_reporter as
end;
end;]';
- end;
+ execute immediate q'[create or replace package check_junit_in_context is
+ --%suitepath(core.check_junit_rep_suitepath)
+ --%suite(inctxsuite)
+ --%displayname(JUNIT test are inside context)
+
+ -- %context(incontext)
+ -- %name(incontext)
+
+ --%test(incontext)
+ --%displayname(Check JUNIT Get path incontext)
+ procedure check_junit_rep_incontext;
+
+ -- %endcontext
+ end;]';
+ execute immediate q'[create or replace package body check_junit_in_context is
+ procedure check_junit_rep_incontext is
+ begin
+ ut3_develop.ut.expect(1).to_equal(1);
+ end;
+ end;]';
+
+ execute immediate q'[create or replace package check_junit_out_context is
+ --%suitepath(core)
+ --%suite(outctxsuite)
+ --%displayname(JUNIT test are outside context)
+
+ -- %context(outcontext)
+ -- %name(outcontext)
+
+ -- %endcontext
+
+
+ --%test(outctx)
+ --%displayname(outctx)
+ procedure outctx;
+
+
+ end;]';
+ execute immediate q'[create or replace package body check_junit_out_context is
+ procedure outctx is
+ begin
+ ut3_develop.ut.expect(1).to_equal(1);
+ end;
+ end;]';
+
+ execute immediate q'[create or replace package check_junit_inout_context is
+ --%suitepath(core)
+ --%suite(inoutcontext)
+ --%displayname(Test in and out of context)
+ -- %context(incontext)
+ -- %name(ProductincontextFeatures)
+
+ --%test(inctx)
+ --%displayname(inctx)
+ procedure inctx;
+
+ -- %endcontext
+
+
+ --%test(outctx)
+ --%displayname(outctx)
+ procedure outctx;
+
+
+ end;]';
+ execute immediate q'[create or replace package body check_junit_inout_context is
+ procedure inctx is
+ begin
+ ut3_develop.ut.expect(1).to_equal(1);
+ end;
+
+ procedure outctx is
+ begin
+ ut3_develop.ut.expect(1).to_equal(1);
+ end;
+ end;]';
+
+ end;
procedure escapes_special_chars is
l_results ut3_develop.ut_varchar2_list;
@@ -92,7 +169,7 @@ create or replace package body test_tfs_junit_reporter as
--Assert
ut.expect(l_actual).to_be_like('%testcase classname="check_junit_reporting"%');
end;
-
+
procedure check_flatten_nested_suites is
l_results ut3_develop.ut_varchar2_list;
l_actual clob;
@@ -111,7 +188,7 @@ create or replace package body test_tfs_junit_reporter as
%');
end;
-
+
procedure check_nls_number_formatting is
l_results ut3_develop.ut_varchar2_list;
l_actual clob;
@@ -163,5 +240,73 @@ create or replace package body test_tfs_junit_reporter as
reporters.check_xml_encoding_included(ut3_develop.ut_tfs_junit_reporter(), 'UTF-8');
end;
+ procedure reports_only_test_in_ctx is
+ l_results ut3_develop.ut_varchar2_list;
+ l_actual clob;
+ begin
+ --Act
+ select *
+ bulk collect into l_results
+ from table(ut3_develop.ut.run('check_junit_in_context',ut3_develop.ut_tfs_junit_reporter()));
+ l_actual := ut3_tester_helper.main_helper.table_to_clob(l_results);
+ --Assert
+ ut.expect(l_actual).to_be_like('
+
+
+
+
+
+
+
+
+%');
+ end;
+
+ procedure reports_only_test_out_ctx is
+ l_results ut3_develop.ut_varchar2_list;
+ l_actual clob;
+ begin
+ --Act
+ select *
+ bulk collect into l_results
+ from table(ut3_develop.ut.run('check_junit_out_context',ut3_develop.ut_tfs_junit_reporter()));
+ l_actual := ut3_tester_helper.main_helper.table_to_clob(l_results);
+ --Assert
+ ut.expect(l_actual).to_be_like('
+
+
+
+
+
+
+
+
+%');
+ end;
+
+ procedure reports_only_test_inout_ctx is
+ l_results ut3_develop.ut_varchar2_list;
+ l_actual clob;
+ begin
+ --Act
+ select *
+ bulk collect into l_results
+ from table(ut3_develop.ut.run('check_junit_inout_context',ut3_develop.ut_tfs_junit_reporter()));
+ l_actual := ut3_tester_helper.main_helper.table_to_clob(l_results);
+ --Assert
+ ut.expect(l_actual).to_be_like('
+
+
+
+
+
+
+
+
+
+
+%');
+ end;
+
end;
-/
+/
\ No newline at end of file
diff --git a/test/ut3_user/reporters/test_tfs_junit_reporter.pks b/test/ut3_user/reporters/test_tfs_junit_reporter.pks
index 07acb4d21..70f78e334 100644
--- a/test/ut3_user/reporters/test_tfs_junit_reporter.pks
+++ b/test/ut3_user/reporters/test_tfs_junit_reporter.pks
@@ -30,6 +30,15 @@ create or replace package test_tfs_junit_reporter as
--%test(Includes XML header with encoding when encoding provided)
procedure check_encoding_included;
+ --%test(Reports only testsuites where there are any testcases, all tests are in context)
+ procedure reports_only_test_in_ctx;
+
+ --%test(Reports only testsuites where there are any testcases, all tests are outside context)
+ procedure reports_only_test_out_ctx;
+
+ --%test(Reports only testsuites where there are any testcases, one test in ctx one test outside)
+ procedure reports_only_test_inout_ctx;
+
--%afterall
procedure remove_test_package;
end;
pFad - Phonifier reborn
Pfad - The Proxy pFad of © 2024 Garber Painting. All rights reserved.
Note: This service is not intended for secure transactions such as banking, social media, email, or purchasing. Use at your own risk. We assume no liability whatsoever for broken pages.
Alternative Proxies:
Alternative Proxy
pFad Proxy
pFad v3 Proxy
pFad v4 Proxy