Index: openacs-4/packages/workflow/tcl/role-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/tcl/role-procs.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/workflow/tcl/role-procs.xql	10 Jan 2003 13:38:37 -0000	1.1
+++ openacs-4/packages/workflow/tcl/role-procs.xql	14 Jan 2003 15:09:16 -0000	1.2
@@ -10,4 +10,13 @@
     </querytext>
   </fullquery>
 
+  <fullquery name="workflow::role::get_id.select_role_id">
+    <querytext>
+        select role_id 
+        from workflow_roles 
+        where workflow_id = :workflow_id 
+        and short_name = :short_name
+    </querytext>
+  </fullquery>
+
 </queryset>