Index: openacs-4/packages/acs-subsite/sql/postgresql/acs-subsite-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/sql/postgresql/acs-subsite-create.sql,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/acs-subsite/sql/postgresql/acs-subsite-create.sql	12 May 2002 20:57:02 -0000	1.4
+++ openacs-4/packages/acs-subsite/sql/postgresql/acs-subsite-create.sql	8 Jul 2002 16:42:44 -0000	1.5
@@ -12,6 +12,7 @@
 \i application-groups-create.sql
 \i subsite-callbacks-create.sql
 \i host-node-map-create.sql
+\i user-sc-create.sql
 
 -- DRB: user profiles are fundamentally broken, which is probably why they
 -- weren't created in the original ACS 4.2 Oracle sources. 
Index: openacs-4/packages/acs-subsite/sql/postgresql/user-sc-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/sql/postgresql/user-sc-create.sql,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/acs-subsite/sql/postgresql/user-sc-create.sql	8 Jul 2002 16:42:44 -0000	1.1
@@ -0,0 +1,146 @@
+
+--
+-- A service contract for allowing packages to be notified of changes in user information
+--
+-- The operations defined here are
+--     UserData.UserNew
+--     UserData.UserApprove
+--     UserData.UserDeapprove
+--     UserData.UserDelete
+--     UserData.UserModify
+--
+-- ben@openforce
+-- ported by dan chak (chak@openforce.net)
+-- Jan 22, 2002
+
+create function inline_0()
+returns integer as '
+declare
+    foo	integer;
+begin
+    foo :=  acs_sc_contract__new(
+	    ''UserData'',
+	    ''User Data Updates''
+	    );
+
+    -- The UserNew operation            
+
+    foo := acs_sc_msg_type__new(
+	    ''UserData.UserNew.InputType'',
+	    ''user_id:integer''
+	    );
+
+    foo := acs_sc_msg_type__new(
+	    ''UserData.UserNew.OutputType'',
+	    ''''
+	    );
+ 
+    foo := acs_sc_operation__new(
+	    ''UserData'',
+	    ''UserNew'',
+	    ''Notify that a new user has been created'',
+	    ''f'',
+	    1,
+	    ''UserData.UserNew.InputType'',
+	    ''UserData.UserNew.OutputType''
+    );
+
+
+    -- The UserApprove operation            
+
+    foo := acs_sc_msg_type__new(
+	    ''UserData.UserApprove.InputType'',
+	    ''user_id:integer''
+	    );
+
+    foo := acs_sc_msg_type__new(
+	    ''UserData.UserApprove.OutputType'',
+	    ''''
+	    );
+ 
+    foo := acs_sc_operation__new(
+	    ''UserData'',
+	    ''UserApprove'',
+	    ''Notify that a user has been approved'',
+	    ''f'',
+	    1,
+	    ''UserData.UserApprove.InputType'',
+	    ''UserData.UserApprove.OutputType''
+    );
+
+
+    -- The UserDeapprove operation            
+
+    foo := acs_sc_msg_type__new(
+	    ''UserData.UserDeapprove.InputType'',
+	    ''user_id:integer''
+	    );
+
+    foo := acs_sc_msg_type__new(
+	    ''UserData.UserDeapprove.OutputType'',
+	    ''''
+	    );
+ 
+    foo := acs_sc_operation__new(
+	    ''UserData'',
+	    ''UserDeapprove'',
+	    ''Notify that a user has been deapproved'',
+	    ''f'',
+	    1,
+	    ''UserData.UserDeapprove.InputType'',
+	    ''UserData.UserDeapprove.OutputType''
+    );
+
+
+    -- The UserModify operation            
+
+    foo := acs_sc_msg_type__new(
+	    ''UserData.UserModify.InputType'',
+	    ''user_id:integer''
+	    );
+
+    foo := acs_sc_msg_type__new(
+	    ''UserData.UserModify.OutputType'',
+	    ''''
+	    );
+ 
+    foo := acs_sc_operation__new(
+	    ''UserData'',
+	    ''UserModify'',
+	    ''Notify that a user has been modified'',
+	    ''f'',
+	    1,
+	    ''UserData.UserModify.InputType'',
+	    ''UserData.UserModify.OutputType''
+    );
+
+
+
+    -- The UserDelete operation            
+
+    foo := acs_sc_msg_type__new(
+	    ''UserData.UserDelete.InputType'',
+	    ''user_id:integer''
+	    );
+
+    foo := acs_sc_msg_type__new(
+	    ''UserData.UserDelete.OutputType'',
+	    ''''
+	    );
+
+    foo := acs_sc_operation__new (
+	    ''UserData'',
+	    ''UserDelete'',
+	    ''Notify that a user has been deleted'',
+	    ''f'',
+	    1,
+	    ''UserData.UserDelete.InputType'',
+	    ''UserData.UserDelete.OutputType''
+    );
+
+    return 0;
+
+end;' language 'plpgsql';
+
+select inline_0();
+drop function inline_0();