Index: openacs-4/packages/faq/tcl/faq-callback-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/faq/tcl/Attic/faq-callback-procs.xql,v
diff -u -r1.1.2.2 -r1.1.2.3
--- openacs-4/packages/faq/tcl/faq-callback-procs.xql 23 Sep 2005 14:38:28 -0000 1.1.2.2
+++ openacs-4/packages/faq/tcl/faq-callback-procs.xql 10 Oct 2005 12:59:34 -0000 1.1.2.3
@@ -3,17 +3,46 @@
- update acs_objects
- set context_id = (select package_id
- from dotlrn_community_applets
- where community_id = :selected_community and applet_id = (
- select applet_id from dotlrn_applets where applet_key = 'dotlrn_faq'
- ))
- where object_id = :object_id
+ update acs_objects
+ set context_id = :new_package_id,package_id=:new_package_id
+ where object_id = :object_id
+
+
+
+
+ update acs_objects
+ set package_id = :new_package_id
+ where context_id = :object_id
+
+
+
+SELECT package_id as new_package_id
+FROM dotlrn_community_applets
+WHERE community_id = :selected_community and applet_id = (select applet_id from dotlrn_applets where applet_key = 'dotlrn_faq')
+
+
+
+
+
+
+ UPDATE acs_objects
+ SET context_id = :trash_package_id,package_id=:trash_package_id
+ WHERE object_id = :object_id
+
+
+
+
+
+ UPDATE acs_objects
+ SET package_id = :trash_package_id
+ WHERE context_id = :object_id
+
+
+
SELECT b.object_id as package_id