Index: openacs-4/packages/bboard-portlet/bboard-portlet.info =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bboard-portlet/bboard-portlet.info,v diff -u -r1.4 -r1.5 --- openacs-4/packages/bboard-portlet/bboard-portlet.info 15 Nov 2001 20:32:31 -0000 1.4 +++ openacs-4/packages/bboard-portlet/bboard-portlet.info 17 Nov 2001 21:55:05 -0000 1.5 @@ -10,6 +10,7 @@ oracle + postgresql url="mailto:arjun@openforce.net">Arjun Sanyal Creates bboard datasources for portal. @@ -22,8 +23,6 @@ - - Fisheye: Tag 1.2 refers to a dead (removed) revision in file `openacs-4/packages/bboard-portlet/dotlrn-portlet.info'. Fisheye: No comparison available. Pass `N' to diff? Index: openacs-4/packages/bboard-portlet/sql/oracle/bboard-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bboard-portlet/sql/oracle/bboard-portlet-create.sql,v diff -u -r1.11 -r1.12 --- openacs-4/packages/bboard-portlet/sql/oracle/bboard-portlet-create.sql 17 Nov 2001 17:34:32 -0000 1.11 +++ openacs-4/packages/bboard-portlet/sql/oracle/bboard-portlet-create.sql 17 Nov 2001 21:51:52 -0000 1.12 @@ -21,17 +21,10 @@ begin ds_id := portal_datasource.new( name => 'bboard_portlet', - description => 'Displays the bboard for a given instance_id ' + description => 'Displays the bboard' ); - -- Instance_id must be configured - portal_datasource.set_def_param ( - datasource_id => ds_id, - config_required_p => 't', - configured_p => 'f', - key => 'instance_id', - value => '' -); + -- 4 defaults procs -- shadeable_p portal_datasource.set_def_param ( @@ -69,7 +62,18 @@ value => 'f' ); + -- bboard-specific procs + -- Instance_id must be configured + portal_datasource.set_def_param ( + datasource_id => ds_id, + config_required_p => 't', + configured_p => 'f', + key => 'instance_id', + value => '' +); + + end; / show errors Index: openacs-4/packages/bboard-portlet/sql/oracle/bboard-portlet-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bboard-portlet/sql/oracle/bboard-portlet-drop.sql,v diff -u -r1.1 -r1.2 --- openacs-4/packages/bboard-portlet/sql/oracle/bboard-portlet-drop.sql 4 Oct 2001 17:15:32 -0000 1.1 +++ openacs-4/packages/bboard-portlet/sql/oracle/bboard-portlet-drop.sql 17 Nov 2001 21:52:22 -0000 1.2 @@ -34,3 +34,81 @@ / show errors; + + +declare + foo integer; +begin + + -- add all the hooks + foo := acs_sc_impl.delete_alias ( + 'portal_datasource', + 'bboard_portlet', + 'MyName' + ); + + foo := acs_sc_impl.delete_alias ( + 'portal_datasource', + 'bboard_portlet', + 'GetPrettyName' + ); + + + foo := acs_sc_impl.delete_alias ( + 'portal_datasource', + 'bboard_portlet', + 'Link' + ); + + foo := acs_sc_impl.delete_alias ( + 'portal_datasource', + 'bboard_portlet', + 'AddSelfToPage' + ); + + foo := acs_sc_impl.delete_alias ( + 'portal_datasource', + 'bboard_portlet', + 'Show' + ); + + foo := acs_sc_impl.delete_alias ( + 'portal_datasource', + 'bboard_portlet', + 'Edit' + ); + + foo := acs_sc_impl.delete_alias ( + 'portal_datasource', + 'bboard_portlet', + 'RemoveSelfFromPage' + ); + + foo := acs_sc_impl.delete_alias ( + 'portal_datasource', + 'bboard_portlet', + 'MakeSelfAvailable' + ); + + foo := acs_sc_impl.delete_alias ( + 'portal_datasource', + 'bboard_portlet', + 'MakeSelfUnavailable' + ); + + -- Drop the binding + acs_sc_binding.delete ( + contract_name => 'portal_datasource', + impl_name => 'bboard_portlet' + ); + + -- drop the impl + foo := acs_sc_impl.delete ( + 'portal_datasource', + 'bboard_portlet' + ); +end; +/ +show errors + + Index: openacs-4/packages/faq-portlet/sql/oracle/faq-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/faq-portlet/sql/oracle/faq-portlet-create.sql,v diff -u -r1.5 -r1.6 --- openacs-4/packages/faq-portlet/sql/oracle/faq-portlet-create.sql 14 Nov 2001 21:59:37 -0000 1.5 +++ openacs-4/packages/faq-portlet/sql/oracle/faq-portlet-create.sql 17 Nov 2001 21:56:07 -0000 1.6 @@ -19,21 +19,39 @@ begin ds_id := portal_datasource.new( name => 'faq-portlet', - link => 'faq', - description => 'Displays the given folder_id ', - content => 'faq_portlet::show', - configurable_p => 't' + description => 'Displays the given folder_id' ); - -- package_id must be configured + -- the standard 4 params + + -- shadeable_p portal_datasource.set_def_param ( datasource_id => ds_id, config_required_p => 't', - configured_p => 'f', - key => 'package_id', - value => '' -); + configured_p => 't', + key => 'shadeable_p', + value => 't' +); + + -- hideable_p + portal_datasource.set_def_param ( + datasource_id => ds_id, + config_required_p => 't', + configured_p => 't', + key => 'hideable_p', + value => 't' +); + + -- user_editable_p + portal_datasource.set_def_param ( + datasource_id => ds_id, + config_required_p => 't', + configured_p => 't', + key => 'user_editable_p', + value => 'f' +); + -- shaded_p portal_datasource.set_def_param ( datasource_id => ds_id, @@ -43,7 +61,126 @@ value => 'f' ); + -- package_id must be configured + portal_datasource.set_def_param ( + datasource_id => ds_id, + config_required_p => 't', + configured_p => 'f', + key => 'package_id', + value => '' +); + + end; / show errors + +declare + foo integer; +begin + -- create the implementation + foo := acs_sc_impl.new ( + 'portal_datasource', + 'faq_portlet', + 'faq_portlet' + ); + +end; +/ +show errors + +declare + foo integer; +begin + + -- add all the hooks + foo := acs_sc_impl.new_alias ( + 'portal_datasource', + 'faq_portlet', + 'MyName', + 'faq_portlet::my_name', + 'TCL' + ); + + foo := acs_sc_impl.new_alias ( + 'portal_datasource', + 'faq_portlet', + 'GetPrettyName', + 'faq_portlet::get_pretty_name', + 'TCL' + ); + + foo := acs_sc_impl.new_alias ( + 'portal_datasource', + 'faq_portlet', + 'Link', + 'faq_portlet::link', + 'TCL' + ); + + foo := acs_sc_impl.new_alias ( + 'portal_datasource', + 'faq_portlet', + 'AddSelfToPage', + 'faq_portlet::add_self_to_page', + 'TCL' + ); + + foo := acs_sc_impl.new_alias ( + 'portal_datasource', + 'faq_portlet', + 'Show', + 'faq_portlet::show', + 'TCL' + ); + + foo := acs_sc_impl.new_alias ( + 'portal_datasource', + 'faq_portlet', + 'Edit', + 'faq_portlet::edit', + 'TCL' + ); + + foo := acs_sc_impl.new_alias ( + 'portal_datasource', + 'faq_portlet', + 'RemoveSelfFromPage', + 'faq_portlet::remove_self_from_page', + 'TCL' + ); + + foo := acs_sc_impl.new_alias ( + 'portal_datasource', + 'faq_portlet', + 'MakeSelfAvailable', + 'faq_portlet::make_self_available', + 'TCL' + ); + + foo := acs_sc_impl.new_alias ( + 'portal_datasource', + 'faq_portlet', + 'MakeSelfUnavailable', + 'faq_portlet::make_self_unavailable', + 'TCL' + ); + +end; +/ +show errors + +declare + foo integer; +begin + + -- Add the binding + acs_sc_binding.new ( + contract_name => 'portal_datasource', + impl_name => 'faq_portlet' + ); +end; +/ +show errors +