Index: openacs-4/packages/acs-kernel/sql/oracle/acs-objects-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/sql/oracle/acs-objects-create.sql,v
diff -u -r1.3.2.1 -r1.3.2.2
--- openacs-4/packages/acs-kernel/sql/oracle/acs-objects-create.sql	9 Mar 2002 23:34:32 -0000	1.3.2.1
+++ openacs-4/packages/acs-kernel/sql/oracle/acs-objects-create.sql	9 Mar 2002 23:37:50 -0000	1.3.2.2
@@ -496,7 +496,6 @@
   object_id	in acs_objects.object_id%TYPE
  )
  is
- declare
    v_exists_p char;
  begin
   
@@ -512,7 +511,7 @@
       connect by object_type = prior supertype)
   loop
     -- Delete from the table if it exists.
-    select case when count(*) = 0 then 'f' else 't' end into v_exists_p
+    select decode(count(*),0,'f','t') into v_exists_p
     from user_tables
     where table_name = upper(object_type.table_name);