Index: openacs-4/packages/notes/sql/postgresql/notes-drop.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/notes/sql/postgresql/notes-drop.sql,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/notes/sql/postgresql/notes-drop.sql	3 May 2001 18:54:45 -0000	1.2
+++ openacs-4/packages/notes/sql/postgresql/notes-drop.sql	9 Jul 2001 15:37:38 -0000	1.3
@@ -1,3 +1,8 @@
+-- notes
+-- drop script
+-- Vinod Kurup, vkurup@massmed.org
+--
+
 --drop functions
 drop function note__new (integer,integer,varchar,varchar,varchar,timestamp,integer,varchar,integer);
 drop function note__delete (integer);
@@ -6,8 +11,22 @@
 delete from acs_permissions where object_id in (select note_id from notes);
 
 --drop objects
-delete from acs_objects where object_type='note';
+create function inline_0 ()
+returns integer as '
+declare
+	object_rec		record;
+begin
+	for object_rec in select object_id from acs_objects where object_type=''note''
+	loop
+		perform acs_object__delete( object_rec.object_id );
+	end loop;
 
+	return 0;
+end;' language 'plpgsql';
+
+select inline_0();
+drop function inline_0();
+
 --drop table
 drop table notes;
 
@@ -26,6 +45,6 @@
 --drop type
 select acs_object_type__drop_type(
 	   'note',
-	   'f'
+	   't'
 	);