Index: openacs-4/packages/workflow/tcl/implementation-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/tcl/implementation-procs.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/workflow/tcl/implementation-procs.tcl 3 Feb 2003 12:23:01 -0000 1.1 +++ openacs-4/packages/workflow/tcl/implementation-procs.tcl 12 Feb 2003 14:23:15 -0000 1.2 @@ -15,6 +15,11 @@ namespace eval workflow::impl::role_assignee_pick_list {} namespace eval workflow::impl::role_assignee_pick_list::current_assignees {} +namespace eval workflow::impl::role_assignee_subquery {} +namespace eval workflow::impl::role_assignee_subquery::registered_users {} + +namespace eval workflow::impl::notification {} + ##### # # Generic service contract implementation procs @@ -67,7 +72,6 @@ } { Return the static assignees for this role } { - error "IMPL: [db_list select_static_assignees {}]" return [db_list select_static_assignees {}] } @@ -89,4 +93,48 @@ Return the list of current assignees for this case and role } { return [db_list select_current_assignees {}] -} \ No newline at end of file +} + + + + +##### +# +# Search Subquery - registered users +# +##### + +ad_proc -public workflow::impl::role_assignee_subquery::registered_users::pretty_name {} { + return "All registered users" +} + +ad_proc -public workflow::impl::role_assignee_subquery::registered_users::get_subquery { + case_id + object_id + role_id +} { + Return a subquery for all registered users. +} { + return [db_map cc_users] +} + + + +##### +# +# Notifications +# +##### + +ad_proc -public workflow::impl::notification::get_url { + object_id +} { + # Todo: Implement this proc +} + +ad_proc -public workflow::impl::notification::process_reply { + reply_id +} { + # Todo: Implement this proc +} +