Index: openacs-4/packages/acs-kernel/sql/oracle/upgrade/upgrade-5.8.1d6-5.8.1d7.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/sql/oracle/upgrade/Attic/upgrade-5.8.1d6-5.8.1d7.sql,v
diff -u -N
--- openacs-4/packages/acs-kernel/sql/oracle/upgrade/upgrade-5.8.1d6-5.8.1d7.sql	19 Sep 2014 20:19:44 -0000	1.1.2.1
+++ /dev/null	1 Jan 1970 00:00:00 -0000
@@ -1,106 +0,0 @@
-create or replace package util
-as
-    function multiple_nextval(
-	v_sequence_name in varchar2,
-	v_count in integer)
-        return varchar2;
-
-    function logical_negation (
-        true_or_false IN varchar2)
-	return varchar2;
-    
-    function table_exists (
-	name in varchar2)
-	return boolean;
-	
-    function table_column_exists (
-	t_name  in varchar2,
-	c_name in varchar2)
-	return boolean;
-    
-    function view_exists (
-	name in varchar2)
-	return boolean;
-	
-    function index_exists (
-	name in varchar2)
-	return boolean;
-end util;
-/
-show errors
-
-create or replace package body util
-as
-    -- Retrieves v_count (not necessarily consecutive) nextval values from the
-    -- sequence named v_sequence_name.
-    function multiple_nextval(
-	v_sequence_name in varchar2,
-	v_count in integer
-    )
-    return varchar2
-    is
-	a_sequence_values varchar2(4000);
-    begin
-	execute immediate '
-	    declare
-		a_nextval integer;
-	    begin
-		for counter in 1..:v_count loop
-		    select ' || v_sequence_name || '.nextval into a_nextval from dual;
-		    :a_sequence_values := :a_sequence_values || '','' || a_nextval;
-		end loop;
-	    end;
-	' using in v_count, in out a_sequence_values;
-	return substr(a_sequence_values, 2);
-    end;
-
-    function logical_negation (
-        true_or_false IN varchar2)
-    return varchar2
-    as
-    begin
-      IF true_or_false is null THEN
-        return null;
-      ELSIF true_or_false = 'f' THEN
-        return 't';   
-      ELSE 
-        return 'f';   
-      END IF;
-    END logical_negation;
-    
-    function table_exists (
-        name IN varchar2)
-    return boolean
-    as
-    begin
-      return exists (select 1 from user_tables where table_name = t_name);
-    END table_exists;
-    
-    function table_column_exists (
-        t_name  IN varchar2,
-        c_name IN varchar2)
-    return boolean
-    as
-    begin
-      return exists (select 1 from user_tab_columns where c.table_name = t_name and c.column_name = c_name);
-    END table_column_exists;
-    
-    function view_exists (
-        name IN varchar2)
-    return boolean
-    as
-    begin
-      return exists (select 1 from user_views where view_name = name);
-    END view_exists;
-    
-    function index_exists (
-        name IN varchar2)
-    return boolean
-    as
-    begin
-      return exists (select 1 from user_indexes where index_name = name);
-    END index_exists;
-
-end util;
-/
-show errors