Index: openacs-4/packages/assessment/tcl/as-item-data-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-item-data-procs.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/assessment/tcl/as-item-data-procs.tcl	24 Dec 2004 15:32:38 -0000	1.5
+++ openacs-4/packages/assessment/tcl/as-item-data-procs.tcl	7 Jan 2005 16:10:44 -0000	1.6
@@ -28,7 +28,7 @@
     New as_item_data to the database
 } {
     set package_id [ad_conn package_id]
-    set folder_id [db_string get_folder_id "select folder_id from cr_folders where package_id=:package_id"]
+    set folder_id [as::assessment::folder_id -package_id $package_id]
 
     # Insert as_item_data in the CR (and as_item_data table) getting the revision_id (item_data_id)
     db_transaction {