create or replace package test_ut_runner is

--%suite(ut_runner)

--%suitepath(utplsql.test_user.api)

--%rollback(manual)

--%test(transaction stays open after the run if it was opened before the run)

procedure keep_an_open_transaction;

--%test(closes open transactions if no transaction was open before run)

procedure close_newly_opened_transaction;

--%context(version_compatibility_check)

--%test(compares major, minor and bugfix number)

procedure version_comp_check_compare;

--%test(ignores build number)

procedure version_comp_check_ignore;

--%test(compares short version to a full version)

procedure version_comp_check_short;

--%test(raises exception when invalid version passed)

procedure version_comp_check_exception;

--%endcontext

--%test(run resets cache of package body after every run)

procedure run_reset_package_body_cache;

--%test(does not consume dbms_output from before the run)

procedure run_keep_dbms_output_buffer;

procedure setup_cache;

procedure cleanup_cache;

--%test(Purges cache for a given schema and object type)

--%beforetest(setup_cache)

--%aftertest(cleanup_cache)

procedure test_purge_cache_schema_type;

procedure setup_cache_objects;

procedure setup_cache_objectstag;

procedure setup_cache_twotags;

--%test(Rebuilds cache for a given schema and object type)

--%beforetest(setup_cache_objects)

--%aftertest(cleanup_cache)

--%DISABLED(TODO -disable trigger for this test to pass)

procedure test_rebuild_cache_schema_type;

--%test(get_suites_info returns a cursor containing records for a newly created test)

--%beforetest(setup_cache_objects)

--%aftertest(cleanup_cache)

procedure test_get_suites_info_notag;

--%test(get_suites_info returns a cursor containing records for a newly created test with tag)

--%beforetest(setup_cache_objectstag)

--%aftertest(cleanup_cache)

procedure test_get_suites_info_tag;

--%test(get_suites_info returns a cursor containing records for a newly created test with two tags)

--%beforetest(setup_cache_twotags)

--%aftertest(cleanup_cache)

procedure test_get_suites_info_twotag;

--%test(get_suites_info returns a cursor containing records for a newly created test with passed path)

--%beforetest(setup_cache_objects)

--%aftertest(cleanup_cache)

procedure test_get_suites_info_by_path;

--%test(get_reporters_list returns a cursor containing all built-in reporters and information about output-reporter)

--%beforetest(setup_cache_objects)

--%aftertest(cleanup_cache)

procedure test_get_reporters_list;

procedure db_link_cleanup;

procedure db_link_setup;

--%test(ORA-20213 is thrown with a_raise_on_failure when database link operations are used - regression)

--%beforetest(db_link_setup)

--%aftertest(db_link_cleanup)

procedure raises_20213_on_fail_link;

procedure create_test_csl_packages;

procedure drop_test_csl_packages;

--%context(ut_run_coma_sep_list)

--%beforeall(create_test_csl_packages)

--%afterall(drop_test_csl_packages)

--%test( Pass name of tests as varchar2_list )

procedure pass_varchar2_name_list;

--%test( Pass single test name as varchar2 )

procedure pass_varchar2_name;

--%test( Pass coma separated list of suite names )

procedure pass_varchar2_suite_csl;

--%test( Pass coma separated list of test names )

procedure pass_varchar2_test_csl;

--%test( Pass coma separated list of test names with spaces )

procedure pass_varch_test_csl_spc;

--%test( Pass coma separated list and source and test files )

procedure pass_csl_with_srcfile;

--%test( Pass coma separated list in varchar2list )

procedure pass_csl_within_var2list;

--%endcontext

--%context(is_test)

--%beforeall(setup_cache_objects)

--%afterall(cleanup_cache)

--%test(Returns true when procedure is a test)

procedure is_test_true;

--%test(Returns false when procedure is not a test)

procedure is_test_false;

--%endcontext

--%context(is_suite)

--%beforeall(setup_cache_objects)

--%afterall(cleanup_cache)

--%test(Returns true when package is a test suite)

procedure is_suite_true;

--%test(Returns false when package is not a test suite)

procedure is_suite_false;

--%endcontext

--%context(has_suites)

--%beforeall(setup_cache_objects)

--%afterall(cleanup_cache)

--%test(Returns true when schema contains test suites)

procedure has_suites_true;

--%test(Returns false when schema does not contain test suites)

procedure has_suites_false;

--%endcontext

end;

/