Index: openacs-4/packages/acs-tcl/tcl/community-core-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/community-core-procs-oracle.xql,v
diff -u -r1.20 -r1.21
--- openacs-4/packages/acs-tcl/tcl/community-core-procs-oracle.xql	20 Nov 2017 15:52:23 -0000	1.20
+++ openacs-4/packages/acs-tcl/tcl/community-core-procs-oracle.xql	21 Feb 2018 14:00:55 -0000	1.21
@@ -22,5 +22,18 @@
 		end;
       </querytext>
 </fullquery>
- 
+
+<fullquery name="acs_user::create_portrait.create_rel">
+  <querytext>
+
+    begin
+    :1 := acs_rel.new (
+    rel_type => 'user_portrait_rel',
+    object_id_one => :user_id,
+    object_id_two => :item_id);
+    end;
+
+  </querytext>
+</fullquery>
+  
 </queryset>