Added add_token procedure

ora/string_util_pkg.pkb

@@ -98,6 +98,33 @@ begin
 end get_str;
 
 
+procedure add_token (p_text in out varchar2,
+                     p_token in varchar2,
+                     p_separator in varchar2 := g_default_separator)
+as
+begin
+
+  /*
+
+  Purpose:    add token to string
+
+  Remarks:  
+
+  Who     Date        Description
+  ------  ----------  -------------------------------------
+  MBR     30.10.2015  Created
+  
+  */
+
+  if p_text is null then
+    p_text := p_token;
+  else
+    p_text := p_text || p_separator || p_token;
+  end if;
+  
+end add_token;
+
+
 function get_nth_token(p_text in varchar2,
                        p_num in number,
                        p_separator in varchar2 := g_default_separator) return varchar2

ora/string_util_pkg.pks

@@ -34,8 +34,8 @@ as
   g_tab                          constant varchar2(1) := chr(9);
   g_ampersand                    constant varchar2(1) := chr(38); 
 
-  g_html_entity_carriage_return  constant varchar2(5) := '
';
+  g_html_entity_carriage_return  constant varchar2(5) := chr(38) || '#13;';
-  g_html_nbsp                    constant varchar2(6) := ' '; 
+  g_html_nbsp                    constant varchar2(6) := chr(38) || 'nbsp;'; 
 
   -- return string merged with substitution values
   function get_str (p_msg in varchar2,
@@ -48,6 +48,11 @@ as
                     p_value7 in varchar2 := null,
                     p_value8 in varchar2 := null) return varchar2;
 
+  -- add token to string
+  procedure add_token (p_text in out varchar2,
+                       p_token in varchar2,
+                       p_separator in varchar2 := g_default_separator);
+
   -- get the sub-string at the Nth position 
   function get_nth_token(p_text in varchar2,
                          p_num in number,