Index: openacs-4/packages/acs-service-contract/sql/oracle/acs-sc-packages-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-service-contract/sql/oracle/acs-sc-packages-create.sql,v
diff -u -N -r1.9 -r1.10
--- openacs-4/packages/acs-service-contract/sql/oracle/acs-sc-packages-create.sql	17 May 2003 09:56:18 -0000	1.9
+++ openacs-4/packages/acs-service-contract/sql/oracle/acs-sc-packages-create.sql	10 Sep 2003 14:52:01 -0000	1.10
@@ -59,6 +59,7 @@
    function new (
        impl_contract_name	acs_sc_impls.impl_contract_name%TYPE,
        impl_name		acs_sc_impls.impl_name%TYPE,
+       impl_pretty_name		acs_sc_impls.impl_pretty_name%TYPE,
        impl_owner_name		acs_sc_impls.impl_owner_name%TYPE
    ) return acs_sc_impls.impl_id%TYPE;
 
@@ -334,6 +335,7 @@
    function new (
        impl_contract_name	acs_sc_impls.impl_contract_name%TYPE,
        impl_name		acs_sc_impls.impl_name%TYPE,
+       impl_pretty_name		acs_sc_impls.impl_pretty_name%TYPE,
        impl_owner_name		acs_sc_impls.impl_owner_name%TYPE
    ) return acs_sc_impls.impl_id%TYPE
    is
@@ -343,12 +345,14 @@
 
        insert into acs_sc_impls (
 	      impl_id,
-	      impl_name,	
+	      impl_name,
+              impl_pretty_name,
 	      impl_owner_name,
 	      impl_contract_name
        ) values (
 	      v_impl_id,
 	      impl_name,
+              impl_pretty_name,
 	      impl_owner_name,
 	      impl_contract_name
        );
@@ -453,8 +457,6 @@
 /
 show errors
 
-
-
 create or replace package body acs_sc_impl_alias
 as
 
@@ -512,7 +514,7 @@
 
 end acs_sc_impl_alias;
 /
-show errors
+show errors 
 
 create or replace package body acs_sc_binding
 as