Merge branch 'develop' into feature/table_access_iprovements

# Conflicts: # source/core/ut_utils.pkb # source/core/ut_utils.pks
utPLSQL · jgebal · Jul 28, 2017 · Jul 21, 2017 · Jul 22, 2017 · Jul 22, 2017
commit d609b36807a356f1e7522cf0bbb212c41ae66d84
diff --git a/source/core/ut_utils.pkb b/source/core/ut_utils.pkb
@@ -341,6 +341,32 @@ create or replace package body ut_utils is
     return l_result;
   end;
 
+  function to_xpath(a_list varchar2, a_ancestors varchar2 := '/*/') return varchar2 is
+    l_xpath varchar2(32767) := a_list;
+  begin
+    if l_xpath not like '/%' then
+      l_xpath := to_xpath( clob_to_table(a_clob=>a_list, a_delimiter=>','), a_ancestors);
+    end if;
+    return l_xpath;
+  end;
+
+  function to_xpath(a_list ut_varchar2_list, a_ancestors varchar2 := '/*/') return varchar2 is
+    l_xpath varchar2(32767);
+    l_item  varchar2(32767);
+    i integer;
+  begin
+    i := a_list.first;
+    while i is not null loop
+      l_item := trim(a_list(i));
+      if l_item is not null then
+        l_xpath := l_xpath || a_ancestors ||a_list(i)||'|';
+      end if;
+      i := a_list.next(i);
+    end loop;
+    l_xpath := rtrim(l_xpath,',|');
+    return l_xpath;
+  end;
+
   procedure cleanup_temp_tables is
     pragma autonomous_transaction;
   begin

diff --git a/source/core/ut_utils.pks b/source/core/ut_utils.pks
@@ -219,6 +219,10 @@ create or replace package ut_utils authid definer is
 
   function convert_collection(a_collection ut_varchar2_list) return ut_varchar2_rows;
 
+  function to_xpath(a_list varchar2, a_ancestors varchar2 := '/*/') return varchar2;
+
+  function to_xpath(a_list ut_varchar2_list, a_ancestors varchar2 := '/*/') return varchar2;
+
   procedure cleanup_temp_tables;
 
 end ut_utils;