File tree Expand file tree Collapse file tree
Expand file tree Collapse file tree Original file line number Diff line number Diff line change 3131 suite .add_item (testtoexecute);
3232
3333 -- provide a reporter to process results
34- suite .so_execute (ut_dbms_output_suite_reporter);
34+ suite .do_execute (ut_dbms_output_suite_reporter);
3535end;
3636/
3737
Original file line number Diff line number Diff line change @@ -77,19 +77,31 @@ create or replace package body ut_assert_processor as
7777 end;
7878
7979 procedure set_xml_nls_params is
80+ insuf_privs exception;
81+ pragma exception_init(insuf_privs, -1031);
8082 begin
8183 g_session_params := get_session_parameters();
82-
83- --execute immediate q'[alter session set events '19119 trace name context forever, level 0x8']';
84+
85+ begin
86+ execute immediate q'[alter session set events '19119 trace name context forever, level 0x8']';
87+ exception
88+ when insuf_privs then NULL;
89+ end;
8490
8591 execute immediate 'alter session set nls_date_format = '''||ut_utils.gc_date_format||'''';
8692 execute immediate 'alter session set nls_timestamp_format = '''||ut_utils.gc_timestamp_format||'''';
8793 execute immediate 'alter session set nls_timestamp_tz_format = '''||ut_utils.gc_timestamp_tz_format||'''';
8894 end;
8995
9096 procedure reset_nls_params is
97+ insuf_privs exception;
98+ pragma exception_init(insuf_privs, -1031);
9199 begin
92- --execute immediate q'[alter session set events '19119 trace name context off']';
100+ begin
101+ execute immediate q'[alter session set events '19119 trace name context off']';
102+ exception
103+ when insuf_privs then NULL;
104+ end;
93105
94106 if g_session_params is not null then
95107 for i in 1 .. g_session_params.count loop
You can’t perform that action at this time.
0 commit comments