Merge branch 'develop' into bugfix/autonomous_transaction_dirty_on_timeout

jgebal · web-flow · commit 482a609181ee · 2017-04-21T01:02:17.000+01:00
diff --git a/docs/userguide/install.md b/docs/userguide/install.md
@@ -85,6 +85,13 @@ The following tools that support the SQL*Plus commands can be used to run the in
   - [SQLcl](http://www.oracle.com/technetwork/developer-tools/sqlcl/overview/index.html)
   - [Oracle SQL Developer](http://www.oracle.com/technetwork/developer-tools/sql-developer/overview/index.html)
  
+# Additional requirements
+
+In order to use Code Coverage functionality of utPLSQL users executing the tests must have the CREATE privilege on the PLSQL code that the coverage is gathered on.
+This is a requirement of [DBMS_PROFILER package](https://docs.oracle.com/cd/E18283_01/appdev.112/e16760/d_profil.htm#i999476).
+
+In practice, user running tests for PLSQL code that he does not own, needs to have CREATE ANY PROCEDURE/CREATE ANY TRIGGER privileges.
+Running code coverage on objects that the user does not own will not produce any coverage information without those privileges.
 
 # Uninstalling utPLSQL
 
diff --git a/source/core/ut_suite_manager.pkb b/source/core/ut_suite_manager.pkb
@@ -15,7 +15,7 @@ create or replace package body ut_suite_manager is
   See the License for the specific language governing permissions and
   limitations under the License.
   */
-  
+
   type t_schema_info is record (changed_at date, obj_cnt integer);
 
   type tt_schema_suites is table of ut_logical_suite index by varchar2(4000 char);
@@ -63,11 +63,17 @@ create or replace package body ut_suite_manager is
 
     l_suite_rollback            integer;
     l_suite_rollback_annotation varchar2(4000);
-
+    e_insufficient_priv         exception;
+    pragma exception_init(e_insufficient_priv,-01031);
   begin
     l_owner_name  := a_owner_name;
     l_object_name := a_object_name;
-    ut_metadata.do_resolve(a_owner => l_owner_name, a_object => l_object_name);
+    begin
+      ut_metadata.do_resolve(a_owner => l_owner_name, a_object => l_object_name);
+    exception
+      when e_insufficient_priv then
+      return null;
+    end;
     l_annotation_data := ut_annotations.get_package_annotations(a_owner_name => l_owner_name, a_name => l_object_name);
 
     if l_annotation_data.package_annotations.exists('suite') then
