Index: openacs-4/packages/imsld/tcl/imsld-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/tcl/imsld-procs.xql,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/imsld/tcl/imsld-procs.xql	1 Feb 2006 12:31:32 -0000	1.2
+++ openacs-4/packages/imsld/tcl/imsld-procs.xql	2 Feb 2006 13:52:31 -0000	1.3
@@ -1261,7 +1261,28 @@
 		</querytext>
 	</fullquery>
 
+	<fullquery name="imsld::next_activity.is_assessment">
+		<querytext>
+        select acs_object_id as assessment_id 
+        from imsld_cp_resourcesi 
+        where type='imsqti_xmlv1p0'
+              and item_id=:resource_activity
+		</querytext>
+	</fullquery>
 
+
+	<fullquery name="imsld::next_activity.get_as_site_node">
+		<querytext>
+            select sn.node_id as node_id 
+            from acs_objects ao,
+                 site_nodes sn 
+            where ao.package_id=sn.object_id 
+                  and ao.object_id=:assessment_id;
+        </querytext>
+	</fullquery>
+
+
+
 	<fullquery name="imsld::next_activity.get_ismld_info">
 		<querytext>
         select imsld_id