Index: openacs-4/contrib/packages/simulation/www/siminst/simulation-casting-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/www/siminst/Attic/simulation-casting-2.tcl,v
diff -u -r1.18 -r1.19
--- openacs-4/contrib/packages/simulation/www/siminst/simulation-casting-2.tcl	6 Jan 2004 18:36:28 -0000	1.18
+++ openacs-4/contrib/packages/simulation/www/siminst/simulation-casting-2.tcl	7 Jan 2004 15:54:55 -0000	1.19
@@ -27,7 +27,7 @@
     {enroll_type:text(radio)
         {label "Enrollment type"}
         {options {{"By invitation only" closed} {Open open}}}
-            {html {onChange "javascript:FormRefresh('simulation');"}}
+            {html {onChange "javascript:acs_FormRefresh('simulation');"}}
     }
     {enroll_start:date,to_sql(ansi),from_sql(ansi),optional
         {label "Enrollment start date"}
Index: openacs-4/contrib/packages/simulation/www/siminst/simulation-casting-3.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/www/siminst/Attic/simulation-casting-3.adp,v
diff -u -r1.7 -r1.8
--- openacs-4/contrib/packages/simulation/www/siminst/simulation-casting-3.adp	7 Jan 2004 12:22:40 -0000	1.7
+++ openacs-4/contrib/packages/simulation/www/siminst/simulation-casting-3.adp	7 Jan 2004 15:54:55 -0000	1.8
@@ -1,8 +1,13 @@
-<p>
-  Pick which groups can be cast in which roles below.
-</p>
+<if @num_groups@ eq 0>
+  <div class="general-message">Please pick participants first.</div>
+</if>
+<else>
+  <p>
+    Pick which groups can be cast in which roles below.
+  </p>
+  <formtemplate id="actors"></formtemplate>
+</else>
 
-<formtemplate id="actors"></formtemplate>
 
 <p>
 TODO: Display the actor list and group size in parallel columns
Index: openacs-4/contrib/packages/simulation/www/siminst/simulation-casting-3.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/www/siminst/Attic/simulation-casting-3.tcl,v
diff -u -r1.13 -r1.14
--- openacs-4/contrib/packages/simulation/www/siminst/simulation-casting-3.tcl	7 Jan 2004 14:46:04 -0000	1.13
+++ openacs-4/contrib/packages/simulation/www/siminst/simulation-casting-3.tcl	7 Jan 2004 15:54:55 -0000	1.14
@@ -21,15 +21,19 @@
 
 
 set eligible_groups [simulation::casting_groups -mapped_only -workflow_id $workflow_id]
+set num_groups [llength $eligible_groups]
 
 foreach role_id [workflow::get_roles -workflow_id $workflow_id] {
     set role_${role_id}_pretty_name [workflow::role::get_element -role_id $role_id -element pretty_name]
 
-    lappend form [list parties_${role_id}:text(checkbox),multiple,optional \
-                      [list label \$role_${role_id}_pretty_name] \
-                      {options $eligible_groups} \
-                      {section "Roles"}
-                     ]
+    if { $num_groups > 0 } {
+        lappend form [list parties_${role_id}:text(checkbox),multiple,optional \
+                          [list label \$role_${role_id}_pretty_name] \
+                          {options $eligible_groups} \
+                          {section "Roles"} \
+                         ]
+    }
+
     lappend form [list \
                       users_per_case_${role_id}:integer \
                       {label "Number of users per role"} \
Index: openacs-4/contrib/packages/simulation/www/siminst/simulation-enrollment.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/www/siminst/Attic/simulation-enrollment.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/contrib/packages/simulation/www/siminst/simulation-enrollment.tcl	6 Jan 2004 18:36:28 -0000	1.1
+++ openacs-4/contrib/packages/simulation/www/siminst/simulation-enrollment.tcl	7 Jan 2004 15:54:55 -0000	1.2
@@ -16,7 +16,7 @@
     {enroll_type:text(radio)
         {label "Enrollment type"}
         {options {{"By invitation only" closed} {Open open}}}
-            {html {onChange "javascript:FormRefresh('simulation');"}}
+            {html {onChange "javascript:acs_FormRefresh('simulation');"}}
     }
     {enroll_start:date,to_sql(ansi),from_sql(ansi),optional
         {label "Enrollment start date"}
Index: openacs-4/contrib/packages/simulation/www/siminst/wizard.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/www/siminst/Attic/wizard.adp,v
diff -u -r1.2 -r1.3
--- openacs-4/contrib/packages/simulation/www/siminst/wizard.adp	6 Jan 2004 16:26:37 -0000	1.2
+++ openacs-4/contrib/packages/simulation/www/siminst/wizard.adp	7 Jan 2004 15:54:55 -0000	1.3
@@ -3,14 +3,6 @@
   <property name="context">@context;noquote@</property>
   <property name="header_stuff">
     <script language="javascript">
-        function FormRefresh(form_name) {
-            if (document.forms == null) return;
-            if (document.forms[form_name] == null) return;
-            if (document.forms[form_name].elements["__refreshing_p"] == null) return;
-
-            document.forms[form_name].elements["__refreshing_p"].value = 1;
-            document.forms[form_name].submit();
-        }
     </script>
   </property>
 
Index: openacs-4/contrib/packages/simulation/www/siminst/wizard.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/www/siminst/Attic/wizard.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/contrib/packages/simulation/www/siminst/wizard.tcl	7 Jan 2004 14:46:04 -0000	1.5
+++ openacs-4/contrib/packages/simulation/www/siminst/wizard.tcl	7 Jan 2004 15:54:55 -0000	1.6
@@ -67,7 +67,11 @@
 if { $highest_available > 6 } {
     set highest_available 6
 }
+if { $highest_available < 5 } {
+    set highest_available 5
+}
 
+
 wizard get_current_step -start $highest_available
 
 set sub_title $title(${wizard:current_id})
Index: openacs-4/packages/simulation/www/siminst/simulation-casting-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/siminst/Attic/simulation-casting-2.tcl,v
diff -u -r1.18 -r1.19
--- openacs-4/packages/simulation/www/siminst/simulation-casting-2.tcl	6 Jan 2004 18:36:28 -0000	1.18
+++ openacs-4/packages/simulation/www/siminst/simulation-casting-2.tcl	7 Jan 2004 15:54:55 -0000	1.19
@@ -27,7 +27,7 @@
     {enroll_type:text(radio)
         {label "Enrollment type"}
         {options {{"By invitation only" closed} {Open open}}}
-            {html {onChange "javascript:FormRefresh('simulation');"}}
+            {html {onChange "javascript:acs_FormRefresh('simulation');"}}
     }
     {enroll_start:date,to_sql(ansi),from_sql(ansi),optional
         {label "Enrollment start date"}
Index: openacs-4/packages/simulation/www/siminst/simulation-casting-3.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/siminst/simulation-casting-3.adp,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/simulation/www/siminst/simulation-casting-3.adp	7 Jan 2004 12:22:40 -0000	1.7
+++ openacs-4/packages/simulation/www/siminst/simulation-casting-3.adp	7 Jan 2004 15:54:55 -0000	1.8
@@ -1,8 +1,13 @@
-<p>
-  Pick which groups can be cast in which roles below.
-</p>
+<if @num_groups@ eq 0>
+  <div class="general-message">Please pick participants first.</div>
+</if>
+<else>
+  <p>
+    Pick which groups can be cast in which roles below.
+  </p>
+  <formtemplate id="actors"></formtemplate>
+</else>
 
-<formtemplate id="actors"></formtemplate>
 
 <p>
 TODO: Display the actor list and group size in parallel columns
Index: openacs-4/packages/simulation/www/siminst/simulation-casting-3.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/siminst/simulation-casting-3.tcl,v
diff -u -r1.13 -r1.14
--- openacs-4/packages/simulation/www/siminst/simulation-casting-3.tcl	7 Jan 2004 14:46:04 -0000	1.13
+++ openacs-4/packages/simulation/www/siminst/simulation-casting-3.tcl	7 Jan 2004 15:54:55 -0000	1.14
@@ -21,15 +21,19 @@
 
 
 set eligible_groups [simulation::casting_groups -mapped_only -workflow_id $workflow_id]
+set num_groups [llength $eligible_groups]
 
 foreach role_id [workflow::get_roles -workflow_id $workflow_id] {
     set role_${role_id}_pretty_name [workflow::role::get_element -role_id $role_id -element pretty_name]
 
-    lappend form [list parties_${role_id}:text(checkbox),multiple,optional \
-                      [list label \$role_${role_id}_pretty_name] \
-                      {options $eligible_groups} \
-                      {section "Roles"}
-                     ]
+    if { $num_groups > 0 } {
+        lappend form [list parties_${role_id}:text(checkbox),multiple,optional \
+                          [list label \$role_${role_id}_pretty_name] \
+                          {options $eligible_groups} \
+                          {section "Roles"} \
+                         ]
+    }
+
     lappend form [list \
                       users_per_case_${role_id}:integer \
                       {label "Number of users per role"} \
Index: openacs-4/packages/simulation/www/siminst/simulation-enrollment.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/siminst/Attic/simulation-enrollment.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/simulation/www/siminst/simulation-enrollment.tcl	6 Jan 2004 18:36:28 -0000	1.1
+++ openacs-4/packages/simulation/www/siminst/simulation-enrollment.tcl	7 Jan 2004 15:54:55 -0000	1.2
@@ -16,7 +16,7 @@
     {enroll_type:text(radio)
         {label "Enrollment type"}
         {options {{"By invitation only" closed} {Open open}}}
-            {html {onChange "javascript:FormRefresh('simulation');"}}
+            {html {onChange "javascript:acs_FormRefresh('simulation');"}}
     }
     {enroll_start:date,to_sql(ansi),from_sql(ansi),optional
         {label "Enrollment start date"}
Index: openacs-4/packages/simulation/www/siminst/wizard.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/siminst/wizard.adp,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/simulation/www/siminst/wizard.adp	6 Jan 2004 16:26:37 -0000	1.2
+++ openacs-4/packages/simulation/www/siminst/wizard.adp	7 Jan 2004 15:54:55 -0000	1.3
@@ -3,14 +3,6 @@
   <property name="context">@context;noquote@</property>
   <property name="header_stuff">
     <script language="javascript">
-        function FormRefresh(form_name) {
-            if (document.forms == null) return;
-            if (document.forms[form_name] == null) return;
-            if (document.forms[form_name].elements["__refreshing_p"] == null) return;
-
-            document.forms[form_name].elements["__refreshing_p"].value = 1;
-            document.forms[form_name].submit();
-        }
     </script>
   </property>
 
Index: openacs-4/packages/simulation/www/siminst/wizard.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/siminst/wizard.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/simulation/www/siminst/wizard.tcl	7 Jan 2004 14:46:04 -0000	1.5
+++ openacs-4/packages/simulation/www/siminst/wizard.tcl	7 Jan 2004 15:54:55 -0000	1.6
@@ -67,7 +67,11 @@
 if { $highest_available > 6 } {
     set highest_available 6
 }
+if { $highest_available < 5 } {
+    set highest_available 5
+}
 
+
 wizard get_current_step -start $highest_available
 
 set sub_title $title(${wizard:current_id})