Index: openacs-4/packages/assessment/tcl/as-callback-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-callback-procs.tcl,v
diff -u -N -r1.9.2.1 -r1.9.2.2
--- openacs-4/packages/assessment/tcl/as-callback-procs.tcl	10 Sep 2015 08:27:56 -0000	1.9.2.1
+++ openacs-4/packages/assessment/tcl/as-callback-procs.tcl	4 Jul 2016 11:35:25 -0000	1.9.2.2
@@ -43,13 +43,13 @@
     set msg "Assessment items of user $user_id"
     set result [list $msg]
 
-    lappend result [list "Staff of sessions: [db_list sel_sessions { *SQL* }] "]
+    lappend result [list "Staff of sessions: [db_list sel_sessions {}] "]
     lappend result [list "Subject of sessions: [db_list sel_sessions2 {*SQL*}] "]
 
-    lappend result [list "Subject of section data id: [db_list sel_sections { *SQL* }] "]
+    lappend result [list "Subject of section data id: [db_list sel_sections {}] "]
     lappend result [list "Staff of section data id: [db_list sel_sections2 { *SQL* }] "]
 
-    lappend result [list "Subject of item data id : [db_list sel_items { *SQL* }] "]
+    lappend result [list "Subject of item data id : [db_list sel_items {}] "]
     lappend result [list "Staff of item_data_id: [db_list sel_items2 { *SQL* }] "]
     
     return $result
@@ -69,11 +69,11 @@
     set result [list $msg]
     ns_log Notice $msg
     db_transaction {
-	db_dml upd_from_sessions { *SQL* }
+	db_dml upd_from_sessions {}
 	db_dml upd_from_sessions2 { *SQL* }
-	db_dml upd_from_sections { *SQL* }
+	db_dml upd_from_sections {}
 	db_dml upd_from_sections2 { *SQL* }
-	db_dml upd_from_items { *SQL* }
+	db_dml upd_from_items {}
 	db_dml upd_from_items2 { *SQL* }
 	
     }