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.26.2.3 -r1.26.2.4 --- openacs-4/contrib/packages/project-manager/www/one.tcl 13 Dec 2003 01:19:54 -0000 1.26.2.3 +++ openacs-4/contrib/packages/project-manager/www/one.tcl 10 Jan 2004 01:04:02 -0000 1.26.2.4 @@ -121,29 +121,22 @@ -multirow tasks \ -key task_id \ -elements { + task_id { + label "ID" + } title { label "Subject" display_col title - link_url_col item_url - link_html { title "View this task" } display_template { - @tasks.title@  - - - - - - - - - - - - - - + @tasks.title@ } } + parent_task_id { + label "Dep" + display_template { + @tasks.parent_task_id@ + } + } slack_time { label "Slack" display_template "@tasks.slack_time@" @@ -197,7 +190,6 @@ earliest_start {orderby earliest_start} earliest_finish {orderby earliest_finish} latest_start {orderby latest_start} - slack_time {orderby slack_time} latest_finish {orderby latest_finish} default_value latest_start,asc } \ @@ -206,14 +198,25 @@ } -db_multirow -extend { item_url earliest_start_pretty earliest_finish_pretty latest_start_pretty latest_finish_pretty} tasks project_tasks_query { +db_multirow -extend { item_url earliest_start_pretty earliest_finish_pretty latest_start_pretty latest_finish_pretty slack_time} tasks project_tasks_query { } { set item_url [export_vars -base "task-one" { revision_id task_id}] set earliest_start_pretty [lc_time_fmt $earliest_start "%x"] set earliest_finish_pretty [lc_time_fmt $earliest_finish "%x"] set latest_start_pretty [lc_time_fmt $latest_start "%x"] set latest_finish_pretty [lc_time_fmt $latest_finish "%x"] + + if {[exists_and_not_null earliest_start_j]} { + if {$earliest_start_j < $today_j} { + set slack_time "[expr $latest_start_j - $today_j] days" + } else { + set slack_time "[expr $latest_start_j - $earliest_start_j] days" + } + } else { + set slack_time "n/a" + } + } @@ -357,8 +360,6 @@ db_1row custom_query { } -column_array custom -set custom(pretty_target_rollout) [lc_time_fmt $custom(target_rollout) "%x"] - # end of customizations