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.29 -r1.30
--- openacs-4/packages/imsld/tcl/imsld-procs.xql	26 Jul 2006 14:37:27 -0000	1.29
+++ openacs-4/packages/imsld/tcl/imsld-procs.xql	20 Sep 2006 08:26:30 -0000	1.30
@@ -576,6 +576,17 @@
   		</querytext>
 	</fullquery>
 
+    <fullquery name="imsld::finish_component_element.get_related_change_prop_val_id">
+		<querytext>
+
+         select ar.object_id_two as change_prop_val_id
+         from acs_rels ar
+         where ar.object_id_one = :related_on_completion
+           and ar.rel_type='imsld_on_comp_change_pv_rel'
+
+  		</querytext>
+	</fullquery>
+
     <fullquery name="imsld::finish_component_element.insert_element_entry">
 		<querytext>
                 insert into imsld_status_user (