-- -- 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.4 2013/11/01 21:08:29 gustafn Exp $ -- -- 01/22/2002 -- CREATE OR REPLACE 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();