--
--  Copyright (C) 2001, 2002 MIT
--
--  This file is part of dotLRN.
--
--  dotLRN is free software; you can redistribute it and/or modify it under the
--  terms of the GNU General Public License as published by the Free Software
--  Foundation; either version 2 of the License, or (at your option) any later
--  version.
--
--  dotLRN is distributed in the hope that it will be useful, but WITHOUT ANY
--  WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
--  FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more
--  details.
--


--
-- The dotLRN extension to user data notifications
-- ben@openforce.net
-- @author dan chak (chak@openforce.net)
-- $Id: user-extension-create.sql,v 1.2 2002/08/09 18:39:25 yon Exp $
--
-- 01/22/2002
--

create function inline_0()
returns integer as '
begin
        -- create the implementation
        perform acs_sc_impl__new (
                ''UserData'',
                ''dotlrn_user_extension'',
                ''dotlrn_user_extension''
        );

        -- add all the hooks

        -- UserNew
        perform acs_sc_impl_alias__new (
               ''UserData'',
               ''dotlrn_user_extension'',
               ''UserNew'',
               ''dotlrn_user_extension::user_new'',
               ''TCL''
        );

        -- UserNew
        perform acs_sc_impl_alias__new (
               ''UserData'',
               ''dotlrn_user_extension'',
               ''UserApprove'',
               ''dotlrn_user_extension::user_approve'',
               ''TCL''
        );

        -- UserNew
        perform acs_sc_impl_alias__new (
               ''UserData'',
               ''dotlrn_user_extension'',
               ''UserDeapprove'',
               ''dotlrn_user_extension::user_deapprove'',
               ''TCL''
        );

        -- UserNew
        perform acs_sc_impl_alias__new (
               ''UserData'',
               ''dotlrn_user_extension'',
               ''UserModify'',
               ''dotlrn_user_extension::user_modify'',
               ''TCL''
        );

        -- UserNew
        perform acs_sc_impl_alias__new (
               ''UserData'',
               ''dotlrn_user_extension'',
               ''UserDelete'',
               ''dotlrn_user_extension::user_delete'',
               ''TCL''
        );

        -- Add the binding
        perform acs_sc_binding__new (
            ''UserData'',
            ''dotlrn_user_extension''
        );

	return 0;
end;' language 'plpgsql';

select inline_0();
drop function inline_0();