Index: openacs-4/packages/curriculum-central/tcl/uos-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/curriculum-central/tcl/uos-procs.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/curriculum-central/tcl/uos-procs.tcl	4 Dec 2005 07:32:38 -0000	1.2
+++ openacs-4/packages/curriculum-central/tcl/uos-procs.tcl	11 Dec 2005 07:47:40 -0000	1.3
@@ -11,8 +11,10 @@
 }
 
 namespace eval curriculum_central::uos {}
-
 namespace eval curriculum_central::uos::format_log_title {}
+namespace eval curriculum_central::uos::get_unit_coordinator {}
+namespace eval curriculum_central::uos::get_stream_coordinator {}
+namespace eval curriculum_central::uos::notification_info {}
 
 ad_proc -public curriculum_central::uos::workflow_short_name {} {
     Get the short name of the workflow for Units of Study.
@@ -267,7 +269,8 @@
 	       	 [list objectives $objectives] \
 	         [list outcomes $outcomes] \
      	         [list syllabus $syllabus] \
-		 [list syllabus_format $syllabus_format]] \
+		 [list syllabus_format $syllabus_format] \
+		 [list object_type "cc_uos"]] \
 	     -package_name "cc_uos" \
 	     "cc_uos"]
 
@@ -318,6 +321,43 @@
 
 #####
 #
+# Get Unit Coordinator
+#
+#####
+
+ad_proc -private curriculum_central::uos::get_unit_coordinator::pretty_name {} {
+    return "[_ curriculum-central.unit_coordinator]"
+}
+
+ad_proc -private curriculum_central::uos::get_unit_coordinator::get_assignees {
+    case_id
+    object_id
+    role_id
+} {
+    return [db_list select_unit_coordinators {} -default {}]
+}
+
+#####
+#
+# Get Stream Coordinator
+#
+#####
+
+ad_proc -private curriculum_central::uos::get_stream_coordinator::pretty_name {} {
+    return "[_ curriculum-central.stream_coordinator]"
+}
+
+ad_proc -private curriculum_central::uos::get_stream_coordinator::get_assignees {
+    case_id
+    object_id
+    role_id
+} {
+    return [db_list select_stream_coordinators {} -default {}]
+}
+
+
+#####
+#
 # Notification Info
 #
 #####