Index: openacs-4/contrib/packages/project-manager/www/one.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/one.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/contrib/packages/project-manager/www/one.tcl	7 Aug 2003 23:08:45 -0000	1.8
+++ openacs-4/contrib/packages/project-manager/www/one.tcl	22 Aug 2003 00:27:33 -0000	1.9
@@ -26,16 +26,7 @@
 
 } -properties {
     context_bar:onevalue
-    project_name:onevalue
-    project_code:onevalue
-    project_id:onevalue
-    live_revision:onevalue
-    goal:onevalue
-    description:onevalue
-    deadline_scheduling:onevalue
-    planned_start_date:onevalue
-    planned_end_date:onevalue
-    ongoing_p:onevalue
+    project:multirow
     tasks:multirow
     write_p:onevalue
     create_p:onevalue
@@ -75,11 +66,84 @@
 set create_p [permission::permission_p -object_id $package_id -privilege create]
 
 
-db_multirow tasks project_tasks_query { }
+db_1row project_query { } -column_array project
 
-db_1row project_query {	}
 db_multirow versions project_versions { }
 
+
+
+# Tasks, using list-builder ---------------------------------
+
+db_multirow tasks project_tasks_query { }
+
+template::list::create \
+    -name tasks \
+    -multirow tasks \
+    -key item_id \
+    -elements {
+        item_id {
+            label "ID"
+            display_template {
+                <if @tasks.const_type@ eq start_before_start>
+                <img src="images/start_before_start.png">
+                </if>
+                <if @tasks.const_type@ eq start_before_finish>
+                <img src="images/start_before_finish.png">
+                </if>
+                <if @tasks.const_type@ eq finish_before_start>
+                <img src="images/finish_before_start.png">
+                </if>
+                <if @tasks.const_type@ eq finish_before_finish>
+                <img src="images/finish_before_finish.png">
+                </if>
+                \#@tasks.item_id@
+            }
+        }
+        title {
+            label "Subject"
+            display_col title
+            link_url_col item_url
+            link_html { title "View this task" }
+        }
+        percent_complete {
+            label "Status"
+            display_template "@tasks.percent_complete@\%"
+        }
+        actual_hours_worked {
+            label "Hour to date"
+            display_template "@tasks.actual_hours_worked@ hrs"
+            aggregate "sum"
+        }
+        estimated_hours_work_min {
+            label "Work estimate"
+            display_template "@tasks.estimated_hours_work_min@ - @tasks.estimated_hours_work_max@ hrs"
+            aggregate "sum"
+        }
+        end_date {
+            label "Deadline"
+        }
+    } \
+    -orderby {
+        item_id {orderby item_id}
+        percent_complete {orderby percent_complete}
+        end_date {orderby end_date}
+        default_value item_id,desc
+    } \
+    -orderby_name orderby_tasks \
+    -html {
+        width 100%
+    }
+
+
+db_multirow -extend { item_url } tasks project_tasks_query {
+} {
+    set item_url [export_vars -base "task-one" -override {{task_id $item_id}} { revision_id task_id}]
+}
+
+
+
+
+
 ad_return_template
 
 # ------------------------- END OF FILE ------------------------- #