Index: openacs-4/contrib/packages/simulation/www/simplay/control-bar.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/www/simplay/Attic/control-bar.tcl,v
diff -u -r1.16.2.3 -r1.16.2.4
--- openacs-4/contrib/packages/simulation/www/simplay/control-bar.tcl	22 Mar 2004 15:49:03 -0000	1.16.2.3
+++ openacs-4/contrib/packages/simulation/www/simplay/control-bar.tcl	22 Mar 2004 18:04:17 -0000	1.16.2.4
@@ -34,12 +34,10 @@
 set messages_url [export_vars -base ${section_uri}messages { case_id role_id }]
 
 set task_count [db_string task_count_sql {
-    select count(wcea.enabled_action_id) 
-      from workflow_case_enabled_actions wcea,
-           workflow_actions wa
-     where wa.assigned_role = :role_id
-       and wa.action_id = wcea.action_id
-       and wcea.case_id = :case_id
+    select count(wcaa.action_id) 
+      from workflow_case_assigned_actions wcaa
+     where wcaa.role_id = :role_id
+       and wcaa.case_id = :case_id
 }]
 
 set tasks_url [export_vars -base ${section_uri}tasks { case_id role_id }]
Index: openacs-4/packages/simulation/www/simplay/control-bar.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/simplay/control-bar.tcl,v
diff -u -r1.16.2.3 -r1.16.2.4
--- openacs-4/packages/simulation/www/simplay/control-bar.tcl	22 Mar 2004 15:49:03 -0000	1.16.2.3
+++ openacs-4/packages/simulation/www/simplay/control-bar.tcl	22 Mar 2004 18:04:17 -0000	1.16.2.4
@@ -34,12 +34,10 @@
 set messages_url [export_vars -base ${section_uri}messages { case_id role_id }]
 
 set task_count [db_string task_count_sql {
-    select count(wcea.enabled_action_id) 
-      from workflow_case_enabled_actions wcea,
-           workflow_actions wa
-     where wa.assigned_role = :role_id
-       and wa.action_id = wcea.action_id
-       and wcea.case_id = :case_id
+    select count(wcaa.action_id) 
+      from workflow_case_assigned_actions wcaa
+     where wcaa.role_id = :role_id
+       and wcaa.case_id = :case_id
 }]
 
 set tasks_url [export_vars -base ${section_uri}tasks { case_id role_id }]