Index: openacs-4/packages/acs-service-contract/sql/postgresql/acs-sc-packages-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-service-contract/sql/postgresql/acs-sc-packages-create.sql,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/acs-service-contract/sql/postgresql/acs-sc-packages-create.sql	10 Sep 2003 14:52:01 -0000	1.6
+++ openacs-4/packages/acs-service-contract/sql/postgresql/acs-sc-packages-create.sql	11 Sep 2003 08:27:24 -0000	1.7
@@ -209,8 +209,6 @@
 
 end;' language 'plpgsql';
 
-
-
 create function acs_sc_impl__new(varchar,varchar,varchar,varchar)
 returns integer as '
 declare
@@ -248,7 +246,23 @@
 
 end;' language 'plpgsql';
 
+-- Only three arguments, defaults pretty name to empty string
+create function acs_sc_impl__new(varchar,varchar,varchar)
+returns integer as '
+declare
+    p_impl_contract_name	alias for $1;
+    p_impl_name			alias for $2;
+    p_impl_owner_name		alias for $3;
+    v_impl_id			integer;
+begin
+    -- Using an empty pretty name
+    v_impl_id := acs_sc_impl__new(p_impl_contract_name,
+                                  p_impl_name,
+                                  '',
+                                  p_impl_owner_name);
+    return v_impl_id;
 
+end;' language 'plpgsql';
 
 create function acs_sc_impl__get_id(varchar,varchar)
 returns integer as '
