Index: openacs-4/packages/bm-portlet/sql/postgresql/bm-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bm-portlet/sql/postgresql/bm-portlet-create.sql,v diff -u -N -r1.2 -r1.2.22.1 --- openacs-4/packages/bm-portlet/sql/postgresql/bm-portlet-create.sql 9 Aug 2002 18:39:30 -0000 1.2 +++ openacs-4/packages/bm-portlet/sql/postgresql/bm-portlet-create.sql 18 Aug 2014 20:49:33 -0000 1.2.22.1 @@ -27,76 +27,83 @@ -- -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( - ''bm_portlet'', - ''Displays spam info for the given package'' + 'bm_portlet', + 'Displays spam info for the given package' ); 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 ); perform portal_datasource__set_def_param( ds_id, - ''t'', - ''t'', - ''hideable_p'', - ''t'' + 't', + 't', + 'hideable_p', + 't' ); perform portal_datasource__set_def_param( ds_id, - ''t'', - ''t'', - ''user_editable_p'', - ''f'' + 't', + 't', + 'user_editable_p', + 'f' ); perform portal_datasource__set_def_param( ds_id, - ''t'', - ''t'', - ''shaded_p'', - ''f'' + 't', + 't', + 'shaded_p', + 'f' ); perform portal_datasource__set_def_param( ds_id, - ''t'', - ''t'', - ''link_hideable_p'', - ''t'' + 't', + 't', + 'link_hideable_p', + 't' ); 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'', - ''scoped_p'', - ''t'' + 't', + 'f', + 'scoped_p', + 't' ); return 0; -end; ' language 'plpgsql'; +END; +$$ LANGUAGE plpgsql; select inline_0 (); Index: openacs-4/packages/bm-portlet/sql/postgresql/bm-portlet-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bm-portlet/sql/postgresql/bm-portlet-drop.sql,v diff -u -N -r1.2 -r1.2.22.1 --- openacs-4/packages/bm-portlet/sql/postgresql/bm-portlet-drop.sql 9 Aug 2002 18:39:30 -0000 1.2 +++ openacs-4/packages/bm-portlet/sql/postgresql/bm-portlet-drop.sql 18 Aug 2014 20:49:33 -0000 1.2.22.1 @@ -26,18 +26,24 @@ -- 11th July 2002 -- -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 select datasource_id into ds_id from portal_datasources - where name = ''bm_portlet''; + where name = 'bm_portlet'; if not found then - raise notice ''No datasource_id found here '', ds_id ; + raise notice 'No datasource_id found here ', ds_id ; ds_id := null; end if; @@ -48,7 +54,8 @@ return 0; -end;' language 'plpgsql'; +END; +$$ LANGUAGE plpgsql; select inline_0 ();