Index: openacs-4/packages/simulation/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/index.tcl,v
diff -u -r1.14.2.1 -r1.14.2.2
--- openacs-4/packages/simulation/www/index.tcl	17 Mar 2004 08:31:49 -0000	1.14.2.1
+++ openacs-4/packages/simulation/www/index.tcl	30 Nov 2004 21:48:05 -0000	1.14.2.2
@@ -6,158 +6,6 @@
 } -properties {
 }
 
-set package_id [ad_conn package_id]
-set page_title "Simulation"
+set page_title "[_ simulation.Simulation_Home]"
 set context ""
-set user_id [auth::get_user_id]
 
-set login_url [ad_get_login_url -return]
-
-set citybuild_p [permission::permission_p -object_id $package_id -privilege sim_object_create]
-set simbuild_p [permission::permission_p -object_id $package_id -privilege sim_template_read]
-set siminst_p [permission::permission_p -object_id $package_id -privilege sim_inst]
-
-######################################################################
-#
-# active_cases
-#
-# a list of active cases for logged-in user
-#
-######################################################################
-
-#---------------------------------------------------------------------
-# active_cases list
-#---------------------------------------------------------------------
-
-template::list::create \
-    -name active_cases \
-    -multirow active_cases \
-    -html {width "100%"}\
-    -elements {
-	case_name { 
-	    label "Case"
-	    orderby case_name
-	}
-	task_count {
-	    label "Tasks"
-	    orderby task_count
-            html { align right }
-	}
-    }
-
-#---------------------------------------------------------------------
-# active_cases database query
-#---------------------------------------------------------------------
-# this is currently a dummy query.  It should get all cases
-# for which the logged-in user has a role, and a count of active tasks
-# for that role.
-
-db_multirow active_cases active_cases_select {
-    select 'case one' as case_name,
-           2 as task_count
-}
-
-
-######################################################################
-#
-# object_count
-#
-# A count of all objects in the system, by type, for admins
-#
-######################################################################
-
-#---------------------------------------------------------------------
-# object_count list
-#---------------------------------------------------------------------
-if { ![exists_and_not_null parent_id] } {
-    set parent_id [bcms::folder::get_id_by_package_id -parent_id 0]
-}
-
-set action_list [list "Add an Object" [export_vars -base object-edit { parent_id }] ]
-
-template::list::create \
-    -name object_count \
-    -multirow object_count \
-    -actions $action_list \
-    -html {width "100%"} \
-    -elements {
-        type {
-            label "Type"
-        }
-	count {
-	    label "Count"
-            link_url_col view_url
-            html { align right }
-        }
-    }
-
-#---------------------------------------------------------------------
-# object_count database query
-#---------------------------------------------------------------------
-# this query should be package-sensitive.  Not sure how to do that - 
-# should it return only items in folders associated with the package id?
-# if so, how do we also count items in child folders?
-
-db_multirow  -extend { view_url } object_count object_count_select "
-    select content_type as type,
-           count(content_type) as count
-      from cr_items
-     where content_type like 'sim_%'
-        or content_type like 'image'
-        or content_type like 'stylesheet'
-     group by content_type
-" {
-    set view_url [export_vars -base "citybuild/" { type }]
-}
-
-
-######################################################################
-#
-# sim_template_count
-#
-# A count of all templates, for admins
-# They should probably be grouped, but I'm not sure what to group 
-# them by yet
-#
-######################################################################
-
-#---------------------------------------------------------------------
-# sim_template_count list
-#---------------------------------------------------------------------
-
-template::list::create \
-    -name sim_template_count \
-    -multirow sim_template_count \
-    -html {width "100%"} \
-    -elements {
-        count {
-            label "Simulation Templates"
-            link_url_col view_url
-        }
-    }
-
-
-
-template::list::create \
-    -name template_count \
-    -multirow template_count \
-    -elements {
-        type {
-            label "Type"
-        }
-	count {
-	    label "Count"
-            link_url_col view_url
-        }
-    }
-
-#---------------------------------------------------------------------
-# template_count database query
-#---------------------------------------------------------------------
-
-db_multirow -extend { view_url } sim_template_count sim_template_count_query "
-    select count(workflow_id) as count
-      from workflows w
-" {
-    set view_url [export_vars -base "simbuild/"]
-}