Index: openacs-4/packages/acs-person/sql/postgresql/acs-person-plsql.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-person/sql/postgresql/Attic/acs-person-plsql.sql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-person/sql/postgresql/acs-person-plsql.sql	24 Sep 2002 05:24:47 -0000	1.1
+++ openacs-4/packages/acs-person/sql/postgresql/acs-person-plsql.sql	27 Sep 2002 00:07:18 -0000	1.2
@@ -30,19 +30,20 @@
 
 drop function inline_0 ();
 
-create or replace function acs_person__new (varchar, varchar, varchar, varchar, varchar, 
+create or replace function acs_person__new (integer,varchar, varchar, varchar, varchar, varchar, 
 integer,integer,varchar,integer)
 returns integer as ' 
 declare 
-  p_given_name           alias for $1;
-  p_middle_name          alias for $2; 
-  p_family_name          alias for $3; 
-  p_formatted_name       alias for $4;
-  p_preferred_given_name alias for $5;
-  p_user_id              alias for $6; -- this is not the creation user
-  p_creation_user        alias for $7;
-  p_creation_ip          alias for $8;
-  p_context_id           alias for $9;
+  p_acs_person_id        alias for $1;
+  p_given_name           alias for $2;
+  p_middle_name          alias for $3; 
+  p_family_name          alias for $4; 
+  p_formatted_name       alias for $5;
+  p_preferred_given_name alias for $6;
+  p_user_id              alias for $7; -- this is not the creation user
+  p_creation_user        alias for $8;
+  p_creation_ip          alias for $9;
+  p_context_id           alias for $10
   v_acs_person_id acs_persons.acs_person_id%TYPE; 
 begin 
   v_acs_person_id := acs_object__new (