Index: openacs-4/packages/acs-kernel/sql/postgresql/rel-segments-body-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/sql/postgresql/rel-segments-body-create.sql,v
diff -u -N -r1.6 -r1.7
--- openacs-4/packages/acs-kernel/sql/postgresql/rel-segments-body-create.sql	20 Apr 2001 02:03:49 -0000	1.6
+++ openacs-4/packages/acs-kernel/sql/postgresql/rel-segments-body-create.sql	2 Jul 2002 21:16:06 -0000	1.7
@@ -14,8 +14,7 @@
 -- PACKAGE BODY --
 ------------------
 
--- create or replace package body rel_segment
--- function new
+-- rel_segment__new -- full version
 create function rel_segment__new (integer,varchar,timestamp,integer,varchar,varchar,varchar,varchar,integer,varchar,integer)
 returns integer as '
 declare
@@ -45,7 +44,19 @@
   
 end;' language 'plpgsql';
 
+-- rel_segment__new -- overloaded version for specifying only non-default values
+create function rel_segment__new (varchar,integer,varchar)
+returns integer as '
+declare
+  new__segment_name      alias for $1;  
+  new__group_id          alias for $2;  
+  new__rel_type          alias for $3; 
+begin
+	return rel_segment__new(null, ''rel_segment'', now(), null, null, null, null new__segment_name, new__group_id, new_rel_type, null);
 
+end;' language 'plpgsql';
+
+
 -- procedure delete
 create function rel_segment__delete (integer)
 returns integer as '
