Index: openacs-4/contrib/packages/simulation/www/siminst/simulation-casting-2.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/www/siminst/Attic/simulation-casting-2.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/contrib/packages/simulation/www/siminst/simulation-casting-2.adp	13 Nov 2003 13:14:34 -0000	1.1
+++ openacs-4/contrib/packages/simulation/www/siminst/simulation-casting-2.adp	13 Nov 2003 13:20:04 -0000	1.2
@@ -2,12 +2,12 @@
   <property name="title">@page_title;noquote@</property>
   <property name="context">@context;noquote@</property>
 
-<p>This is working notes on how this page should function - probably
-  there is no UI here.
   <ul>
     <li>For each valid entry in the csv list of users, create a record
   in sim_party_sim_map.
   <li>If we are auto-casting, call the auto-cast function and then
   redirect to <a href="../simplay/sim-case-list">../simplay/sim-case-list</a>
-  <li>If we are not auto-casting
-</li></ul>
+  <li>If we are not auto-casting, this is the casting page for the
+    admin.  It shows (To be defined.  Question: do we need a full
+    admin facility for viewing and changing casting?)
+</ul>
Index: openacs-4/contrib/packages/simulation/www/simplay/sim-case-list.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/www/simplay/Attic/sim-case-list.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/contrib/packages/simulation/www/simplay/sim-case-list.adp	13 Nov 2003 13:14:34 -0000	1.1
+++ openacs-4/contrib/packages/simulation/www/simplay/sim-case-list.adp	13 Nov 2003 13:20:04 -0000	1.2
@@ -2,4 +2,4 @@
   <property name="title">@page_title;noquote@</property>
   <property name="context">@context;noquote@</property>
 
-<p>Expects a sim id.  Shows all cases for that sim.
\ No newline at end of file
+<p>Expects a sim id.  Shows all cases for that sim.  This is an admin page.
\ No newline at end of file
Index: openacs-4/contrib/packages/simulation/www/simplay/sim-case-list.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/www/simplay/Attic/sim-case-list.tcl,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/contrib/packages/simulation/www/simplay/sim-case-list.tcl	13 Nov 2003 13:20:04 -0000	1.1
@@ -0,0 +1,9 @@
+ad_page_contract {
+    Create a new simulation
+}
+
+set page_title "Simulation Case List"
+
+set context [list $page_title]
+set package_id [ad_conn package_id]
+
Index: openacs-4/packages/simulation/www/siminst/simulation-casting-2.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/siminst/Attic/simulation-casting-2.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/simulation/www/siminst/simulation-casting-2.adp	13 Nov 2003 13:14:34 -0000	1.1
+++ openacs-4/packages/simulation/www/siminst/simulation-casting-2.adp	13 Nov 2003 13:20:04 -0000	1.2
@@ -2,12 +2,12 @@
   <property name="title">@page_title;noquote@</property>
   <property name="context">@context;noquote@</property>
 
-<p>This is working notes on how this page should function - probably
-  there is no UI here.
   <ul>
     <li>For each valid entry in the csv list of users, create a record
   in sim_party_sim_map.
   <li>If we are auto-casting, call the auto-cast function and then
   redirect to <a href="../simplay/sim-case-list">../simplay/sim-case-list</a>
-  <li>If we are not auto-casting
-</li></ul>
+  <li>If we are not auto-casting, this is the casting page for the
+    admin.  It shows (To be defined.  Question: do we need a full
+    admin facility for viewing and changing casting?)
+</ul>
Index: openacs-4/packages/simulation/www/simplay/sim-case-list.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/simplay/sim-case-list.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/simulation/www/simplay/sim-case-list.adp	13 Nov 2003 13:14:34 -0000	1.1
+++ openacs-4/packages/simulation/www/simplay/sim-case-list.adp	13 Nov 2003 13:20:04 -0000	1.2
@@ -2,4 +2,4 @@
   <property name="title">@page_title;noquote@</property>
   <property name="context">@context;noquote@</property>
 
-<p>Expects a sim id.  Shows all cases for that sim.
\ No newline at end of file
+<p>Expects a sim id.  Shows all cases for that sim.  This is an admin page.
\ No newline at end of file
Index: openacs-4/packages/simulation/www/simplay/sim-case-list.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/simplay/sim-case-list.tcl,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/simulation/www/simplay/sim-case-list.tcl	13 Nov 2003 13:20:04 -0000	1.1
@@ -0,0 +1,9 @@
+ad_page_contract {
+    Create a new simulation
+}
+
+set page_title "Simulation Case List"
+
+set context [list $page_title]
+set package_id [ad_conn package_id]
+