Index: openacs-4/packages/forums/tcl/forums-callback-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/tcl/forums-callback-procs.xql,v
diff -u -r1.1.2.2 -r1.1.2.3
--- openacs-4/packages/forums/tcl/forums-callback-procs.xql	20 Jul 2005 15:43:02 -0000	1.1.2.2
+++ openacs-4/packages/forums/tcl/forums-callback-procs.xql	23 Sep 2005 14:45:28 -0000	1.1.2.3
@@ -55,5 +55,39 @@
 </querytext>
 </fullquery>
 
+<fullquery name="callback::datamanager::copy_forum::impl::datamanager.get_forum_package_id">
+<querytext>
+    SELECT b.object_id as package_id 
+    FROM acs_objects as a,acs_objects as b  
+    WHERE a.context_id=:selected_community and a.object_type='apm_package' and a.object_id=b.context_id and b.title='Forums';
+</querytext>
+</fullquery>
 
+
+<fullquery name="callback::datamanager::copy_forum::impl::datamanager.get_forum_data">
+<querytext>
+    SELECT  name,charter,presentation_type,posting_policy
+    FROM forums_forums
+    WHERE forum_id=:object_id;
+</querytext>
+</fullquery>
+
+<fullquery name="callback::datamanager::copy_forum::impl::datamanager.get_first_messages_list">
+<querytext>
+    SELECT subject,content,user_id,format as formato,parent_id
+    FROM forums_messages
+    WHERE forum_id=:object_id and parent_id IS NULL;
+</querytext>
+</fullquery>
+
+<fullquery name="callback::datamanager::copy_forum::impl::datamanager.get_all_messages_list">
+<querytext>
+    SELECT subject,content,user_id,format as formato,parent_id
+    FROM forums_messages
+    WHERE forum_id=:object_id and parent_id IS NOT NULL;
+</querytext>
+</fullquery>
+
+
+
 </queryset>