Index: openacs-4/contrib/packages/project-manager/www/index.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/index.adp,v
diff -u -r1.16 -r1.17
--- openacs-4/contrib/packages/project-manager/www/index.adp 15 Sep 2003 23:09:57 -0000 1.16
+++ openacs-4/contrib/packages/project-manager/www/index.adp 8 Oct 2003 23:29:16 -0000 1.17
@@ -8,10 +8,10 @@
- My @project_term_lower@s |
+
Processes |
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.24 -r1.25
--- openacs-4/contrib/packages/project-manager/www/one.tcl 3 Oct 2003 23:52:17 -0000 1.24
+++ openacs-4/contrib/packages/project-manager/www/one.tcl 8 Oct 2003 23:29:16 -0000 1.25
@@ -151,9 +151,7 @@
}
} \
- -actions {
- "Use process" "process-use" "Use a process"
- } \
+ -actions [list "Use process" [export_vars -base process-use {project_item_id}] "Use a process"] \
-bulk_actions {
"Edit" "task-add-edit" "Edit tasks"
} \
Index: openacs-4/contrib/packages/project-manager/www/process-one.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/process-one.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/contrib/packages/project-manager/www/process-one.tcl 8 Oct 2003 20:16:11 -0000 1.4
+++ openacs-4/contrib/packages/project-manager/www/process-one.tcl 8 Oct 2003 23:29:16 -0000 1.5
@@ -70,6 +70,7 @@
-orderby_name orderby_tasks \
-bulk_actions {
"Edit" "process-task-add-edit" "Edit tasks"
+ "Delete" "process-task-delete" "Delete tasks"
} \
-bulk_action_export_vars {
process_id
Index: openacs-4/contrib/packages/project-manager/www/process-task-delete-2-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/process-task-delete-2-postgresql.xql,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/contrib/packages/project-manager/www/process-task-delete-2-postgresql.xql 8 Oct 2003 23:29:16 -0000 1.1
@@ -0,0 +1,14 @@
+
+
+
+
+
+ DELETE FROM
+ pm_process_task
+ WHERE
+ process_task_id in ([join $process_task_id ", "])
+
+
+
+
+
Index: openacs-4/contrib/packages/project-manager/www/process-task-delete-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/process-task-delete-2.tcl,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/contrib/packages/project-manager/www/process-task-delete-2.tcl 8 Oct 2003 23:29:16 -0000 1.1
@@ -0,0 +1,24 @@
+ad_page_contract {
+
+ Delete of process tasks
+
+ @author jader@bread.com
+ @creation-date 2003-10-08
+ @cvs-id $Id: process-task-delete-2.tcl,v 1.1 2003/10/08 23:29:16 jader Exp $
+
+} {
+ process_id:integer
+ process_task_id:multiple,verify
+}
+
+# --------------------------------------------------------------- #
+# the unique identifier for this package
+set package_id [ad_conn package_id]
+set user_id [ad_maybe_redirect_for_registration]
+
+# permissions
+permission::require_permission -party_id $user_id -object_id $package_id -privilege delete
+
+db_dml delete_process_tasks { }
+
+ad_returnredirect "process-one?[export_vars -url {process_id}]"
Index: openacs-4/contrib/packages/project-manager/www/process-task-delete.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/process-task-delete.adp,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/contrib/packages/project-manager/www/process-task-delete.adp 8 Oct 2003 23:29:16 -0000 1.1
@@ -0,0 +1,17 @@
+
+@context_bar@
+@title@
+
+
+
+
+
+
+
Index: openacs-4/contrib/packages/project-manager/www/process-task-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/process-task-delete.tcl,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/contrib/packages/project-manager/www/process-task-delete.tcl 8 Oct 2003 23:29:16 -0000 1.1
@@ -0,0 +1,41 @@
+ad_page_contract {
+
+ Confirm delete of process tasks
+
+ @author jader@bread.com
+ @creation-date 2003-10-08
+ @cvs-id $Id: process-task-delete.tcl,v 1.1 2003/10/08 23:29:16 jader Exp $
+
+ @return task_term_lower What to call tasks
+ @return context_bar Context bar.
+ @return title Page title.
+
+} {
+
+ process_id:integer,optional
+ process_task_id:integer,multiple,notnull
+
+} -properties {
+
+ hidden_vars:onevalue
+ task_term_lower:onevalue
+ context_bar:onevalue
+ title:onevalue
+
+}
+
+# --------------------------------------------------------------- #
+# the unique identifier for this package
+set package_id [ad_conn package_id]
+set user_id [ad_maybe_redirect_for_registration]
+
+# terminology
+set task_term_lower [parameter::get -parameter "taskname" -default "task"]
+
+set title "Delete process $task_term_lower"
+set context_bar [ad_context_bar "Delete process $task_term_lower"]
+
+# permissions
+permission::require_permission -party_id $user_id -object_id $package_id -privilege delete
+
+set hidden_vars [export_vars -form {process_task_id:multiple,sign process_id}]
Index: openacs-4/contrib/packages/project-manager/www/process-use-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/process-use-postgresql.xql,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/contrib/packages/project-manager/www/process-use-postgresql.xql 8 Oct 2003 23:29:16 -0000 1.1
@@ -0,0 +1,14 @@
+
+
+
+
+
+ SELECT
+ process_id,
+ one_line
+ FROM pm_process
+ ORDER BY one_line
+
+
+
+
Index: openacs-4/contrib/packages/project-manager/www/process-use.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/process-use.adp,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/contrib/packages/project-manager/www/process-use.adp 8 Oct 2003 23:29:16 -0000 1.1
@@ -0,0 +1,8 @@
+
+@context_bar@
+@title@
+
+@form_definition_beg@
+ @select_widget@
+
+@form_definition_end@
Index: openacs-4/contrib/packages/project-manager/www/process-use.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/process-use.tcl,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/contrib/packages/project-manager/www/process-use.tcl 8 Oct 2003 23:29:16 -0000 1.1
@@ -0,0 +1,64 @@
+ad_page_contract {
+
+ Page to get the process if one is missing for task creation
+
+ @author jader@bread.com
+ @creation-date 2003-10-08
+ @cvs-id $Id: process-use.tcl,v 1.1 2003/10/08 23:29:16 jader Exp $
+
+ @return context_bar Context bar.
+ @return title Page title.
+ @return projects A multirow containing the list of projects
+
+ @param process_id The process we're using to create this task
+} {
+
+ project_item_id:integer,notnull
+
+} -properties {
+
+ context_bar:onevalue
+ title:onevalue
+ select_widget:onevalue
+ select_widget_name:onevalue
+ form_definition_beg:onevalue
+ form_definition_end:onevalue
+
+} -validate {
+} -errors {
+}
+
+# --------------------------------------------------------------- #
+
+set user_id [ad_maybe_redirect_for_registration]
+set package_id [ad_conn package_id]
+
+# terminology
+set project_term [parameter::get -parameter "ProjectName" -default "Project"]
+set task_term [parameter::get -parameter "TaskName" -default "Task"]
+set task_term_lower [parameter::get -parameter "taskname" -default "task"]
+set use_uncertain_completion_times_p [parameter::get -parameter "UseUncertainCompletionTimesP" -default "1"]
+
+
+set title "Use a process"
+set context_bar [ad_context_bar [list "processes" "Processes"] "Use"]
+
+
+# need to change this to show all the projects you're on by
+# default, and then give you the option of selecting all projects
+# as an option.
+
+set select_widget_name process_id
+set select_widget ""
+
+set form_definition_beg ""
+
Index: openacs-4/contrib/packages/project-manager/www/processes.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/processes.adp,v
diff -u -r1.2 -r1.3
--- openacs-4/contrib/packages/project-manager/www/processes.adp 3 Oct 2003 22:21:45 -0000 1.2
+++ openacs-4/contrib/packages/project-manager/www/processes.adp 8 Oct 2003 23:29:16 -0000 1.3
@@ -8,12 +8,6 @@