Index: openacs-4/packages/general-comments/www/comment-add-3-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/comment-add-3-oracle.xql,v
diff -u -N
--- openacs-4/packages/general-comments/www/comment-add-3-oracle.xql	31 Oct 2001 20:42:07 -0000	1.2
+++ /dev/null	1 Jan 1970 00:00:00 -0000
@@ -1,68 +0,0 @@
-<?xml version="1.0"?>
-
-<queryset>
-   <rdbms><type>oracle</type><version>8.1.6</version></rdbms>
-
-<fullquery name="insert_comment">      
-      <querytext>
-      
-        begin
-            :1 := acs_message.new (
-                message_id    => :comment_id,
-                title         => :title,
-                mime_type     => :comment_mime_type,
-                data          => empty_blob(),
-                context_id    => :context_id,
-                creation_user => :user_id, 
-                creation_ip   => :creation_ip,
-                is_live       => :is_live
-            );
-        end;
-    
-      </querytext>
-</fullquery>
-
- 
-<fullquery name="get_revision">      
-      <querytext>
-      
-        select content_item.get_latest_revision(:comment_id) as revision_id
-        from dual
-    
-      </querytext>
-</fullquery>
-
- 
-<fullquery name="set_content">      
-      <querytext>
-      
-        update cr_revisions
-           set content = empty_blob()
-         where revision_id = :revision_id
-     returning content into :1
-    
-      </querytext>
-</fullquery>
-
- 
-<fullquery name="grant_permission">      
-      <querytext>
-      
-        begin
-            acs_permission.grant_permission (
-                object_id  => :comment_id,
-                grantee_id => :user_id,
-                privilege  => 'read'
-            );
-            acs_permission.grant_permission (
-                object_id  => :comment_id,
-                grantee_id => :user_id,
-                privilege  => 'write'
-            );
-        end;
-    
-      </querytext>
-</fullquery>
-
- 
-</queryset>
Index: openacs-4/packages/general-comments/www/comment-add-3-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/comment-add-3-postgresql.xql,v
diff -u -N
--- openacs-4/packages/general-comments/www/comment-add-3-postgresql.xql	8 Aug 2006 21:26:56 -0000	1.4
+++ /dev/null	1 Jan 1970 00:00:00 -0000
@@ -1,73 +0,0 @@
-<?xml version="1.0"?>
-
-<queryset>
-   <rdbms><type>postgresql</type><version>7.1</version></rdbms>
-
-<fullquery name="insert_comment">      
-      <querytext>
-	     select acs_message__new (
-		:comment_id,		-- 1  p_message_id
-		NULL, 			-- 2  p_reply_to
-		current_timestamp,	-- 3  p_sent_date
-		NULL, 			-- 4  p_sender
-		NULL,			-- 5  p_rfc822_id
-		:title,			-- 6  p_title
-		NULL,			-- 7  p_description
-		:comment_mime_type,	-- 8  p_mime_type
-		NULL,			-- 9  p_text
-		NULL, -- empty_blob(),		-- 10 p_data
-		-4,			-- 11 p_parent_id
-		:context_id,		-- 12 p_context_id
-		:user_id,		-- 13 p_creation_user
-		:creation_ip,		-- 14 p_creation_ip
-		'acs_message',		-- 15 p_object_type
-		:is_live		-- 16 p_is_live
-	    )
-      </querytext>
-</fullquery>
-
- 
-<fullquery name="get_revision">      
-      <querytext>
-      
-        select content_item__get_latest_revision(:comment_id) as revision_id
-        
-    
-      </querytext>
-</fullquery>
-
- 
-<fullquery name="set_content">      
-      <querytext>
-    
-        update cr_revisions
-           set content = :content
-         where revision_id = :revision_id
-       
-      </querytext>
-</fullquery>
-
- 
-<fullquery name="grant_permission">      
-      <querytext>
-
-        begin
-            perform acs_permission__grant_permission (
-                /* object_id  => */ :comment_id,
-                /* grantee_id => */ :user_id,
-                /* privilege  => */ 'read'
-            );
-            perform acs_permission__grant_permission (
-                /* object_id  => */ :comment_id,
-                /* grantee_id => */ :user_id,
-                /* privilege  => */ 'write'
-            );
-	    return 0;
-        end;
-	
-    
-      </querytext>
-</fullquery>
-
- 
-</queryset>
Index: openacs-4/packages/general-comments/www/comment-add-3.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/comment-add-3.xql,v
diff -u -N
--- openacs-4/packages/general-comments/www/comment-add-3.xql	14 Jun 2001 19:52:22 -0000	1.1
+++ /dev/null	1 Jan 1970 00:00:00 -0000
@@ -1,20 +0,0 @@
-<?xml version="1.0"?>
-<queryset>
-
-<fullquery name="add_entry">      
-      <querytext>
-      
-        insert into general_comments
-            (comment_id,
-             object_id,
-             category)
-        values
-            (:comment_id,
-             :object_id,
-             :category)
-    
-      </querytext>
-</fullquery>
-
- 
-</queryset>