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.2 -r1.26.2.3 --- openacs-4/contrib/packages/project-manager/www/one.tcl 5 Dec 2003 01:09:19 -0000 1.26.2.2 +++ openacs-4/contrib/packages/project-manager/www/one.tcl 13 Dec 2003 01:19:54 -0000 1.26.2.3 @@ -37,12 +37,14 @@ write_p:onevalue create_p:onevalue versions:multirow + custom:multirow parent_task_id:onevalue task_type:onevalue project_id:onevalue use_goal_p:onevalue use_project_code_p:onevalue use_uncertain_completion_times_P:onevalue + use_project_customizations_p:onevalue } -validate { project_item_id_exists { if {![exists_and_not_null project_item_id]} { @@ -56,6 +58,8 @@ } } +set original_project_id $project_id + # --------------------------------------------------------------- # # the unique identifier for this package @@ -68,6 +72,7 @@ set use_goal_p [parameter::get -parameter "UseGoalP" -default "1"] set use_project_code_p [parameter::get -parameter "UseUserProjectCodesP" -default "1"] set use_uncertain_completion_times_p [parameter::get -parameter "UseUncertainCompletionTimesP" -default "1"] +set use_project_customizations_p [parameter::get -parameter "UseProjectCustomizationsP" -default "0"] # permissions permission::require_permission -party_id $user_id -object_id $package_id -privilege read @@ -109,6 +114,8 @@ set work_display_template "@tasks.estimated_hours_work@ h" } +set process_link "process-use?project_item_id=$project_item_id" + template::list::create \ -name tasks \ -multirow tasks \ @@ -167,7 +174,7 @@ } } \ - -actions [list "Use process" [export_vars -base process-use {project_item_id}] "Use a process"] \ + -actions [list "Use process" $process_link "Use a process" "Projects" "index" "View list of tasks" "Tasks" "tasks" "View tasks for all projects" "Processes" "processes" "View and use processes" "Admin" "admin/" "Administration pages"]\ -bulk_actions { "Edit" "task-add-edit" "Edit tasks" } \ @@ -344,7 +351,17 @@ } +# -------------------------CUSTOMIZATIONS-------------------------- +# If there are customizations, put them in a multirow called custom +# ----------------------------------------------------------------- -ad_return_template +db_1row custom_query { } -column_array custom +set custom(pretty_target_rollout) [lc_time_fmt $custom(target_rollout) "%x"] + +# end of customizations + + + +ad_return_template # ------------------------- END OF FILE ------------------------- #