Index: openacs-4/packages/calendar-portlet/sql/postgresql/calendar-admin-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/sql/postgresql/calendar-admin-portlet-create.sql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/calendar-portlet/sql/postgresql/calendar-admin-portlet-create.sql 9 Jul 2002 19:38:27 -0000 1.1 @@ -0,0 +1,232 @@ +-- +-- Copyright (C) 2001, 2002 OpenForce, Inc. +-- +-- 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. +-- + +-- +-- /calendar-portlet/sql/oracle/calendar-portlet-create.sql +-- + +-- Creates calendar admin portlet + +-- Copyright (C) 2001 OpenForce, Inc. +-- @author Arjun Sanyal (arjun@openforce.net) +-- @author Ben Adida (ben@openforce.net) +-- @creation-date 2002-01-19 + +-- @author dan chak (chak@mit.edu) +-- ported to postgres 2002-07-09 + +-- $Id: calendar-admin-portlet-create.sql,v 1.1 2002/07/09 19:38:27 chak Exp $ + +-- This is free software distributed under the terms of the GNU Public +-- License version 2 or higher. Full text of the license is available +-- from the GNU Project: http://www.fsf.org/copyleft/gpl.html + +create function inline_0() +returns integer as ' +declare + ds_id portal_datasources.datasource_id%TYPE; +begin + ds_id := portal_datasource__new( + ''calendar_admin_portlet'', + ''Displays the calendar_admin'' + ); + + + -- the standard 4 params + + -- shadeable_p + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''shadeable_p'', + ''t'' +); + + + -- hideable_p + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''hideable_p'', + ''t'' +); + + -- user_editable_p + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''user_editable_p'', + ''t'' +); + + -- shaded_p + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''shaded_p'', + ''f'' +); + + -- link_hideable_p + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''link_hideable_p'', + ''f'' +); + + + -- calendar_admin-specific params + + -- calendar_id must be configured + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''f'', + ''calendar_id'', + '''' +); + + + -- default_view see cal-table-create__sql + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''default_view'', + ''day'' +); + + + -- default_view see cal-table-create__sql + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''group_calendar_id'', + NULL +); + +-- XXX community calendars + return 0; +end;' language 'plpgsql'; +select inline_0(); +drop function inline_0(); + +create function inline_0() +returns integer as ' +declare + foo integer; +begin + -- create the implementation + foo := acs_sc_impl__new ( + ''portal_datasource'', + ''calendar_admin_portlet'', + ''calendar_admin_portlet'' + ); + return 0; +end;' language 'plpgsql'; +select inline_0(); +drop function inline_0(); + +create function inline_0() +returns integer as ' +declare + foo integer; +begin + + -- add all the hooks + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_admin_portlet'', + ''GetMyName'', + ''calendar_admin_portlet::get_my_name'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_admin_portlet'', + ''GetPrettyName'', + ''calendar_admin_portlet::get_pretty_name'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_admin_portlet'', + ''Link'', + ''calendar_admin_portlet::link'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_admin_portlet'', + ''AddSelfToPage'', + ''calendar_admin_portlet::add_self_to_page'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_admin_portlet'', + ''Show'', + ''calendar_admin_portlet::show'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_admin_portlet'', + ''Edit'', + ''calendar_admin_portlet::edit'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_admin_portlet'', + ''RemoveSelfFromPage'', + ''calendar_admin_portlet::remove_self_from_page'', + ''TCL'' + ); + return 0; +end;' language 'plpgsql'; +select inline_0(); +drop function inline_0(); + +create function inline_0() +returns integer as ' +declare + foo integer; +begin + + -- Add the binding + perform acs_sc_binding__new ( + ''portal_datasource'', + ''calendar_admin_portlet'' + ); + return 0; +end;' language 'plpgsql'; +select inline_0(); +drop function inline_0(); + Index: openacs-4/packages/calendar-portlet/sql/postgresql/calendar-full-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/sql/postgresql/calendar-full-portlet-create.sql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/calendar-portlet/sql/postgresql/calendar-full-portlet-create.sql 9 Jul 2002 19:38:27 -0000 1.1 @@ -0,0 +1,253 @@ +-- +-- Copyright (C) 2001, 2002 OpenForce, Inc. +-- +-- 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. +-- + +-- +-- /calendar-portlet/sql/oracle/calendar-full-portlet-create.sql +-- + +-- Creates calendar portlet + +-- Copyright (C) 2001 OpenForce, Inc. +-- @author Arjun Sanyal (arjun@openforce.net) +-- @author Ben Adida (ben@openforce) +-- @creation-date 2002-02-10 + +-- @author dan chak (chak@openforce.net) +-- ported to postres 2002-07-09 + +-- $Id: calendar-full-portlet-create.sql,v 1.1 2002/07/09 19:38:27 chak Exp $ + +-- This is free software distributed under the terms of the GNU Public +-- License version 2 or higher. Full text of the license is available +-- from the GNU Project: http://www.fsf.org/copyleft/gpl.html + +create function inline_0() +returns integer as ' +declare + ds_id portal_datasources.datasource_id%TYPE; +begin + ds_id := portal_datasource__new( + ''calendar_full_portlet'', + ''Displays the calendar '' + ); + + + -- the standard 4 params + + -- shadeable_p + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''shadeable_p'', + ''t'' +); + + + -- hideable_p + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''hideable_p'', + ''t'' +); + + perform portal_datasource__set_def_param( + ds_id, + ''t'', + ''f'', + ''scoped_p'', + ''t'' + ); + + -- user_editable_p + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''user_editable_p'', + ''f'' +); + + -- shaded_p + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''shaded_p'', + ''f'' +); + + -- link_hideable_p + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''link_hideable_p'', + ''t'' +); + + + -- calendar-specific params + + -- calendar_id must be configured + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''f'', + ''calendar_id'', + '''' +); + + + -- default_view see cal-table-create__sql + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''default_view'', + ''day'' +); + + + -- default_view see cal-table-create__sql + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''group_calendar_id'', + NULL +); + +-- XXX community calendars + + return 0; + +end;' language 'plpgsql'; +select inline_0(); +drop function inline_0(); + + + +create function inline_0() +returns integer as ' +declare + foo integer; +begin + -- create the implementation + foo := acs_sc_impl__new ( + ''portal_datasource'', + ''calendar_full_portlet'', + ''calendar_full_portlet'' + ); + + return 0; + +end;' language 'plpgsql'; +select inline_0(); +drop function inline_0(); + + + +create function inline_0() +returns integer as ' +declare + foo integer; +begin + + -- add all the hooks + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_full_portlet'', + ''GetMyName'', + ''calendar_full_portlet::get_my_name'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_full_portlet'', + ''GetPrettyName'', + ''calendar_full_portlet::get_pretty_name'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_full_portlet'', + ''Link'', + ''calendar_full_portlet::link'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_full_portlet'', + ''AddSelfToPage'', + ''calendar_full_portlet::add_self_to_page'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_full_portlet'', + ''Show'', + ''calendar_full_portlet::show'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_full_portlet'', + ''Edit'', + ''calendar_full_portlet::edit'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_full_portlet'', + ''RemoveSelfFromPage'', + ''calendar_full_portlet::remove_self_from_page'', + ''TCL'' + ); + + return 0; + +end;' language 'plpgsql'; +select inline_0(); +drop function inline_0(); + + + +create function inline_0() +returns integer as ' +declare + foo integer; +begin + + -- Add the binding + perform acs_sc_binding__new ( + ''portal_datasource'', + ''calendar_full_portlet'' + ); + + return 0; + +end;' language 'plpgsql'; +select inline_0(); +drop function inline_0(); Index: openacs-4/packages/calendar-portlet/sql/postgresql/calendar-list-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/sql/postgresql/calendar-list-portlet-create.sql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/calendar-portlet/sql/postgresql/calendar-list-portlet-create.sql 9 Jul 2002 19:38:27 -0000 1.1 @@ -0,0 +1,232 @@ +-- +-- Copyright (C) 2001, 2002 OpenForce, Inc. +-- +-- 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. +-- + +-- +-- /calendar-portlet/sql/oracle/calendar-full-portlet-create.sql +-- + +-- Creates calendar portlet + +-- Copyright (C) 2001 OpenForce, Inc. +-- @author Arjun Sanyal (arjun@openforce.net) +-- @author Ben Adida (ben@openforce) +-- @creation-date 2002-02-10 + +-- $Id: calendar-list-portlet-create.sql,v 1.1 2002/07/09 19:38:27 chak Exp $ + +create function inline_0() +returns integer as ' +declare + ds_id portal_datasources.datasource_id%TYPE; +begin + ds_id := portal_datasource__new( + ''calendar_list_portlet'', + ''Displays the calendar list as a schedule'' + ); + + + -- the standard 4 params + + -- shadeable_p + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''shadeable_p'', + ''t'' +); + + + -- hideable_p + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''hideable_p'', + ''t'' +); + + perform portal_datasource__set_def_param( + ds_id, + ''t'', + ''f'', + ''scoped_p'', + ''t'' + ); + + -- user_editable_p + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''user_editable_p'', + ''f'' +); + + -- shaded_p + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''shaded_p'', + ''f'' +); + + -- link_hideable_p + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''link_hideable_p'', + ''t'' +); + + + -- calendar-specific params + + -- calendar_id must be configured + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''f'', + ''calendar_id'', + '''' +); + + + -- default_view see cal-table-create__sql + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''default_view'', + ''day'' +); + + +-- XXX community calendars + + return 0; + +end;' language 'plpgsql'; +select inline_0(); +drop function inline_0(); + +create function inline_0() +returns integer as ' +declare + foo integer; +begin + -- create the implementation + foo := acs_sc_impl__new ( + ''portal_datasource'', + ''calendar_list_portlet'', + ''calendar_list_portlet'' + ); + + return 0; + +end;' language 'plpgsql'; +select inline_0(); +drop function inline_0(); + +create function inline_0() +returns integer as ' +declare + foo integer; +begin + + -- add all the hooks + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_list_portlet'', + ''GetMyName'', + ''calendar_list_portlet::get_my_name'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_list_portlet'', + ''GetPrettyName'', + ''calendar_list_portlet::get_pretty_name'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_list_portlet'', + ''Link'', + ''calendar_list_portlet::link'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_list_portlet'', + ''AddSelfToPage'', + ''calendar_list_portlet::add_self_to_page'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_list_portlet'', + ''Show'', + ''calendar_list_portlet::show'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_list_portlet'', + ''Edit'', + ''calendar_list_portlet::edit'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_list_portlet'', + ''RemoveSelfFromPage'', + ''calendar_list_portlet::remove_self_from_page'', + ''TCL'' + ); + + return 0; + +end;' language 'plpgsql'; +select inline_0(); +drop function inline_0(); + +create function inline_0() +returns integer as ' +declare + foo integer; +begin + + -- Add the binding + perform acs_sc_binding__new ( + ''portal_datasource'', + ''calendar_list_portlet'' + + ); + + return 0; + +end;' language 'plpgsql'; +select inline_0(); +drop function inline_0(); Index: openacs-4/packages/calendar-portlet/sql/postgresql/calendar-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/sql/postgresql/calendar-portlet-create.sql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/calendar-portlet/sql/postgresql/calendar-portlet-create.sql 9 Jul 2002 19:38:27 -0000 1.1 @@ -0,0 +1,288 @@ +-- +-- Copyright (C) 2001, 2002 OpenForce, Inc. +-- +-- 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. +-- + +-- +-- /calendar-portlet/sql/oracle/calendar-portlet-create.sql +-- + +-- Creates calendar portlet + +-- Copyright (C) 2001 OpenForce, Inc. +-- @author Arjun Sanyal (arjun@openforce.net) +-- @creation-date 2001-26-10 + +-- @author dan chak (chak@mit.edu) +-- ported to postgres 2002-07-09 + +-- $Id: calendar-portlet-create.sql,v 1.1 2002/07/09 19:38:27 chak Exp $ + +-- This is free software distributed under the terms of the GNU Public +-- License version 2 or higher. Full text of the license is available +-- from the GNU Project: http://www.fsf.org/copyleft/gpl.html + +create function inline_0() +returns integer as ' +declare + ds_id portal_datasources.datasource_id%TYPE; +begin + ds_id := portal_datasource__new( + ''calendar_portlet'', + ''Displays the calendar '' + ); + + + -- the standard 4 params + + -- shadeable_p + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''shadeable_p'', + ''t'' +); + + + -- hideable_p + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''hideable_p'', + ''t'' +); + + -- user_editable_p + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''user_editable_p'', + ''t'' +); + + -- shaded_p + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''shaded_p'', + ''f'' +); + + -- link_hideable_p + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''link_hideable_p'', + ''t'' +); + + + perform portal_datasource__set_def_param( + ds_id, + ''t'', + ''f'', + ''scoped_p'', + ''t'' + ); + + + -- calendar-specific params + + -- calendar_id must be configured + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''f'', + ''calendar_id'', + '''' +); + + + -- default_view see cal-table-create__sql + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''default_view'', + ''day'' +); + + + -- default_view see cal-table-create__sql + perform portal_datasource__set_def_param ( + ds_id, + ''t'', + ''t'', + ''group_calendar_id'', + NULL +); + +-- XXX community calendars + + return 0; + +end;' language 'plpgsql'; +select inline_0(); +drop function inline_0(); + + +create function inline_0() +returns integer as ' +declare + foo integer; +begin + -- create the implementation + foo := acs_sc_impl__new ( + ''portal_datasource'', + ''calendar_portlet'', + ''calendar_portlet'' + ); + + return 0; + +end;' language 'plpgsql'; +select inline_0(); +drop function inline_0(); + + + +create function inline_0() +returns integer as ' +declare + foo integer; +begin + + -- add all the hooks + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_portlet'', + ''GetMyName'', + ''calendar_portlet::get_my_name'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_portlet'', + ''GetPrettyName'', + ''calendar_portlet::get_pretty_name'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_portlet'', + ''Link'', + ''calendar_portlet::link'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_portlet'', + ''AddSelfToPage'', + ''calendar_portlet::add_self_to_page'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_portlet'', + ''Show'', + ''calendar_portlet::show'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_portlet'', + ''Edit'', + ''calendar_portlet::edit'', + ''TCL'' + ); + + foo := acs_sc_impl_alias__new ( + ''portal_datasource'', + ''calendar_portlet'', + ''RemoveSelfFromPage'', + ''calendar_portlet::remove_self_from_page'', + ''TCL'' + ); + + return 0; + +end;' language 'plpgsql'; +select inline_0(); +drop function inline_0(); + + + +create function inline_0() +returns integer as ' +declare + foo integer; +begin + + -- Add the binding + perform acs_sc_binding__new ( + ''portal_datasource'', + ''calendar_portlet'' + ); + + return 0; + +end;' language 'plpgsql'; +select inline_0(); +drop function inline_0(); + + + +create table hours_of_the_day ( + hour integer not null +); + +insert into hours_of_the_day values (0); +insert into hours_of_the_day values (1); +insert into hours_of_the_day values (2); +insert into hours_of_the_day values (3); +insert into hours_of_the_day values (4); +insert into hours_of_the_day values (5); +insert into hours_of_the_day values (6); +insert into hours_of_the_day values (7); +insert into hours_of_the_day values (8); +insert into hours_of_the_day values (9); +insert into hours_of_the_day values (10); +insert into hours_of_the_day values (11); +insert into hours_of_the_day values (12); +insert into hours_of_the_day values (13); +insert into hours_of_the_day values (14); +insert into hours_of_the_day values (15); +insert into hours_of_the_day values (16); +insert into hours_of_the_day values (17); +insert into hours_of_the_day values (18); +insert into hours_of_the_day values (19); +insert into hours_of_the_day values (20); +insert into hours_of_the_day values (21); +insert into hours_of_the_day values (22); +insert into hours_of_the_day values (23); + + +\i calendar-full-portlet-create.sql +\i calendar-admin-portlet-create.sql +\i calendar-list-portlet-create.sql Index: openacs-4/packages/calendar-portlet/sql/postgresql/calendar-portlet-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/sql/postgresql/calendar-portlet-drop.sql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/calendar-portlet/sql/postgresql/calendar-portlet-drop.sql 9 Jul 2002 19:38:27 -0000 1.1 @@ -0,0 +1,130 @@ +-- +-- Copyright (C) 2001, 2002 OpenForce, Inc. +-- +-- 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. +-- + +-- +-- /calendar-portlet/sql/oracle/calendar-portlet-drop.sql +-- + +-- Drops calendar portlet + +-- Copyright (C) 2001 Openforce, Inc. +-- @author Arjun Sanyal (arjun@openforce.net) +-- @creation-date 2001-30-09 + +-- @author dan chak (chak@openforce.net) +-- ported to postgres 2002-07-09 + +-- $Id: calendar-portlet-drop.sql,v 1.1 2002/07/09 19:38:27 chak Exp $ + +-- This is free software distributed under the terms of the GNU Public +-- License version 2 or higher. Full text of the license is available +-- from the GNU Project: http://www.fsf.org/copyleft/gpl.html + +create function inline_0() +returns integer as ' +declare + ds_id portal_datasources.datasource_id%TYPE; +begin + +-- begin + select datasource_id into ds_id + from portal_datasources + where name = ''calendar-portlet''; +-- exception when no_data_found then +-- ds_id := null; +-- end; + + if ds_id is not null then + portal_datasource__delete(ds_id); + end if; + + return 0; + +end;' language 'plpgsql'; +select inline_0(); +drop function inline_0(); + + +create function inline_0() +returns integer as ' +declare + foo integer; +begin + + -- drop the hooks + foo := acs_sc_impl_alias__delete ( + ''portal_datasource'', + ''calendar_portlet'', + ''GetMyName'' + ); + + foo := acs_sc_impl_alias__delete ( + ''portal_datasource'', + ''calendar_portlet'', + ''GetPrettyName'' + ); + + + foo := acs_sc_impl_alias__delete ( + ''portal_datasource'', + ''calendar_portlet'', + ''Link'' + ); + + foo := acs_sc_impl_alias__delete ( + ''portal_datasource'', + ''calendar_portlet'', + ''AddSelfToPage'' + ); + + foo := acs_sc_impl_alias__delete ( + ''portal_datasource'', + ''calendar_portlet'', + ''Show'' + ); + + foo := acs_sc_impl_alias__delete ( + ''portal_datasource'', + ''calendar_portlet'', + ''Edit'' + ); + + foo := acs_sc_impl_alias__delete ( + ''portal_datasource'', + ''calendar_portlet'', + ''RemoveSelfFromPage'' + ); + + -- Drop the binding + perform acs_sc_binding__delete ( + ''portal_datasource'', + ''calendar_portlet'' + ); + + -- drop the impl + foo := acs_sc_impl__delete ( + ''portal_datasource'', + ''calendar_portlet'' + ); + + return 0; + +end;' language 'plpgsql'; +select inline_0(); +drop function inline_0(); + +drop table hours_of_the_day; +