Index: openacs-4/packages/static-portlet/sql/postgresql/static-portlet.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/static-portlet/sql/postgresql/static-portlet.sql,v diff -u -r1.2 -r1.2.22.1 --- openacs-4/packages/static-portlet/sql/postgresql/static-portlet.sql 9 Aug 2002 18:39:33 -0000 1.2 +++ openacs-4/packages/static-portlet/sql/postgresql/static-portlet.sql 19 Aug 2014 17:11:31 -0000 1.2.22.1 @@ -33,61 +33,67 @@ -- -create function inline_0() -returns integer as ' -declare + + +-- +-- procedure inline_0/0 +-- +CREATE OR REPLACE FUNCTION inline_0( + +) RETURNS integer AS $$ +DECLARE ds_id portal_datasources.datasource_id%TYPE; -begin +BEGIN ds_id := portal_datasource__new( - ''static_portlet'', -- name - ''Displays static data portlet'' -- description + 'static_portlet', -- name + 'Displays static data portlet' -- description ); -- 4 defaults procs -- shadeable_p perform portal_datasource__set_def_param ( ds_id, -- datasource_id - ''t'', -- config_required_p - ''t'', -- configured_p - ''shadeable_p'', -- key - ''t'' -- value + 't', -- config_required_p + 't', -- configured_p + 'shadeable_p', -- key + 't' -- value ); -- shaded_p perform portal_datasource__set_def_param ( ds_id, - ''t'', - ''t'', - ''shaded_p'', - ''f'' + 't', + 't', + 'shaded_p', + 'f' ); -- hideable_p perform portal_datasource__set_def_param ( ds_id, - ''t'', - ''t'', - ''hideable_p'', - ''t'' + 't', + 't', + 'hideable_p', + 't' ); -- user_editable_p perform portal_datasource__set_def_param ( ds_id, - ''t'', - ''t'', - ''user_editable_p'', - ''f'' + 't', + 't', + 'user_editable_p', + 'f' ); -- link_hideable_p perform portal_datasource__set_def_param ( ds_id, - ''t'', - ''t'', - ''link_hideable_p'', - ''t'' + 't', + 't', + 'link_hideable_p', + 't' ); @@ -96,105 +102,106 @@ -- package_id must be configured perform portal_datasource__set_def_param ( ds_id, - ''t'', - ''f'', - ''package_id'', - '''' + 't', + 'f', + 'package_id', + '' ); perform portal_datasource__set_def_param ( ds_id, - ''t'', - ''f'', - ''content_id'', - '''' + 't', + 'f', + 'content_id', + '' ); return 0; -end;' language 'plpgsql'; +END; +$$ LANGUAGE plpgsql; select inline_0(); drop function inline_0(); -create function inline_1() -returns integer as ' -begin +CREATE OR REPLACE FUNCTION inline_1() RETURNS integer AS $$ +BEGIN -- create the implementation perform acs_sc_impl__new ( - ''portal_datasource'', - ''static_portlet'', - ''static_portlet'' + 'portal_datasource', + 'static_portlet', + 'static_portlet' ); -- add all the hooks perform acs_sc_impl_alias__new ( - ''portal_datasource'', - ''static_portlet'', - ''GetMyName'', - ''static_portlet::get_my_name'', - ''TCL'' + 'portal_datasource', + 'static_portlet', + 'GetMyName', + 'static_portlet::get_my_name', + 'TCL' ); perform acs_sc_impl_alias__new ( - ''portal_datasource'', - ''static_portlet'', - ''GetPrettyName'', - ''static_portlet::get_pretty_name'', - ''TCL'' + 'portal_datasource', + 'static_portlet', + 'GetPrettyName', + 'static_portlet::get_pretty_name', + 'TCL' ); perform acs_sc_impl_alias__new ( - ''portal_datasource'', - ''static_portlet'', - ''Link'', - ''static_portlet::link'', - ''TCL'' + 'portal_datasource', + 'static_portlet', + 'Link', + 'static_portlet::link', + 'TCL' ); perform acs_sc_impl_alias__new ( - ''portal_datasource'', - ''static_portlet'', - ''AddSelfToPage'', - ''static_portlet::add_self_to_page'', - ''TCL'' + 'portal_datasource', + 'static_portlet', + 'AddSelfToPage', + 'static_portlet::add_self_to_page', + 'TCL' ); perform acs_sc_impl_alias__new ( - ''portal_datasource'', - ''static_portlet'', - ''Show'', - ''static_portlet::show'', - ''TCL'' + 'portal_datasource', + 'static_portlet', + 'Show', + 'static_portlet::show', + 'TCL' ); perform acs_sc_impl_alias__new ( - ''portal_datasource'', - ''static_portlet'', - ''Edit'', - ''static_portlet::edit'', - ''TCL'' + 'portal_datasource', + 'static_portlet', + 'Edit', + 'static_portlet::edit', + 'TCL' ); perform acs_sc_impl_alias__new ( - ''portal_datasource'', - ''static_portlet'', - ''RemoveSelfFromPage'', - ''static_portlet::remove_self_from_page'', - ''TCL'' + 'portal_datasource', + 'static_portlet', + 'RemoveSelfFromPage', + 'static_portlet::remove_self_from_page', + 'TCL' ); -- Add the binding perform acs_sc_binding__new ( - ''portal_datasource'', -- contract_name - ''static_portlet'' -- impl_name + 'portal_datasource', -- contract_name + 'static_portlet' -- impl_name ); return 0; -end;' language 'plpgsql'; +END; +$$ LANGUAGE plpgsql; select inline_1();