Index: openacs-4/packages/bm-portlet/sql/oracle/bm-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bm-portlet/sql/oracle/bm-portlet-create.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/bm-portlet/sql/oracle/bm-portlet-create.sql 17 Sep 2003 14:48:17 -0000 1.3 +++ openacs-4/packages/bm-portlet/sql/oracle/bm-portlet-create.sql 30 Sep 2003 13:11:39 -0000 1.4 @@ -92,6 +92,7 @@ foo := acs_sc_impl.new( impl_contract_name => 'portal_datasource', impl_name => 'bm_portlet', + impl_pretty_name => 'Bulk mail portlet', impl_owner_name => 'bm_portlet' ); Index: openacs-4/packages/bm-portlet/sql/oracle/bm-portlet-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bm-portlet/sql/oracle/bm-portlet-drop.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/bm-portlet/sql/oracle/bm-portlet-drop.sql 9 Aug 2002 18:39:30 -0000 1.2 +++ openacs-4/packages/bm-portlet/sql/oracle/bm-portlet-drop.sql 30 Sep 2003 13:11:39 -0000 1.3 @@ -36,7 +36,7 @@ end; if ds_id is not null then - portal_datasource.delete(ds_id); + portal_datasource.del(ds_id); end if; foo := acs_sc_impl.delete_alias ( @@ -81,12 +81,12 @@ 'RemoveSelfFromPage' ); - acs_sc_binding.delete ( + acs_sc_binding.del ( contract_name => 'portal_datasource', impl_name => 'bm_portlet' ); - acs_sc_impl.delete ( + acs_sc_impl.del ( 'portal_datasource', 'bm_portlet' ); Index: openacs-4/packages/calendar-portlet/sql/oracle/calendar-admin-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/sql/oracle/calendar-admin-portlet-create.sql,v diff -u -r1.5 -r1.6 --- openacs-4/packages/calendar-portlet/sql/oracle/calendar-admin-portlet-create.sql 17 Sep 2003 13:59:12 -0000 1.5 +++ openacs-4/packages/calendar-portlet/sql/oracle/calendar-admin-portlet-create.sql 30 Sep 2003 13:11:39 -0000 1.6 @@ -133,6 +133,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'portal_datasource', impl_name => 'calendar_admin_portlet', + impl_pretty_name => 'Calendar admin portlet', impl_owner_name => 'calendar_admin_portlet' ); Index: openacs-4/packages/calendar-portlet/sql/oracle/calendar-full-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/sql/oracle/calendar-full-portlet-create.sql,v diff -u -r1.6 -r1.7 --- openacs-4/packages/calendar-portlet/sql/oracle/calendar-full-portlet-create.sql 17 Sep 2003 13:59:12 -0000 1.6 +++ openacs-4/packages/calendar-portlet/sql/oracle/calendar-full-portlet-create.sql 30 Sep 2003 13:11:39 -0000 1.7 @@ -141,6 +141,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'portal_datasource', impl_name => 'calendar_full_portlet', + impl_pretty_name => 'Calendar Full portlet', impl_owner_name => 'calendar_full_portlet' ); Index: openacs-4/packages/calendar-portlet/sql/oracle/calendar-list-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/sql/oracle/calendar-list-portlet-create.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/calendar-portlet/sql/oracle/calendar-list-portlet-create.sql 17 Sep 2003 13:59:12 -0000 1.3 +++ openacs-4/packages/calendar-portlet/sql/oracle/calendar-list-portlet-create.sql 30 Sep 2003 13:11:39 -0000 1.4 @@ -128,6 +128,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'portal_datasource', impl_name => 'calendar_list_portlet', + impl_pretty_name => 'Calendar List POrtlet', impl_owner_name => 'calendar_list_portlet' ); Index: openacs-4/packages/calendar-portlet/sql/oracle/calendar-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/sql/oracle/calendar-portlet-create.sql,v diff -u -r1.21 -r1.22 --- openacs-4/packages/calendar-portlet/sql/oracle/calendar-portlet-create.sql 17 Sep 2003 13:59:12 -0000 1.21 +++ openacs-4/packages/calendar-portlet/sql/oracle/calendar-portlet-create.sql 30 Sep 2003 13:11:39 -0000 1.22 @@ -141,6 +141,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'portal_datasource', impl_name => 'calendar_portlet', + impl_pretty_name => 'Calendar Portlet', impl_owner_name => 'calendar_portlet' ); Index: openacs-4/packages/calendar-portlet/sql/oracle/calendar-portlet-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/sql/oracle/calendar-portlet-drop.sql,v diff -u -r1.6 -r1.7 --- openacs-4/packages/calendar-portlet/sql/oracle/calendar-portlet-drop.sql 9 Aug 2002 18:39:31 -0000 1.6 +++ openacs-4/packages/calendar-portlet/sql/oracle/calendar-portlet-drop.sql 30 Sep 2003 13:11:39 -0000 1.7 @@ -42,7 +42,7 @@ end; if ds_id is not null then - portal_datasource.delete(ds_id); + portal_datasource.del(ds_id); end if; end; @@ -98,13 +98,13 @@ ); -- Drop the binding - acs_sc_binding.delete ( + acs_sc_binding.del ( contract_name => 'portal_datasource', impl_name => 'calendar_portlet' ); -- drop the impl - foo := acs_sc_impl.delete ( + foo := acs_sc_impl.del ( 'portal_datasource', 'calendar_portlet' ); Index: openacs-4/packages/dotlrn/sql/oracle/admin-profile-provider-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/admin-profile-provider-create.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn/sql/oracle/admin-profile-provider-create.sql 9 Aug 2002 18:39:24 -0000 1.2 +++ openacs-4/packages/dotlrn/sql/oracle/admin-profile-provider-create.sql 30 Sep 2003 13:11:39 -0000 1.3 @@ -29,6 +29,7 @@ foo := acs_sc_impl.new( impl_contract_name => 'profile_provider', impl_name => 'dotlrn_admin_profile_provider', + impl_pretty_name => 'Dotlrn admin profile provider', impl_owner_name => 'dotlrn_admin_profile_provider' ); Index: openacs-4/packages/dotlrn/sql/oracle/admin-profile-provider-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/admin-profile-provider-drop.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn/sql/oracle/admin-profile-provider-drop.sql 9 Aug 2002 18:39:24 -0000 1.2 +++ openacs-4/packages/dotlrn/sql/oracle/admin-profile-provider-drop.sql 30 Sep 2003 13:11:39 -0000 1.3 @@ -27,7 +27,7 @@ -- drop the binding between this implementation and the interface it -- implements. - acs_sc_binding.delete( + acs_sc_binding.del( contract_name => 'profile_provider', impl_name => 'dotlrn_admin_profile_provider' ); @@ -56,7 +56,7 @@ ); -- drop the implementation - acs_sc_impl.delete( + acs_sc_impl.del( impl_contract_name => 'profile_provider', impl_name => 'dotlrn_admin_profile_provider' ); Index: openacs-4/packages/dotlrn/sql/oracle/admins-package-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/admins-package-create.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/dotlrn/sql/oracle/admins-package-create.sql 9 Aug 2002 18:39:24 -0000 1.3 +++ openacs-4/packages/dotlrn/sql/oracle/admins-package-create.sql 30 Sep 2003 13:11:39 -0000 1.4 @@ -35,7 +35,7 @@ creation_ip in acs_objects.creation_ip%TYPE default null ) return dotlrn_user_profile_rels.rel_id%TYPE; - procedure delete ( + procedure del ( rel_id in dotlrn_admin_profile_rels.rel_id%TYPE ); @@ -92,16 +92,16 @@ return v_rel_id; end; - procedure delete ( + procedure del ( rel_id in dotlrn_admin_profile_rels.rel_id%TYPE ) is begin delete from dotlrn_admin_profile_rels - where rel_id = dotlrn_admin_profile_rel.delete.rel_id; + where rel_id = dotlrn_admin_profile_rel.del.rel_id; - dotlrn_user_profile_rel.delete(rel_id); + dotlrn_user_profile_rel.del(rel_id); end; end; Index: openacs-4/packages/dotlrn/sql/oracle/admins-sanitize.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/admins-sanitize.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn/sql/oracle/admins-sanitize.sql 9 Aug 2002 18:39:24 -0000 1.2 +++ openacs-4/packages/dotlrn/sql/oracle/admins-sanitize.sql 30 Sep 2003 13:11:39 -0000 1.3 @@ -30,7 +30,7 @@ from rel_segments where segment_name = 'dotLRN Admins'; - rel_segment.delete( + rel_segment.del( segment_id => foo ); @@ -45,7 +45,7 @@ from dotlrn_user_types where group_id = foo; - profiled_group.delete( + profiled_group.del( group_id => foo ); Index: openacs-4/packages/dotlrn/sql/oracle/applet-sc-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/applet-sc-drop.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/dotlrn/sql/oracle/applet-sc-drop.sql 9 Aug 2002 18:39:24 -0000 1.3 +++ openacs-4/packages/dotlrn/sql/oracle/applet-sc-drop.sql 30 Sep 2003 13:11:39 -0000 1.4 @@ -24,176 +24,176 @@ declare begin - acs_sc_operation.delete( + acs_sc_operation.del( contract_name => 'dotlrn_applet', operation_name => 'GetPrettyName' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.GetPrettyName.InputType' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.GetPrettyName.OutputType' ); - acs_sc_operation.delete( + acs_sc_operation.del( contract_name => 'dotlrn_applet', operation_name => 'AddApplet' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.AddApplet.InputType' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.AddApplet.OutputType' ); - acs_sc_operation.delete( + acs_sc_operation.del( contract_name => 'dotlrn_applet', operation_name => 'RemoveApplet' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.RemoveApplet.InputType' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.RemoveApplet.OutputType' ); - acs_sc_operation.delete( + acs_sc_operation.del( contract_name => 'dotlrn_applet', operation_name => 'AddAppletToCommunity' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.AddAppletToCommunity.InputType' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.AddAppletToCommunity.OutputType' ); - acs_sc_operation.delete( + acs_sc_operation.del( contract_name => 'dotlrn_applet', operation_name => 'RemoveAppletFromCommunity' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.RemoveAppletFromCommunity.InputType' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.RemoveAppletFromCommunity.OutputType' ); - acs_sc_operation.delete( + acs_sc_operation.del( contract_name => 'dotlrn_applet', operation_name => 'AddUser' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.AddUser.InputType' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.AddUser.OutputType' ); - acs_sc_operation.delete( + acs_sc_operation.del( contract_name => 'dotlrn_applet', operation_name => 'RemoveUser' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.RemoveUser.InputType' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.RemoveUser.OutputType' ); - acs_sc_operation.delete( + acs_sc_operation.del( contract_name => 'dotlrn_applet', operation_name => 'AddUserToCommunity' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.AddUserToCommunity.InputType' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.AddUserToCommunity.OutputType' ); - acs_sc_operation.delete( + acs_sc_operation.del( contract_name => 'dotlrn_applet', operation_name => 'RemoveUserFromCommunity' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.RemoveUserFromCommunity.InputType' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.RemoveUserFromCommunity.OutputType' ); - acs_sc_operation.delete( + acs_sc_operation.del( contract_name => 'dotlrn_applet', operation_name => 'AddPortlet' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.AddPortlet.InputType' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.AddPortlet.OutputType' ); - acs_sc_operation.delete( + acs_sc_operation.del( contract_name => 'dotlrn_applet', operation_name => 'RemovePortlet' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.RemovePortlet.InputType' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.RemovePortlet.OutputType' ); - acs_sc_operation.delete( + acs_sc_operation.del( contract_name => 'dotlrn_applet', operation_name => 'Clone' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.Clone.InputType' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.Clone.OutputType' ); - acs_sc_operation.delete( + acs_sc_operation.del( contract_name => 'dotlrn_applet', operation_name => 'ChangeEventHandler' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.ChangeEventHandler.InputType' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'dotlrn_applet.ChangeEventHandler.OutputType' ); - acs_sc_contract.delete( + acs_sc_contract.del( contract_name => 'dotlrn_applet' ); Index: openacs-4/packages/dotlrn/sql/oracle/classes-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/classes-create.sql,v diff -u -r1.5 -r1.6 --- openacs-4/packages/dotlrn/sql/oracle/classes-create.sql 9 Aug 2002 18:39:24 -0000 1.5 +++ openacs-4/packages/dotlrn/sql/oracle/classes-create.sql 30 Sep 2003 13:11:39 -0000 1.6 @@ -163,7 +163,7 @@ context_id in acs_objects.context_id%TYPE default null ) return dotlrn_departments.department_key%TYPE; - procedure delete ( + procedure del ( department_key in dotlrn_departments.department_key%TYPE ); end; @@ -206,7 +206,7 @@ return v_department_key; end; - procedure delete ( + procedure del ( department_key in dotlrn_departments.department_key%TYPE ) is @@ -215,7 +215,7 @@ from dotlrn_departments where department_key = department_key; - dotlrn_community_type.delete(department_key); + dotlrn_community_type.del(department_key); end; end; / @@ -236,7 +236,7 @@ context_id in acs_objects.context_id%TYPE default null ) return dotlrn_classes.class_key%TYPE; - procedure delete ( + procedure del ( class_key in dotlrn_classes.class_key%TYPE ); end; @@ -280,7 +280,7 @@ return v_class_key; end; - procedure delete ( + procedure del ( class_key in dotlrn_classes.class_key%TYPE ) is @@ -289,7 +289,7 @@ from dotlrn_classes where class_key = class_key; - dotlrn_community_type.delete(class_key); + dotlrn_community_type.del(class_key); end; end; / @@ -314,7 +314,7 @@ context_id in acs_objects.context_id%TYPE default null ) return dotlrn_class_instances.class_instance_id%TYPE; - procedure delete ( + procedure del ( class_instance_id in dotlrn_class_instances.class_instance_id%TYPE ); end; @@ -367,7 +367,7 @@ return v_class_instance_id; end; - procedure delete ( + procedure del ( class_instance_id in dotlrn_class_instances.class_instance_id%TYPE ) is @@ -376,7 +376,7 @@ from dotlrn_class_instances where class_instance_id= class_instance_id; - dotlrn_community.delete(community_id => class_instance_id); + dotlrn_community.del(community_id => class_instance_id); end; end; / Index: openacs-4/packages/dotlrn/sql/oracle/clubs-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/clubs-create.sql,v diff -u -r1.4 -r1.5 --- openacs-4/packages/dotlrn/sql/oracle/clubs-create.sql 9 Aug 2002 18:39:24 -0000 1.4 +++ openacs-4/packages/dotlrn/sql/oracle/clubs-create.sql 30 Sep 2003 13:11:39 -0000 1.5 @@ -59,7 +59,7 @@ context_id in acs_objects.context_id%TYPE default null ) return dotlrn_clubs.club_id%TYPE; - procedure delete ( + procedure del ( club_id in dotlrn_clubs.club_id%TYPE ); end; @@ -108,16 +108,16 @@ return v_club_id; end; - procedure delete ( + procedure del ( club_id in dotlrn_clubs.club_id%TYPE ) is begin delete from dotlrn_clubs - where club_id = dotlrn_club.delete.club_id; + where club_id = dotlrn_club.del.club_id; - dotlrn_community.delete(community_id => club_id); + dotlrn_community.del(community_id => club_id); end; end; / Index: openacs-4/packages/dotlrn/sql/oracle/communities-package-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/communities-package-create.sql,v diff -u -r1.4 -r1.5 --- openacs-4/packages/dotlrn/sql/oracle/communities-package-create.sql 9 Aug 2002 18:39:24 -0000 1.4 +++ openacs-4/packages/dotlrn/sql/oracle/communities-package-create.sql 30 Sep 2003 13:11:39 -0000 1.5 @@ -29,7 +29,7 @@ context_id in acs_objects.context_id%TYPE default null ) return dotlrn_community_types.community_type%TYPE; - procedure delete ( + procedure del ( community_type in dotlrn_community_types.community_type%TYPE ); @@ -102,20 +102,20 @@ return community_type; end; - procedure delete ( + procedure del ( community_type in dotlrn_community_types.community_type%TYPE ) is begin delete from dotlrn_community_types - where community_type = dotlrn_community_type.delete.community_type; + where community_type = dotlrn_community_type.del.community_type; delete from group_types - where group_types.group_type = dotlrn_community_type.delete.community_type; + where group_types.group_type = dotlrn_community_type.del.community_type; - acs_object_type.drop_type(dotlrn_community_type.delete.community_type); + acs_object_type.drop_type(dotlrn_community_type.del.community_type); end; function name ( @@ -162,7 +162,7 @@ end_date in dotlrn_communities_all.active_end_date%TYPE ); - procedure delete ( + procedure del ( community_id in dotlrn_communities_all.community_id%TYPE ); @@ -265,16 +265,16 @@ where dotlrn_communities_all.community_id = dotlrn_community.set_active_dates.community_id; end; - procedure delete ( + procedure del ( community_id in dotlrn_communities_all.community_id%TYPE ) is begin delete from dotlrn_communities_all - where dotlrn_communities_all.community_id = dotlrn_community.delete.community_id; + where dotlrn_communities_all.community_id = dotlrn_community.del.community_id; - acs_group.delete(dotlrn_community.delete.community_id); + acs_group.del(dotlrn_community.del.community_id); end; function name ( Index: openacs-4/packages/dotlrn/sql/oracle/community-memberships-packages-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/community-memberships-packages-create.sql,v diff -u -r1.4 -r1.5 --- openacs-4/packages/dotlrn/sql/oracle/community-memberships-packages-create.sql 9 Aug 2002 18:39:24 -0000 1.4 +++ openacs-4/packages/dotlrn/sql/oracle/community-memberships-packages-create.sql 30 Sep 2003 13:11:39 -0000 1.5 @@ -35,7 +35,7 @@ creation_ip in acs_objects.creation_ip%TYPE default null ) return dotlrn_member_rels.rel_id%TYPE; - procedure delete ( + procedure del ( rel_id in dotlrn_member_rels.rel_id%TYPE ); @@ -77,16 +77,16 @@ return v_rel_id; end; - procedure delete ( + procedure del ( rel_id in dotlrn_member_rels.rel_id%TYPE ) is begin delete from dotlrn_member_rels - where rel_id = dotlrn_member_rel.delete.rel_id; + where rel_id = dotlrn_member_rel.del.rel_id; - membership_rel.delete(rel_id); + membership_rel.del(rel_id); end; end; @@ -106,7 +106,7 @@ creation_ip in acs_objects.creation_ip%TYPE default null ) return dotlrn_admin_rels.rel_id%TYPE; - procedure delete ( + procedure del ( rel_id in dotlrn_admin_rels.rel_id%TYPE ); @@ -148,16 +148,16 @@ return v_rel_id; end; - procedure delete ( + procedure del ( rel_id in dotlrn_admin_rels.rel_id%TYPE ) is begin delete from dotlrn_admin_rels - where rel_id = dotlrn_admin_rel.delete.rel_id; + where rel_id = dotlrn_admin_rel.del.rel_id; - dotlrn_member_rel.delete(rel_id); + dotlrn_member_rel.del(rel_id); end; end; @@ -177,7 +177,7 @@ creation_ip in acs_objects.creation_ip%TYPE default null ) return dotlrn_student_rels.rel_id%TYPE; - procedure delete ( + procedure del ( rel_id in dotlrn_student_rels.rel_id%TYPE ); @@ -219,16 +219,16 @@ return v_rel_id; end; - procedure delete ( + procedure del ( rel_id in dotlrn_student_rels.rel_id%TYPE ) is begin delete from dotlrn_student_rels - where rel_id = dotlrn_student_rel.delete.rel_id; + where rel_id = dotlrn_student_rel.del.rel_id; - dotlrn_member_rel.delete(rel_id); + dotlrn_member_rel.del(rel_id); end; end; @@ -248,7 +248,7 @@ creation_ip in acs_objects.creation_ip%TYPE default null ) return dotlrn_ta_rels.rel_id%TYPE; - procedure delete ( + procedure del ( rel_id in dotlrn_ta_rels.rel_id%TYPE ); @@ -290,16 +290,16 @@ return v_rel_id; end; - procedure delete ( + procedure del ( rel_id in dotlrn_ta_rels.rel_id%TYPE ) is begin delete from dotlrn_ta_rels - where rel_id = dotlrn_ta_rel.delete.rel_id; + where rel_id = dotlrn_ta_rel.del.rel_id; - dotlrn_admin_rel.delete(rel_id); + dotlrn_admin_rel.del(rel_id); end; end; @@ -319,7 +319,7 @@ creation_ip in acs_objects.creation_ip%TYPE default null ) return dotlrn_ca_rels.rel_id%TYPE; - procedure delete ( + procedure del ( rel_id in dotlrn_ca_rels.rel_id%TYPE ); @@ -361,16 +361,16 @@ return v_rel_id; end; - procedure delete ( + procedure del ( rel_id in dotlrn_ca_rels.rel_id%TYPE ) is begin delete from dotlrn_ca_rels - where rel_id = dotlrn_ca_rel.delete.rel_id; + where rel_id = dotlrn_ca_rel.del.rel_id; - dotlrn_admin_rel.delete(rel_id); + dotlrn_admin_rel.del(rel_id); end; end; @@ -390,7 +390,7 @@ creation_ip in acs_objects.creation_ip%TYPE default null ) return dotlrn_cadmin_rels.rel_id%TYPE; - procedure delete ( + procedure del ( rel_id in dotlrn_cadmin_rels.rel_id%TYPE ); @@ -432,16 +432,16 @@ return v_rel_id; end; - procedure delete ( + procedure del ( rel_id in dotlrn_cadmin_rels.rel_id%TYPE ) is begin delete from dotlrn_cadmin_rels - where rel_id = dotlrn_cadmin_rel.delete.rel_id; + where rel_id = dotlrn_cadmin_rel.del.rel_id; - dotlrn_admin_rel.delete(rel_id); + dotlrn_admin_rel.del(rel_id); end; end; @@ -461,7 +461,7 @@ creation_ip in acs_objects.creation_ip%TYPE default null ) return dotlrn_instructor_rels.rel_id%TYPE; - procedure delete ( + procedure del ( rel_id in dotlrn_instructor_rels.rel_id%TYPE ); @@ -503,16 +503,16 @@ return v_rel_id; end; - procedure delete ( + procedure del ( rel_id in dotlrn_instructor_rels.rel_id%TYPE ) is begin delete from dotlrn_instructor_rels - where rel_id = dotlrn_instructor_rel.delete.rel_id; + where rel_id = dotlrn_instructor_rel.del.rel_id; - dotlrn_admin_rel.delete(rel_id); + dotlrn_admin_rel.del(rel_id); end; end; Index: openacs-4/packages/dotlrn/sql/oracle/dotlrn-sanitize.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/dotlrn-sanitize.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn/sql/oracle/dotlrn-sanitize.sql 9 Aug 2002 18:39:24 -0000 1.2 +++ openacs-4/packages/dotlrn/sql/oracle/dotlrn-sanitize.sql 30 Sep 2003 13:11:39 -0000 1.3 @@ -130,12 +130,12 @@ ); -- drop the dotlrn_club community type - dotlrn_community_type.delete( + dotlrn_community_type.del( community_type => 'dotlrn_club' ); -- drop the dotlrn_class community type - dotlrn_community_type.delete( + dotlrn_community_type.del( community_type => 'dotlrn_class_instance' ); @@ -170,7 +170,7 @@ ); -- drop the base community type - dotlrn_community_type.delete( + dotlrn_community_type.del( community_type => 'dotlrn_community' ); Index: openacs-4/packages/dotlrn/sql/oracle/external-profile-provider-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/external-profile-provider-create.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn/sql/oracle/external-profile-provider-create.sql 9 Aug 2002 18:39:24 -0000 1.2 +++ openacs-4/packages/dotlrn/sql/oracle/external-profile-provider-create.sql 30 Sep 2003 13:11:39 -0000 1.3 @@ -29,6 +29,7 @@ foo := acs_sc_impl.new( impl_contract_name => 'profile_provider', impl_name => 'dotlrn_external_profile_provider', + impl_pretty_name => 'Dotlrn external profile provider', impl_owner_name => 'dotlrn_external_profile_provider' ); Index: openacs-4/packages/dotlrn/sql/oracle/external-profile-provider-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/external-profile-provider-drop.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn/sql/oracle/external-profile-provider-drop.sql 9 Aug 2002 18:39:24 -0000 1.2 +++ openacs-4/packages/dotlrn/sql/oracle/external-profile-provider-drop.sql 30 Sep 2003 13:11:39 -0000 1.3 @@ -27,7 +27,7 @@ -- drop the binding between this implementation and the interface it -- implements. - acs_sc_binding.delete( + acs_sc_binding.del( contract_name => 'profile_provider', impl_name => 'dotlrn_external_profile_provider' ); @@ -56,7 +56,7 @@ ); -- drop the implementation - acs_sc_impl.delete( + acs_sc_impl.del( impl_contract_name => 'profile_provider', impl_name => 'dotlrn_external_profile_provider' ); Index: openacs-4/packages/dotlrn/sql/oracle/externals-package-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/externals-package-create.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/dotlrn/sql/oracle/externals-package-create.sql 9 Aug 2002 18:39:24 -0000 1.3 +++ openacs-4/packages/dotlrn/sql/oracle/externals-package-create.sql 30 Sep 2003 13:11:39 -0000 1.4 @@ -35,7 +35,7 @@ creation_ip in acs_objects.creation_ip%TYPE default null ) return dotlrn_user_profile_rels.rel_id%TYPE; - procedure delete ( + procedure del ( rel_id in dotlrn_external_profile_rels.rel_id%TYPE ); @@ -92,16 +92,16 @@ return v_rel_id; end; - procedure delete ( + procedure del ( rel_id in dotlrn_external_profile_rels.rel_id%TYPE ) is begin delete from dotlrn_external_profile_rels - where rel_id = dotlrn_external_profile_rel.delete.rel_id; + where rel_id = dotlrn_external_profile_rel.del.rel_id; - dotlrn_user_profile_rel.delete(rel_id); + dotlrn_user_profile_rel.del(rel_id); end; end; Index: openacs-4/packages/dotlrn/sql/oracle/externals-sanitize.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/externals-sanitize.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn/sql/oracle/externals-sanitize.sql 9 Aug 2002 18:39:24 -0000 1.2 +++ openacs-4/packages/dotlrn/sql/oracle/externals-sanitize.sql 30 Sep 2003 13:11:39 -0000 1.3 @@ -30,7 +30,7 @@ from rel_segments where segment_name = 'dotLRN Externals'; - rel_segment.delete( + rel_segment.del( segment_id => foo ); @@ -45,7 +45,7 @@ from dotlrn_user_types where group_id = foo; - profiled_group.delete( + profiled_group.del( group_id => foo ); Index: openacs-4/packages/dotlrn/sql/oracle/main-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/main-portlet-create.sql,v diff -u -r1.4 -r1.5 --- openacs-4/packages/dotlrn/sql/oracle/main-portlet-create.sql 9 Aug 2002 18:39:24 -0000 1.4 +++ openacs-4/packages/dotlrn/sql/oracle/main-portlet-create.sql 30 Sep 2003 13:11:39 -0000 1.5 @@ -89,6 +89,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'portal_datasource', impl_name => 'dotlrn_main_portlet', + impl_pretty_name => 'Dotlrn main portlet', impl_owner_name => 'dotlrn_main_portlet' ); Index: openacs-4/packages/dotlrn/sql/oracle/main-portlet-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/main-portlet-drop.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/dotlrn/sql/oracle/main-portlet-drop.sql 9 Aug 2002 18:39:24 -0000 1.3 +++ openacs-4/packages/dotlrn/sql/oracle/main-portlet-drop.sql 30 Sep 2003 13:11:39 -0000 1.4 @@ -31,7 +31,7 @@ foo integer; begin - acs_sc_binding.delete( + acs_sc_binding.del( contract_name => 'portal_datasource', impl_name => 'dotlrn_main_portlet' ); @@ -78,7 +78,7 @@ impl_operation_name => 'Edit' ); - acs_sc_impl.delete( + acs_sc_impl.del( impl_contract_name => 'portal_datasource', impl_name => 'dotlrn_main_portlet' ); @@ -92,7 +92,7 @@ end; if ds_id is not null then - portal_datasource.delete(ds_id); + portal_datasource.del(ds_id); end if; end; Index: openacs-4/packages/dotlrn/sql/oracle/professor-profile-provider-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/professor-profile-provider-create.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn/sql/oracle/professor-profile-provider-create.sql 9 Aug 2002 18:39:24 -0000 1.2 +++ openacs-4/packages/dotlrn/sql/oracle/professor-profile-provider-create.sql 30 Sep 2003 13:11:39 -0000 1.3 @@ -29,6 +29,7 @@ foo := acs_sc_impl.new( impl_contract_name => 'profile_provider', impl_name => 'dotlrn_professor_profile_provider', + impl_pretty_name => 'Dotlrn professor profile provider', impl_owner_name => 'dotlrn_professor_profile_provider' ); Index: openacs-4/packages/dotlrn/sql/oracle/professor-profile-provider-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/professor-profile-provider-drop.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn/sql/oracle/professor-profile-provider-drop.sql 9 Aug 2002 18:39:24 -0000 1.2 +++ openacs-4/packages/dotlrn/sql/oracle/professor-profile-provider-drop.sql 30 Sep 2003 13:11:39 -0000 1.3 @@ -27,7 +27,7 @@ -- drop the binding between this implementation and the interface it -- implements. - acs_sc_binding.delete( + acs_sc_binding.del( contract_name => 'profile_provider', impl_name => 'dotlrn_professor_profile_provider' ); @@ -56,7 +56,7 @@ ); -- drop the implementation - acs_sc_impl.delete( + acs_sc_impl.del( impl_contract_name => 'profile_provider', impl_name => 'dotlrn_professor_profile_provider' ); Index: openacs-4/packages/dotlrn/sql/oracle/professors-package-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/professors-package-create.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/dotlrn/sql/oracle/professors-package-create.sql 9 Aug 2002 18:39:24 -0000 1.3 +++ openacs-4/packages/dotlrn/sql/oracle/professors-package-create.sql 30 Sep 2003 13:11:39 -0000 1.4 @@ -35,7 +35,7 @@ creation_ip in acs_objects.creation_ip%TYPE default null ) return dotlrn_user_profile_rels.rel_id%TYPE; - procedure delete ( + procedure del ( rel_id in dotlrn_professor_profile_rels.rel_id%TYPE ); @@ -92,16 +92,16 @@ return v_rel_id; end; - procedure delete ( + procedure del ( rel_id in dotlrn_professor_profile_rels.rel_id%TYPE ) is begin delete from dotlrn_professor_profile_rels - where rel_id = dotlrn_professor_profile_rel.delete.rel_id; + where rel_id = dotlrn_professor_profile_rel.del.rel_id; - dotlrn_user_profile_rel.delete(rel_id); + dotlrn_user_profile_rel.del(rel_id); end; end; Index: openacs-4/packages/dotlrn/sql/oracle/professors-sanitize.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/professors-sanitize.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn/sql/oracle/professors-sanitize.sql 9 Aug 2002 18:39:24 -0000 1.2 +++ openacs-4/packages/dotlrn/sql/oracle/professors-sanitize.sql 30 Sep 2003 13:11:39 -0000 1.3 @@ -30,7 +30,7 @@ from rel_segments where segment_name = 'dotLRN Professors'; - rel_segment.delete( + rel_segment.del( segment_id => foo ); @@ -45,7 +45,7 @@ from dotlrn_user_types where group_id = foo; - profiled_group.delete( + profiled_group.del( group_id => foo ); Index: openacs-4/packages/dotlrn/sql/oracle/student-profile-provider-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/student-profile-provider-create.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn/sql/oracle/student-profile-provider-create.sql 9 Aug 2002 18:39:24 -0000 1.2 +++ openacs-4/packages/dotlrn/sql/oracle/student-profile-provider-create.sql 30 Sep 2003 13:11:39 -0000 1.3 @@ -29,6 +29,7 @@ foo := acs_sc_impl.new( impl_contract_name => 'profile_provider', impl_name => 'dotlrn_student_profile_provider', + impl_pretty_name => 'Dotlrn student profile provider', impl_owner_name => 'dotlrn_student_profile_provider' ); Index: openacs-4/packages/dotlrn/sql/oracle/student-profile-provider-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/student-profile-provider-drop.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn/sql/oracle/student-profile-provider-drop.sql 9 Aug 2002 18:39:24 -0000 1.2 +++ openacs-4/packages/dotlrn/sql/oracle/student-profile-provider-drop.sql 30 Sep 2003 13:11:39 -0000 1.3 @@ -27,7 +27,7 @@ -- drop the binding between this implementation and the interface it -- implements. - acs_sc_binding.delete( + acs_sc_binding.del( contract_name => 'profile_provider', impl_name => 'dotlrn_student_profile_provider' ); @@ -56,7 +56,7 @@ ); -- drop the implementation - acs_sc_impl.delete( + acs_sc_impl.del( impl_contract_name => 'profile_provider', impl_name => 'dotlrn_student_profile_provider' ); Index: openacs-4/packages/dotlrn/sql/oracle/students-package-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/students-package-create.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/dotlrn/sql/oracle/students-package-create.sql 9 Aug 2002 18:39:24 -0000 1.3 +++ openacs-4/packages/dotlrn/sql/oracle/students-package-create.sql 30 Sep 2003 13:11:39 -0000 1.4 @@ -35,7 +35,7 @@ creation_ip in acs_objects.creation_ip%TYPE default null ) return dotlrn_user_profile_rels.rel_id%TYPE; - procedure delete ( + procedure del ( rel_id in dotlrn_student_profile_rels.rel_id%TYPE ); @@ -92,16 +92,16 @@ return v_rel_id; end; - procedure delete ( + procedure del ( rel_id in dotlrn_student_profile_rels.rel_id%TYPE ) is begin delete from dotlrn_student_profile_rels - where rel_id = dotlrn_student_profile_rel.delete.rel_id; + where rel_id = dotlrn_student_profile_rel.del.rel_id; - dotlrn_user_profile_rel.delete(rel_id); + dotlrn_user_profile_rel.del(rel_id); end; end; Index: openacs-4/packages/dotlrn/sql/oracle/students-sanitize.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/students-sanitize.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn/sql/oracle/students-sanitize.sql 9 Aug 2002 18:39:24 -0000 1.2 +++ openacs-4/packages/dotlrn/sql/oracle/students-sanitize.sql 30 Sep 2003 13:11:39 -0000 1.3 @@ -30,7 +30,7 @@ from rel_segments where segment_name = 'dotLRN Students'; - rel_segment.delete( + rel_segment.del( segment_id => foo ); @@ -45,7 +45,7 @@ from dotlrn_user_types where group_id = foo; - profiled_group.delete( + profiled_group.del( group_id => foo ); Index: openacs-4/packages/dotlrn/sql/oracle/user-extension-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/user-extension-create.sql,v diff -u -r1.4 -r1.5 --- openacs-4/packages/dotlrn/sql/oracle/user-extension-create.sql 17 Sep 2003 13:59:12 -0000 1.4 +++ openacs-4/packages/dotlrn/sql/oracle/user-extension-create.sql 30 Sep 2003 13:11:39 -0000 1.5 @@ -30,6 +30,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'UserData', impl_name => 'dotlrn_user_extension', + impl_pretty_name => 'Dotlrn user extension', impl_owner_name => 'dotlrn_user_extension' ); Index: openacs-4/packages/dotlrn/sql/oracle/user-extension-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/user-extension-drop.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn/sql/oracle/user-extension-drop.sql 9 Aug 2002 18:39:24 -0000 1.2 +++ openacs-4/packages/dotlrn/sql/oracle/user-extension-drop.sql 30 Sep 2003 13:11:39 -0000 1.3 @@ -26,7 +26,7 @@ foo integer; begin - acs_sc_binding.delete ( + acs_sc_binding.del ( contract_name => 'UserData', impl_name => 'dotlrn_user_extension' ); @@ -62,7 +62,7 @@ ); -- create the implementation - acs_sc_impl.delete( + acs_sc_impl.del( 'UserData', 'dotlrn_user_extension' ); Index: openacs-4/packages/dotlrn/sql/oracle/user-profile-provider-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/user-profile-provider-create.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn/sql/oracle/user-profile-provider-create.sql 9 Aug 2002 18:39:24 -0000 1.2 +++ openacs-4/packages/dotlrn/sql/oracle/user-profile-provider-create.sql 30 Sep 2003 13:11:39 -0000 1.3 @@ -29,6 +29,7 @@ foo := acs_sc_impl.new( impl_contract_name => 'profile_provider', impl_name => 'dotlrn_user_profile_provider', + impl_pretty_name => 'Dotlrn user profile provider', impl_owner_name => 'dotlrn_user_profile_provider' ); Index: openacs-4/packages/dotlrn/sql/oracle/user-profile-provider-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/user-profile-provider-drop.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/dotlrn/sql/oracle/user-profile-provider-drop.sql 9 Aug 2002 18:39:24 -0000 1.3 +++ openacs-4/packages/dotlrn/sql/oracle/user-profile-provider-drop.sql 30 Sep 2003 13:11:39 -0000 1.4 @@ -27,7 +27,7 @@ -- drop the binding between this implementation and the interface it -- implements. - acs_sc_binding.delete( + acs_sc_binding.del( contract_name => 'profile_provider', impl_name => 'dotlrn_user_profile_provider' ); @@ -56,7 +56,7 @@ ); -- drop the implementation - acs_sc_impl.delete( + acs_sc_impl.del( impl_contract_name => 'profile_provider', impl_name => 'dotlrn_user_profile_provider' ); Index: openacs-4/packages/dotlrn/sql/oracle/users-package-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/users-package-create.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/dotlrn/sql/oracle/users-package-create.sql 9 Aug 2002 18:39:24 -0000 1.3 +++ openacs-4/packages/dotlrn/sql/oracle/users-package-create.sql 30 Sep 2003 13:11:39 -0000 1.4 @@ -35,7 +35,7 @@ creation_ip in acs_objects.creation_ip%TYPE default null ) return dotlrn_user_profile_rels.rel_id%TYPE; - procedure delete ( + procedure del ( rel_id in dotlrn_user_profile_rels.rel_id%TYPE ); @@ -89,16 +89,16 @@ return v_rel_id; end; - procedure delete ( + procedure del ( rel_id in dotlrn_user_profile_rels.rel_id%TYPE ) is begin delete from dotlrn_user_profile_rels - where rel_id = dotlrn_user_profile_rel.delete.rel_id; + where rel_id = dotlrn_user_profile_rel.del.rel_id; - user_profile_rel.delete(rel_id); + user_profile_rel.del(rel_id); end; end; Index: openacs-4/packages/dotlrn/sql/oracle/users-sanitize.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/users-sanitize.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/dotlrn/sql/oracle/users-sanitize.sql 9 Aug 2002 18:39:24 -0000 1.3 +++ openacs-4/packages/dotlrn/sql/oracle/users-sanitize.sql 30 Sep 2003 13:11:39 -0000 1.4 @@ -35,15 +35,15 @@ from acs_permissions where grantee_id = v_segment_id; - rel_segment.delete( + rel_segment.del( segment_id => v_segment_id ); delete from acs_permissions where grantee_id = v_group_id; - profiled_group.delete( + profiled_group.del( group_id => v_group_id ); Index: openacs-4/packages/dotlrn/tcl/community-procs-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs-oracle.xql,v diff -u -r1.22 -r1.23 --- openacs-4/packages/dotlrn/tcl/community-procs-oracle.xql 14 Aug 2002 19:22:24 -0000 1.22 +++ openacs-4/packages/dotlrn/tcl/community-procs-oracle.xql 30 Sep 2003 13:11:39 -0000 1.23 @@ -30,7 +30,7 @@ <querytext> declare begin - :1 := dotlrn_community_type.delete( + :1 := dotlrn_community_type.del( community_type => :community_type_key ); end; Index: openacs-4/packages/dotlrn/tcl/community-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.tcl,v diff -u -r1.176 -r1.177 --- openacs-4/packages/dotlrn/tcl/community-procs.tcl 23 Sep 2003 17:46:59 -0000 1.176 +++ openacs-4/packages/dotlrn/tcl/community-procs.tcl 30 Sep 2003 13:11:39 -0000 1.177 @@ -1846,10 +1846,10 @@ # call the communitie's delete pl/sql, which removes the group db_exec_plsql \ remove_community \ - "begin dotlrn_community.delete(:community_id); end;" + "begin dotlrn_community.del(:community_id); end;" # Remove the package - db_exec_plsql delete_package "begin acs_object.delete(:package_id) end;" + db_exec_plsql delete_package "begin acs_object.del(:package_id) end;" } } Index: openacs-4/packages/dotlrn-bm/sql/oracle/dotlrn-bm-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-bm/sql/oracle/dotlrn-bm-create.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/dotlrn-bm/sql/oracle/dotlrn-bm-create.sql 9 Aug 2002 18:39:27 -0000 1.3 +++ openacs-4/packages/dotlrn-bm/sql/oracle/dotlrn-bm-create.sql 30 Sep 2003 13:11:39 -0000 1.4 @@ -29,6 +29,7 @@ foo := acs_sc_impl.new( impl_contract_name => 'dotlrn_applet', impl_name => 'dotlrn_bm', + impl_pretty_name => 'dotlrn_bm', impl_owner_name => 'dotlrn_bm' ); Index: openacs-4/packages/dotlrn-calendar/sql/oracle/dotlrn-calendar-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-calendar/sql/oracle/dotlrn-calendar-create.sql,v diff -u -r1.9 -r1.10 --- openacs-4/packages/dotlrn-calendar/sql/oracle/dotlrn-calendar-create.sql 17 Sep 2003 13:59:12 -0000 1.9 +++ openacs-4/packages/dotlrn-calendar/sql/oracle/dotlrn-calendar-create.sql 30 Sep 2003 13:11:39 -0000 1.10 @@ -29,6 +29,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'dotlrn_applet', impl_name => 'dotlrn_calendar', + impl_pretty_name => 'dotlrn_calendar', impl_owner_name => 'dotlrn_calendar' ); Index: openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-dotlrn-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-dotlrn-create.sql,v diff -u -r1.13 -r1.14 --- openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-dotlrn-create.sql 17 Sep 2003 13:59:12 -0000 1.13 +++ openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-dotlrn-create.sql 30 Sep 2003 13:11:39 -0000 1.14 @@ -31,6 +31,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'dotlrn_applet', impl_name => 'dotlrn_dotlrn', + impl_pretty_name => 'dotlrn_dotlrn', impl_owner_name => 'dotlrn_dotlrn' ); Index: openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-members-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-members-create.sql,v diff -u -r1.7 -r1.8 --- openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-members-create.sql 17 Sep 2003 13:59:12 -0000 1.7 +++ openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-members-create.sql 30 Sep 2003 13:11:39 -0000 1.8 @@ -31,6 +31,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'dotlrn_applet', impl_name => 'dotlrn_members', + impl_pretty_name => 'dotlrn_members', impl_owner_name => 'dotlrn_members' ); Index: openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-members-staff-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-members-staff-create.sql,v diff -u -r1.7 -r1.8 --- openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-members-staff-create.sql 17 Sep 2003 13:59:12 -0000 1.7 +++ openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-members-staff-create.sql 30 Sep 2003 13:11:39 -0000 1.8 @@ -31,6 +31,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'dotlrn_applet', impl_name => 'dotlrn_members_staff', + impl_pretty_name => 'dotlrn_members_staff', impl_owner_name => 'dotlrn_members_staff' ); Index: openacs-4/packages/dotlrn-faq/sql/oracle/dotlrn-faq-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-faq/sql/oracle/dotlrn-faq-create.sql,v diff -u -r1.10 -r1.11 --- openacs-4/packages/dotlrn-faq/sql/oracle/dotlrn-faq-create.sql 17 Sep 2003 13:59:12 -0000 1.10 +++ openacs-4/packages/dotlrn-faq/sql/oracle/dotlrn-faq-create.sql 30 Sep 2003 13:11:40 -0000 1.11 @@ -31,6 +31,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'dotlrn_applet', impl_name => 'dotlrn_faq', + impl_pretty_name => 'dotlrn_faq', impl_owner_name => 'dotlrn_faq' ); Index: openacs-4/packages/dotlrn-forums/sql/oracle/dotlrn-forums-admin-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-forums/sql/oracle/dotlrn-forums-admin-portlet-create.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/dotlrn-forums/sql/oracle/dotlrn-forums-admin-portlet-create.sql 17 Sep 2003 13:59:12 -0000 1.3 +++ openacs-4/packages/dotlrn-forums/sql/oracle/dotlrn-forums-admin-portlet-create.sql 30 Sep 2003 13:11:40 -0000 1.4 @@ -112,6 +112,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'portal_datasource', impl_name => 'dotlrn_forums_admin_portlet', + impl_pretty_name => 'dotlrn_forums_admin_portlet', impl_owner_name => 'dotlrn_forums_admin_portlet' ); Index: openacs-4/packages/dotlrn-forums/sql/oracle/dotlrn-forums-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-forums/sql/oracle/dotlrn-forums-create.sql,v diff -u -r1.5 -r1.6 --- openacs-4/packages/dotlrn-forums/sql/oracle/dotlrn-forums-create.sql 17 Sep 2003 13:59:12 -0000 1.5 +++ openacs-4/packages/dotlrn-forums/sql/oracle/dotlrn-forums-create.sql 30 Sep 2003 13:11:40 -0000 1.6 @@ -32,6 +32,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'dotlrn_applet', impl_name => 'dotlrn_forums', + impl_pretty_name => 'dotlrn_forums', impl_owner_name => 'dotlrn_forums' ); Index: openacs-4/packages/dotlrn-fs/sql/oracle/dotlrn-fs-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-fs/sql/oracle/dotlrn-fs-create.sql,v diff -u -r1.11 -r1.12 --- openacs-4/packages/dotlrn-fs/sql/oracle/dotlrn-fs-create.sql 17 Sep 2003 13:59:12 -0000 1.11 +++ openacs-4/packages/dotlrn-fs/sql/oracle/dotlrn-fs-create.sql 30 Sep 2003 13:11:40 -0000 1.12 @@ -31,6 +31,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'dotlrn_applet', impl_name => 'dotlrn_fs', + impl_pretty_name => 'dotlrn_fs', impl_owner_name => 'dotlrn_fs' ); Index: openacs-4/packages/dotlrn-news/sql/oracle/dotlrn-news-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-news/sql/oracle/dotlrn-news-create.sql,v diff -u -r1.9 -r1.10 --- openacs-4/packages/dotlrn-news/sql/oracle/dotlrn-news-create.sql 17 Sep 2003 13:59:13 -0000 1.9 +++ openacs-4/packages/dotlrn-news/sql/oracle/dotlrn-news-create.sql 30 Sep 2003 13:11:40 -0000 1.10 @@ -31,6 +31,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'dotlrn_applet', impl_name => 'dotlrn_news', + impl_pretty_name => 'dotlrn_news', impl_owner_name => 'dotlrn_news' ); Index: openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-admin-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-admin-portlet-create.sql,v diff -u -r1.5 -r1.6 --- openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-admin-portlet-create.sql 17 Sep 2003 15:18:23 -0000 1.5 +++ openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-admin-portlet-create.sql 30 Sep 2003 13:11:40 -0000 1.6 @@ -110,6 +110,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'portal_datasource', impl_name => 'dotlrn_admin_portlet', + impl_pretty_name => 'dotlrn_admin_portlet', impl_owner_name => 'dotlrn_admin_portlet' ); Index: openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-members-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-members-portlet-create.sql,v diff -u -r1.5 -r1.6 --- openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-members-portlet-create.sql 17 Sep 2003 13:59:13 -0000 1.5 +++ openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-members-portlet-create.sql 30 Sep 2003 13:11:40 -0000 1.6 @@ -106,6 +106,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'portal_datasource', impl_name => 'dotlrn_members_portlet', + impl_pretty_name => 'dotlrn_members_portlet', impl_owner_name => 'dotlrn_members_portlet' ); Index: openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-members-staff-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-members-staff-portlet-create.sql,v diff -u -r1.5 -r1.6 --- openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-members-staff-portlet-create.sql 17 Sep 2003 13:59:13 -0000 1.5 +++ openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-members-staff-portlet-create.sql 30 Sep 2003 13:11:40 -0000 1.6 @@ -107,6 +107,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'portal_datasource', impl_name => 'dotlrn_members_staff_portlet', + impl_pretty_name => 'dotlrn_members_staff_portlet', impl_owner_name => 'dotlrn_members_staff_portlet' ); Index: openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-portlet-create.sql,v diff -u -r1.14 -r1.15 --- openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-portlet-create.sql 17 Sep 2003 13:59:13 -0000 1.14 +++ openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-portlet-create.sql 30 Sep 2003 13:11:40 -0000 1.15 @@ -109,6 +109,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'portal_datasource', impl_name => 'dotlrn_portlet', + impl_pretty_name => 'dotlrn_portlet', impl_owner_name => 'dotlrn_portlet' ); Index: openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-portlet-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-portlet-drop.sql,v diff -u -r1.6 -r1.7 --- openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-portlet-drop.sql 9 Aug 2002 18:39:29 -0000 1.6 +++ openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-portlet-drop.sql 30 Sep 2003 13:11:40 -0000 1.7 @@ -42,7 +42,7 @@ end; if ds_id is not null then - portal_datasource.delete(ds_id); + portal_datasource.del(ds_id); end if; end; @@ -98,13 +98,13 @@ ); -- Drop the binding - acs_sc_binding.delete ( + acs_sc_binding.del ( contract_name => 'portal_datasource', impl_name => 'dotlrn_portlet' ); -- drop the impl - foo := acs_sc_impl.delete ( + foo := acs_sc_impl.del ( 'portal_datasource', 'dotlrn_portlet' ); Index: openacs-4/packages/dotlrn-static/sql/oracle/dotlrn-static-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-static/sql/oracle/dotlrn-static-create.sql,v diff -u -r1.8 -r1.9 --- openacs-4/packages/dotlrn-static/sql/oracle/dotlrn-static-create.sql 11 Sep 2003 08:52:17 -0000 1.8 +++ openacs-4/packages/dotlrn-static/sql/oracle/dotlrn-static-create.sql 30 Sep 2003 13:11:40 -0000 1.9 @@ -29,6 +29,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'dotlrn_applet', impl_name => 'dotlrn_static', + impl_pretty_name => 'dotlrn_static', impl_owner_name => 'dotlrn_static' ); Index: openacs-4/packages/dotlrn-survey/sql/oracle/dotlrn-survey-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-survey/sql/oracle/dotlrn-survey-create.sql,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-survey/sql/oracle/dotlrn-survey-create.sql 14 May 2003 21:06:34 -0000 1.1 +++ openacs-4/packages/dotlrn-survey/sql/oracle/dotlrn-survey-create.sql 30 Sep 2003 13:11:40 -0000 1.2 @@ -29,6 +29,7 @@ foo := acs_sc_impl.new( impl_contract_name => 'dotlrn_applet', impl_name => 'dotlrn_survey', + impl_pretty_name => 'dotlrn_survey', impl_owner_name => 'dotlrn_survey' ); Index: openacs-4/packages/dotlrn-syllabus/sql/oracle/dotlrn-syllabus-applet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-syllabus/sql/oracle/dotlrn-syllabus-applet-create.sql,v diff -u -r1.5 -r1.6 --- openacs-4/packages/dotlrn-syllabus/sql/oracle/dotlrn-syllabus-applet-create.sql 9 Aug 2002 18:39:30 -0000 1.5 +++ openacs-4/packages/dotlrn-syllabus/sql/oracle/dotlrn-syllabus-applet-create.sql 30 Sep 2003 13:11:40 -0000 1.6 @@ -30,6 +30,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'dotlrn_applet', impl_name => 'dotlrn_syllabus', + impl_pretty_name => 'dotlrn_syllabus', impl_owner_name => 'dotlrn_syllabus' ); Index: openacs-4/packages/dotlrn-syllabus/sql/oracle/dotlrn-syllabus-applet-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-syllabus/sql/oracle/dotlrn-syllabus-applet-drop.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn-syllabus/sql/oracle/dotlrn-syllabus-applet-drop.sql 9 Aug 2002 18:39:30 -0000 1.2 +++ openacs-4/packages/dotlrn-syllabus/sql/oracle/dotlrn-syllabus-applet-drop.sql 30 Sep 2003 13:11:40 -0000 1.3 @@ -26,7 +26,7 @@ foo integer; begin - acs_sc_binding.delete ( + acs_sc_binding.del ( contract_name => 'dotlrn_applet', impl_name => 'dotlrn_syllabus' ); @@ -87,7 +87,7 @@ impl_operation_name => 'RemoveUserFromCommunity' ); - acs_sc_impl.delete ( + acs_sc_impl.del ( impl_contract_name => 'dotlrn_applet', impl_name => 'dotlrn_syllabus' ); Index: openacs-4/packages/dotlrn-syllabus/sql/oracle/syllabus-admin-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-syllabus/sql/oracle/syllabus-admin-portlet-create.sql,v diff -u -r1.4 -r1.5 --- openacs-4/packages/dotlrn-syllabus/sql/oracle/syllabus-admin-portlet-create.sql 17 Sep 2003 14:48:17 -0000 1.4 +++ openacs-4/packages/dotlrn-syllabus/sql/oracle/syllabus-admin-portlet-create.sql 30 Sep 2003 13:11:40 -0000 1.5 @@ -81,6 +81,7 @@ foo := acs_sc_impl.new( impl_contract_name => 'portal_datasource', impl_name => 'syllabus_admin_portlet', + impl_pretty_name => 'syllabus_admin_portlet', impl_owner_name => 'syllabus_admin_portlet' ); Index: openacs-4/packages/dotlrn-syllabus/sql/oracle/syllabus-admin-portlet-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-syllabus/sql/oracle/syllabus-admin-portlet-drop.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/dotlrn-syllabus/sql/oracle/syllabus-admin-portlet-drop.sql 9 Aug 2002 18:39:30 -0000 1.3 +++ openacs-4/packages/dotlrn-syllabus/sql/oracle/syllabus-admin-portlet-drop.sql 30 Sep 2003 13:11:40 -0000 1.4 @@ -37,10 +37,10 @@ end; if ds_id is not null then - portal_datasource.delete(ds_id); + portal_datasource.del(ds_id); end if; - acs_sc_binding.delete( + acs_sc_binding.del( contract_name => 'portal_datasource', impl_name => 'syllabus_admin_portlet' ); @@ -87,7 +87,7 @@ impl_operation_name => 'RemoveSelfFromPage' ); - acs_sc_impl.delete( + acs_sc_impl.del( impl_contract_name => 'portal_datasource', impl_name => 'syllabus_admin_portlet' ); Index: openacs-4/packages/dotlrn-syllabus/sql/oracle/syllabus-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-syllabus/sql/oracle/syllabus-portlet-create.sql,v diff -u -r1.4 -r1.5 --- openacs-4/packages/dotlrn-syllabus/sql/oracle/syllabus-portlet-create.sql 17 Sep 2003 14:48:17 -0000 1.4 +++ openacs-4/packages/dotlrn-syllabus/sql/oracle/syllabus-portlet-create.sql 30 Sep 2003 13:11:40 -0000 1.5 @@ -80,6 +80,7 @@ foo := acs_sc_impl.new( impl_contract_name => 'portal_datasource', impl_name => 'syllabus_portlet', + impl_pretty_name => 'syllabus_portlet', impl_owner_name => 'syllabus_portlet' ); Index: openacs-4/packages/dotlrn-syllabus/sql/oracle/syllabus-portlet-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-syllabus/sql/oracle/syllabus-portlet-drop.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/dotlrn-syllabus/sql/oracle/syllabus-portlet-drop.sql 9 Aug 2002 18:39:30 -0000 1.3 +++ openacs-4/packages/dotlrn-syllabus/sql/oracle/syllabus-portlet-drop.sql 30 Sep 2003 13:11:40 -0000 1.4 @@ -37,10 +37,10 @@ end; if ds_id is not null then - portal_datasource.delete(ds_id); + portal_datasource.del(ds_id); end if; - acs_sc_binding.delete( + acs_sc_binding.del( contract_name => 'portal_datasource', impl_name => 'syllabus_portlet' ); @@ -87,7 +87,7 @@ impl_operation_name => 'RemoveSelfFromPage' ); - acs_sc_impl.delete( + acs_sc_impl.del( impl_contract_name => 'portal_datasource', impl_name => 'syllabus_portlet' ); Index: openacs-4/packages/faq-portlet/sql/oracle/faq-admin-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/faq-portlet/sql/oracle/faq-admin-portlet-create.sql,v diff -u -r1.6 -r1.7 --- openacs-4/packages/faq-portlet/sql/oracle/faq-admin-portlet-create.sql 17 Sep 2003 13:59:13 -0000 1.6 +++ openacs-4/packages/faq-portlet/sql/oracle/faq-admin-portlet-create.sql 30 Sep 2003 13:11:40 -0000 1.7 @@ -92,6 +92,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'portal_datasource', impl_name => 'faq_admin_portlet', + impl_pretty_name => 'FAQ Admin Portlet', impl_owner_name => 'faq_admin_portlet' ); 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.14 -r1.15 --- openacs-4/packages/faq-portlet/sql/oracle/faq-portlet-create.sql 17 Sep 2003 14:48:17 -0000 1.14 +++ openacs-4/packages/faq-portlet/sql/oracle/faq-portlet-create.sql 30 Sep 2003 13:11:40 -0000 1.15 @@ -99,6 +99,7 @@ foo := acs_sc_impl.new( impl_contract_name => 'portal_datasource', impl_name => 'faq_portlet', + impl_pretty_name => 'FAQ Portlet', impl_owner_name => 'faq_portlet' ); Index: openacs-4/packages/faq-portlet/sql/oracle/faq-portlet-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/faq-portlet/sql/oracle/faq-portlet-drop.sql,v diff -u -r1.6 -r1.7 --- openacs-4/packages/faq-portlet/sql/oracle/faq-portlet-drop.sql 9 Aug 2002 18:39:31 -0000 1.6 +++ openacs-4/packages/faq-portlet/sql/oracle/faq-portlet-drop.sql 30 Sep 2003 13:11:40 -0000 1.7 @@ -42,7 +42,7 @@ end; if ds_id is not null then - portal_datasource.delete(ds_id); + portal_datasource.del(ds_id); end if; end; @@ -98,13 +98,13 @@ ); -- Drop the binding - acs_sc_binding.delete ( + acs_sc_binding.del ( contract_name => 'portal_datasource', impl_name => 'faq_portlet' ); -- drop the impl - foo := acs_sc_impl.delete ( + foo := acs_sc_impl.del ( 'portal_datasource', 'faq_portlet' ); Index: openacs-4/packages/forums-portlet/sql/oracle/forums-admin-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums-portlet/sql/oracle/forums-admin-portlet-create.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/forums-portlet/sql/oracle/forums-admin-portlet-create.sql 17 Sep 2003 13:59:13 -0000 1.3 +++ openacs-4/packages/forums-portlet/sql/oracle/forums-admin-portlet-create.sql 30 Sep 2003 13:11:40 -0000 1.4 @@ -110,6 +110,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'portal_datasource', impl_name => 'forums_admin_portlet', + impl_pretty_name => 'Forums admin portlet', impl_owner_name => 'forums_admin_portlet' ); Index: openacs-4/packages/forums-portlet/sql/oracle/forums-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums-portlet/sql/oracle/forums-portlet-create.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/forums-portlet/sql/oracle/forums-portlet-create.sql 17 Sep 2003 13:59:13 -0000 1.3 +++ openacs-4/packages/forums-portlet/sql/oracle/forums-portlet-create.sql 30 Sep 2003 13:11:40 -0000 1.4 @@ -121,6 +121,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'portal_datasource', impl_name => 'forums_portlet', + impl_pretty_name => 'Forums Portlet', impl_owner_name => 'forums_portlet' ); Index: openacs-4/packages/forums-portlet/sql/oracle/forums-portlet-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums-portlet/sql/oracle/forums-portlet-drop.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/forums-portlet/sql/oracle/forums-portlet-drop.sql 9 Aug 2002 18:39:31 -0000 1.2 +++ openacs-4/packages/forums-portlet/sql/oracle/forums-portlet-drop.sql 30 Sep 2003 13:11:40 -0000 1.3 @@ -42,7 +42,7 @@ end; if ds_id is not null then - portal_datasource.delete(ds_id); + portal_datasource.del(ds_id); end if; end; @@ -100,13 +100,13 @@ ); -- Drop the binding - acs_sc_binding.delete ( + acs_sc_binding.del ( contract_name => 'portal_datasource', impl_name => 'forums_portlet' ); -- drop the impl - foo := acs_sc_impl.delete ( + foo := acs_sc_impl.del ( 'portal_datasource', 'forums_portlet' ); Index: openacs-4/packages/fs-portlet/sql/oracle/fs-contents-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/fs-portlet/sql/oracle/fs-contents-portlet-create.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/fs-portlet/sql/oracle/fs-contents-portlet-create.sql 17 Sep 2003 15:18:23 -0000 1.3 +++ openacs-4/packages/fs-portlet/sql/oracle/fs-contents-portlet-create.sql 30 Sep 2003 13:11:40 -0000 1.4 @@ -82,6 +82,7 @@ foo := acs_sc_impl.new( impl_contract_name => 'portal_datasource', impl_name => 'fs_contents_portlet', + impl_pretty_name => 'FS Contents portlet', impl_owner_name => 'fs_contents_portlet' ); Index: openacs-4/packages/fs-portlet/sql/oracle/fs-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/fs-portlet/sql/oracle/fs-portlet-create.sql,v diff -u -r1.18 -r1.19 --- openacs-4/packages/fs-portlet/sql/oracle/fs-portlet-create.sql 17 Sep 2003 14:48:17 -0000 1.18 +++ openacs-4/packages/fs-portlet/sql/oracle/fs-portlet-create.sql 30 Sep 2003 13:11:40 -0000 1.19 @@ -102,6 +102,7 @@ foo := acs_sc_impl.new( impl_contract_name => 'portal_datasource', impl_name => 'fs_portlet', + impl_pretty_name => 'FS Portlet', impl_owner_name => 'fs_portlet' ); Index: openacs-4/packages/fs-portlet/sql/oracle/fs-portlet-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/fs-portlet/sql/oracle/fs-portlet-drop.sql,v diff -u -r1.5 -r1.6 --- openacs-4/packages/fs-portlet/sql/oracle/fs-portlet-drop.sql 9 Aug 2002 18:39:32 -0000 1.5 +++ openacs-4/packages/fs-portlet/sql/oracle/fs-portlet-drop.sql 30 Sep 2003 13:11:40 -0000 1.6 @@ -42,7 +42,7 @@ end; if ds_id is not null then - portal_datasource.delete(ds_id); + portal_datasource.del(ds_id); end if; end; @@ -98,13 +98,13 @@ ); -- Drop the binding - acs_sc_binding.delete ( + acs_sc_binding.del ( contract_name => 'portal_datasource', impl_name => 'fs-portlet' ); -- drop the impl - foo := acs_sc_impl.delete ( + foo := acs_sc_impl.del ( 'portal_datasource', 'fs-portlet' ); Index: openacs-4/packages/new-portal/sql/oracle/api-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/sql/oracle/api-create.sql,v diff -u -r1.39 -r1.40 --- openacs-4/packages/new-portal/sql/oracle/api-create.sql 9 Aug 2002 20:56:27 -0000 1.39 +++ openacs-4/packages/new-portal/sql/oracle/api-create.sql 30 Sep 2003 13:11:40 -0000 1.40 @@ -38,7 +38,7 @@ context_id in acs_objects.context_id%TYPE default null ) return portal_pages.page_id%TYPE; - procedure delete ( + procedure del ( page_id in portal_pages.page_id%TYPE ); @@ -96,7 +96,7 @@ end new; - procedure delete ( + procedure del ( page_id in portal_pages.page_id%TYPE ) is @@ -111,7 +111,7 @@ select portal_id, sort_key into v_portal_id, v_sort_key from portal_pages - where page_id = portal_page.delete.page_id; + where page_id = portal_page.del.page_id; select (count(*) - 1) into v_page_count_from_0 @@ -124,7 +124,7 @@ delete from portal_pages - where page_id = portal_page.delete.page_id; + where page_id = portal_page.del.page_id; elsif i > v_sort_key then @@ -140,9 +140,9 @@ end loop; - acs_object.delete(page_id); + acs_object.del(page_id); - end delete; + end del; end portal_page; / @@ -165,7 +165,7 @@ context_id in acs_objects.context_id%TYPE default null ) return portals.portal_id%TYPE; - procedure delete ( + procedure del ( portal_id in portals.portal_id%TYPE ); end portal; @@ -313,23 +313,23 @@ end new; - procedure delete ( + procedure del ( portal_id in portals.portal_id%TYPE ) is begin for page in (select page_id from portal_pages - where portal_id = portal.delete.portal_id + where portal_id = portal.del.portal_id order by sort_key desc) loop - portal_page.delete(page_id => page.page_id); + portal_page.del(page_id => page.page_id); end loop; - acs_object.delete(portal_id); + acs_object.del(portal_id); - end delete; + end del; end portal; / @@ -350,7 +350,7 @@ context_id in acs_objects.context_id%TYPE default null ) return portal_element_themes.theme_id%TYPE; - procedure delete ( + procedure del ( theme_id in portal_element_themes.theme_id%TYPE ); @@ -395,13 +395,13 @@ end new; - procedure delete ( + procedure del ( theme_id in portal_element_themes.theme_id%TYPE ) is begin - acs_object.delete(theme_id); - end delete; + acs_object.del(theme_id); + end del; end portal_element_theme; / @@ -423,7 +423,7 @@ context_id in acs_objects.context_id%TYPE default null ) return portal_layouts.layout_id%TYPE; - procedure delete ( + procedure del ( layout_id in portal_layouts.layout_id%TYPE ); @@ -473,13 +473,13 @@ end new; - procedure delete ( + procedure del ( layout_id in portal_layouts.layout_id%TYPE ) is begin - acs_object.delete(layout_id); - end delete; + acs_object.del(layout_id); + end del; procedure add_region ( layout_id in portal_supported_regions.layout_id%TYPE, @@ -512,7 +512,7 @@ context_id in acs_objects.context_id%TYPE default null ) return portal_datasources.datasource_id%TYPE; - procedure delete ( + procedure del ( datasource_id in portal_datasources.datasource_id%TYPE ); @@ -563,13 +563,13 @@ end new; - procedure delete ( + procedure del ( datasource_id in portal_datasources.datasource_id%TYPE ) is begin - acs_object.delete(datasource_id); - end delete; + acs_object.del(datasource_id); + end del; procedure set_def_param ( datasource_id in portal_datasource_def_params.datasource_id%TYPE, Index: openacs-4/packages/new-portal/sql/oracle/datasource-sc-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/sql/oracle/datasource-sc-drop.sql,v diff -u -r1.9 -r1.10 --- openacs-4/packages/new-portal/sql/oracle/datasource-sc-drop.sql 9 Aug 2002 20:56:27 -0000 1.9 +++ openacs-4/packages/new-portal/sql/oracle/datasource-sc-drop.sql 30 Sep 2003 13:11:40 -0000 1.10 @@ -33,7 +33,7 @@ operation_name => 'GetMyName' ); - acs_sc_operation.delete ( + acs_sc_operation.del ( operation_id => op_id, contract_name => 'portal_datasource', operation_name => 'GetMyName' @@ -43,7 +43,7 @@ msg_type_name => 'portal_datasource.GetMyName.InputType' ); - acs_sc_msg_type.delete ( + acs_sc_msg_type.del ( msg_type_name => 'portal_datasource.GetMyName.InputType', msg_type_id => msg_type_id ); @@ -52,7 +52,7 @@ msg_type_name => 'portal_datasource.GetMyName.OutputType' ); - acs_sc_msg_type.delete ( + acs_sc_msg_type.del ( msg_type_name => 'portal_datasource.GetMyName.OutputType', msg_type_id => msg_type_id ); @@ -63,7 +63,7 @@ operation_name => 'GetPrettyName' ); - acs_sc_operation.delete ( + acs_sc_operation.del ( operation_id => op_id, contract_name => 'portal_datasource', operation_name => 'GetPrettyName' @@ -73,7 +73,7 @@ msg_type_name => 'portal_datasource.GetPrettyName.InputType' ); - acs_sc_msg_type.delete ( + acs_sc_msg_type.del ( msg_type_name => 'portal_datasource.GetPrettyName.InputType', msg_type_id => msg_type_id ); @@ -82,7 +82,7 @@ msg_type_name => 'portal_datasource.GetPrettyName.OutputType' ); - acs_sc_msg_type.delete ( + acs_sc_msg_type.del ( msg_type_name => 'portal_datasource.GetPrettyName.OutputType', msg_type_id => msg_type_id ); @@ -94,7 +94,7 @@ operation_name => 'Link' ); - acs_sc_operation.delete ( + acs_sc_operation.del ( operation_id => op_id, contract_name => 'portal_datasource', operation_name => 'Link' @@ -104,7 +104,7 @@ msg_type_name => 'portal_datasource.Link.InputType' ); - acs_sc_msg_type.delete ( + acs_sc_msg_type.del ( msg_type_name => 'portal_datasource.Link.InputType', msg_type_id => msg_type_id ); @@ -113,7 +113,7 @@ msg_type_name => 'portal_datasource.Link.OutputType' ); - acs_sc_msg_type.delete ( + acs_sc_msg_type.del ( msg_type_name => 'portal_datasource.Link.OutputType', msg_type_id => msg_type_id ); @@ -124,7 +124,7 @@ operation_name => 'AddSelfToPage' ); - acs_sc_operation.delete ( + acs_sc_operation.del ( operation_id => op_id, contract_name => 'portal_datasource', operation_name => 'AddSelfToPage' @@ -134,7 +134,7 @@ msg_type_name => 'portal_datasource.AddSelfToPage.InputType' ); - acs_sc_msg_type.delete ( + acs_sc_msg_type.del ( msg_type_name => 'portal_datasource.AddSelfToPage.InputType', msg_type_id => msg_type_id ); @@ -143,7 +143,7 @@ msg_type_name => 'portal_datasource.AddSelfToPage.OutputType' ); - acs_sc_msg_type.delete ( + acs_sc_msg_type.del ( msg_type_name => 'portal_datasource.AddSelfToPage.OutputType', msg_type_id => msg_type_id ); @@ -154,7 +154,7 @@ operation_name => 'Show' ); - acs_sc_operation.delete ( + acs_sc_operation.del ( operation_id => op_id, contract_name => 'portal_datasource', operation_name => 'Show' @@ -164,7 +164,7 @@ msg_type_name => 'portal_datasource.Show.InputType' ); - acs_sc_msg_type.delete ( + acs_sc_msg_type.del ( msg_type_name => 'portal_datasource.Show.InputType', msg_type_id => msg_type_id ); @@ -173,7 +173,7 @@ msg_type_name => 'portal_datasource.Show.OutputType' ); - acs_sc_msg_type.delete ( + acs_sc_msg_type.del ( msg_type_name => 'portal_datasource.Show.OutputType', msg_type_id => msg_type_id ); @@ -184,7 +184,7 @@ operation_name => 'Edit' ); - acs_sc_operation.delete ( + acs_sc_operation.del ( operation_id => op_id, contract_name => 'portal_datasource', operation_name => 'Edit' @@ -194,7 +194,7 @@ msg_type_name => 'portal_datasource.Edit.InputType' ); - acs_sc_msg_type.delete ( + acs_sc_msg_type.del ( msg_type_name => 'portal_datasource.Edit.InputType', msg_type_id => msg_type_id ); @@ -203,7 +203,7 @@ msg_type_name => 'portal_datasource.Edit.OutputType' ); - acs_sc_msg_type.delete ( + acs_sc_msg_type.del ( msg_type_name => 'portal_datasource.Edit.OutputType', msg_type_id => msg_type_id ); @@ -214,7 +214,7 @@ operation_name => 'RemoveSelfFromPage' ); - acs_sc_operation.delete ( + acs_sc_operation.del ( operation_id => op_id, contract_name => 'portal_datasource', operation_name => 'RemoveSelfFromPage' @@ -224,25 +224,25 @@ msg_type_name => 'portal_datasource.RemoveSelfFromPage.InputType' ); - acs_sc_msg_type.delete ( + acs_sc_msg_type.del ( msg_type_name => 'portal_datasource.RemoveSelfFromPage.InputType', msg_type_id => msg_type_id ); - acs_sc_msg_type.delete ( + acs_sc_msg_type.del ( msg_type_id := acs_sc_msg_type.get_id ( msg_type_name => 'portal_datasource.RemoveSelfFromPage.OutputType' ); - acs_sc_msg_type.delete ( + acs_sc_msg_type.del ( msg_type_name => 'portal_datasource.RemoveSelfFromPage.OutputType', msg_type_id => msg_type_id ); -- drop the contract contract_id := acs_sc_contract.get_id ('portal_datasource'); - acs_sc_contract.delete ( + acs_sc_contract.del ( contract_id => contract_id, contract_name => 'portal_datasource' ); Index: openacs-4/packages/new-portal/tcl/datasource-procs-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/tcl/datasource-procs-oracle.xql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/new-portal/tcl/datasource-procs-oracle.xql 17 Sep 2003 12:10:01 -0000 1.3 +++ openacs-4/packages/new-portal/tcl/datasource-procs-oracle.xql 30 Sep 2003 13:11:41 -0000 1.4 @@ -31,7 +31,7 @@ <fullquery name="portal::datasource::delete.delete_datasource"> <querytext> begin - portal_datasource.delete( + portal_datasource.del( datasource_id => :datasource_id ); end; Index: openacs-4/packages/new-portal/tcl/portal-procs-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/tcl/portal-procs-oracle.xql,v diff -u -r1.20 -r1.21 --- openacs-4/packages/new-portal/tcl/portal-procs-oracle.xql 21 Aug 2002 15:22:39 -0000 1.20 +++ openacs-4/packages/new-portal/tcl/portal-procs-oracle.xql 30 Sep 2003 13:11:41 -0000 1.21 @@ -21,7 +21,7 @@ <fullquery name="portal::delete.delete_portal"> <querytext> begin - portal.delete(portal_id => :portal_id); + portal.del(portal_id => :portal_id); end; </querytext> </fullquery> @@ -132,7 +132,7 @@ <fullquery name="portal::page_delete.page_delete"> <querytext> begin - portal_page.delete(page_id => :page_id); + portal_page.del(page_id => :page_id); end; </querytext> </fullquery> Index: openacs-4/packages/news-portlet/sql/oracle/news-admin-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news-portlet/sql/oracle/news-admin-portlet-create.sql,v diff -u -r1.6 -r1.7 --- openacs-4/packages/news-portlet/sql/oracle/news-admin-portlet-create.sql 17 Sep 2003 13:59:13 -0000 1.6 +++ openacs-4/packages/news-portlet/sql/oracle/news-admin-portlet-create.sql 30 Sep 2003 13:11:41 -0000 1.7 @@ -110,6 +110,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'portal_datasource', impl_name => 'news_admin_portlet', + impl_pretty_name => 'News admin portlet', impl_owner_name => 'news_admin_portlet' ); Index: openacs-4/packages/news-portlet/sql/oracle/news-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news-portlet/sql/oracle/news-portlet-create.sql,v diff -u -r1.13 -r1.14 --- openacs-4/packages/news-portlet/sql/oracle/news-portlet-create.sql 17 Sep 2003 13:59:13 -0000 1.13 +++ openacs-4/packages/news-portlet/sql/oracle/news-portlet-create.sql 30 Sep 2003 13:11:41 -0000 1.14 @@ -109,6 +109,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'portal_datasource', impl_name => 'news_portlet', + impl_pretty_name => 'News portlet', impl_owner_name => 'news_portlet' ); Index: openacs-4/packages/news-portlet/sql/oracle/news-portlet-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news-portlet/sql/oracle/news-portlet-drop.sql,v diff -u -r1.6 -r1.7 --- openacs-4/packages/news-portlet/sql/oracle/news-portlet-drop.sql 9 Aug 2002 18:39:32 -0000 1.6 +++ openacs-4/packages/news-portlet/sql/oracle/news-portlet-drop.sql 30 Sep 2003 13:11:41 -0000 1.7 @@ -42,7 +42,7 @@ end; if ds_id is not null then - portal_datasource.delete(ds_id); + portal_datasource.del(ds_id); end if; end; @@ -98,13 +98,13 @@ ); -- Drop the binding - acs_sc_binding.delete ( + acs_sc_binding.del ( contract_name => 'portal_datasource', impl_name => 'news_portlet' ); -- drop the impl - foo := acs_sc_impl.delete ( + foo := acs_sc_impl.del ( 'portal_datasource', 'news_portlet' ); Index: openacs-4/packages/profile-provider/sql/oracle/profile-provider-contract-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/profile-provider/sql/oracle/profile-provider-contract-drop.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/profile-provider/sql/oracle/profile-provider-contract-drop.sql 9 Aug 2002 20:56:32 -0000 1.3 +++ openacs-4/packages/profile-provider/sql/oracle/profile-provider-contract-drop.sql 30 Sep 2003 13:11:41 -0000 1.4 @@ -27,49 +27,49 @@ -- drop the methods of this interface -- name method - acs_sc_operation.delete( + acs_sc_operation.del( contract_name => 'profile_provider', operation_name => 'name' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'profile_provider.name.InputType' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'profile_provider.name.OutputType' ); -- prettyName method - acs_sc_operation.delete( + acs_sc_operation.del( contract_name => 'profile_provider', operation_name => 'prettyName' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'profile_provider.prettyName.InputType' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'profile_provider.prettyName.OutputType' ); -- render method - acs_sc_operation.delete( + acs_sc_operation.del( contract_name => 'profile_provider', operation_name => 'render' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'profile_provider.render.InputType' ); - acs_sc_msg_type.delete( + acs_sc_msg_type.del( msg_type_name => 'profile_provider.render.OutputType' ); -- create the interface - acs_sc_contract.delete( + acs_sc_contract.del( contract_name => 'profile_provider' ); Index: openacs-4/packages/profile-provider/sql/oracle/profiled-group-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/profile-provider/sql/oracle/profiled-group-create.sql,v diff -u -r1.4 -r1.5 --- openacs-4/packages/profile-provider/sql/oracle/profiled-group-create.sql 9 Aug 2002 20:56:32 -0000 1.4 +++ openacs-4/packages/profile-provider/sql/oracle/profiled-group-create.sql 30 Sep 2003 13:11:41 -0000 1.5 @@ -64,7 +64,7 @@ creation_ip in acs_objects.creation_ip%TYPE default null ) return profiled_groups.group_id%TYPE; - procedure delete ( + procedure del ( group_id in profiled_groups.group_id%TYPE ); end profiled_group; @@ -107,16 +107,16 @@ return v_group_id; end new; - procedure delete ( + procedure del ( group_id in profiled_groups.group_id%TYPE ) is begin delete from profiled_groups - where profiled_groups.group_id = profiled_group.delete.group_id; + where profiled_groups.group_id = profiled_group.del.group_id; - acs_group.delete(group_id); - end delete; + acs_group.del(group_id); + end del; end profiled_group; / show errors Index: openacs-4/packages/static-portlet/sql/oracle/static-admin-portlet.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/static-portlet/sql/oracle/static-admin-portlet.sql,v diff -u -r1.6 -r1.7 --- openacs-4/packages/static-portlet/sql/oracle/static-admin-portlet.sql 17 Sep 2003 13:59:13 -0000 1.6 +++ openacs-4/packages/static-portlet/sql/oracle/static-admin-portlet.sql 30 Sep 2003 13:11:41 -0000 1.7 @@ -110,6 +110,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'portal_datasource', impl_name => 'static_admin_portlet', + impl_pretty_name => 'static_admin_portlet', impl_owner_name => 'static_admin_portlet' ); Index: openacs-4/packages/static-portlet/sql/oracle/static-core.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/static-portlet/sql/oracle/static-core.sql,v diff -u -r1.6 -r1.7 --- openacs-4/packages/static-portlet/sql/oracle/static-core.sql 9 Aug 2002 18:39:33 -0000 1.6 +++ openacs-4/packages/static-portlet/sql/oracle/static-core.sql 30 Sep 2003 13:11:41 -0000 1.7 @@ -74,7 +74,7 @@ context_id in acs_objects.context_id%TYPE default null ) return acs_objects.object_id%TYPE; - procedure delete ( + procedure del ( content_id in static_portal_content.content_id%TYPE ); @@ -113,15 +113,15 @@ return v_content_id; end new; - procedure delete ( + procedure del ( content_id in static_portal_content.content_id%TYPE ) is begin delete from static_portal_content where content_id = content_id; - acs_object.delete(content_id); - end delete; + acs_object.del(content_id); + end del; end static_portal_content_item; / Index: openacs-4/packages/static-portlet/sql/oracle/static-portlet.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/static-portlet/sql/oracle/static-portlet.sql,v diff -u -r1.6 -r1.7 --- openacs-4/packages/static-portlet/sql/oracle/static-portlet.sql 17 Sep 2003 13:59:13 -0000 1.6 +++ openacs-4/packages/static-portlet/sql/oracle/static-portlet.sql 30 Sep 2003 13:11:41 -0000 1.7 @@ -118,6 +118,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'portal_datasource', impl_name => 'static_portlet', + impl_pretty_name => 'static_portlet', impl_owner_name => 'static_portlet' ); Index: openacs-4/packages/survey-portlet/sql/oracle/survey-admin-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/survey-portlet/sql/oracle/survey-admin-portlet-create.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/survey-portlet/sql/oracle/survey-admin-portlet-create.sql 17 Sep 2003 13:59:13 -0000 1.2 +++ openacs-4/packages/survey-portlet/sql/oracle/survey-admin-portlet-create.sql 30 Sep 2003 13:11:41 -0000 1.3 @@ -110,6 +110,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'portal_datasource', impl_name => 'survey_admin_portlet', + impl_pretty_name => 'Survey admin portlet', impl_owner_name => 'survey_admin_portlet' ); Index: openacs-4/packages/survey-portlet/sql/oracle/survey-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/survey-portlet/sql/oracle/survey-portlet-create.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/survey-portlet/sql/oracle/survey-portlet-create.sql 17 Sep 2003 14:48:17 -0000 1.2 +++ openacs-4/packages/survey-portlet/sql/oracle/survey-portlet-create.sql 30 Sep 2003 13:11:41 -0000 1.3 @@ -111,6 +111,7 @@ foo := acs_sc_impl.new ( impl_contract_name => 'portal_datasource', impl_name => 'survey_portlet', + impl_pretty_name => 'Survey portlet', impl_owner_name => 'survey_portlet' ); Index: openacs-4/packages/survey-portlet/sql/oracle/survey-portlet-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/survey-portlet/sql/oracle/survey-portlet-drop.sql,v diff -u -r1.1 -r1.2 --- openacs-4/packages/survey-portlet/sql/oracle/survey-portlet-drop.sql 14 May 2003 21:06:59 -0000 1.1 +++ openacs-4/packages/survey-portlet/sql/oracle/survey-portlet-drop.sql 30 Sep 2003 13:11:41 -0000 1.2 @@ -43,7 +43,7 @@ end; if ds_id is not null then - portal_datasource.delete(ds_id); + portal_datasource.del(ds_id); end if; end; @@ -101,13 +101,13 @@ ); -- Drop the binding - acs_sc_binding.delete ( + acs_sc_binding.del ( contract_name => 'portal_datasource', impl_name => 'survey_portlet' ); -- drop the impl - foo := acs_sc_impl.delete ( + foo := acs_sc_impl.del ( 'portal_datasource', 'survey_portlet' ); Index: openacs-4/packages/user-profile/sql/oracle/user-profile-package-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/user-profile/sql/oracle/user-profile-package-create.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/user-profile/sql/oracle/user-profile-package-create.sql 9 Aug 2002 20:56:32 -0000 1.3 +++ openacs-4/packages/user-profile/sql/oracle/user-profile-package-create.sql 30 Sep 2003 13:11:42 -0000 1.4 @@ -32,7 +32,7 @@ creation_ip in acs_objects.creation_ip%TYPE default null ) return user_profile_rels.rel_id%TYPE; - procedure delete ( + procedure del ( rel_id in user_profile_rels.rel_id%TYPE ); @@ -83,16 +83,16 @@ return v_rel_id; end; - procedure delete ( + procedure del ( rel_id in user_profile_rels.rel_id%TYPE ) is begin delete from user_profile_rels - where rel_id = user_profile_rel.delete.rel_id; + where rel_id = user_profile_rel.del.rel_id; - membership_rel.delete(rel_id); + membership_rel.del(rel_id); end; end; Index: openacs-4/packages/user-profile/sql/oracle/user-profile-provider-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/user-profile/sql/oracle/user-profile-provider-create.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/user-profile/sql/oracle/user-profile-provider-create.sql 9 Aug 2002 20:56:32 -0000 1.3 +++ openacs-4/packages/user-profile/sql/oracle/user-profile-provider-create.sql 30 Sep 2003 13:11:42 -0000 1.4 @@ -29,6 +29,7 @@ foo := acs_sc_impl.new( impl_contract_name => 'profile_provider', impl_name => 'user_profile_provider', + impl_pretty_name => 'User profile provider', impl_owner_name => 'user_profile_provider' ); Index: openacs-4/packages/user-profile/sql/oracle/user-profile-provider-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/user-profile/sql/oracle/user-profile-provider-drop.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/user-profile/sql/oracle/user-profile-provider-drop.sql 9 Aug 2002 20:56:32 -0000 1.3 +++ openacs-4/packages/user-profile/sql/oracle/user-profile-provider-drop.sql 30 Sep 2003 13:11:42 -0000 1.4 @@ -27,7 +27,7 @@ -- drop the binding between this implementation and the interface it -- implements. - acs_sc_binding.delete( + acs_sc_binding.del( contract_name => 'profile_provider', impl_name => 'user_profile_provider' ); @@ -56,7 +56,7 @@ ); -- drop the implementation - acs_sc_impl.delete( + acs_sc_impl.del( impl_contract_name => 'profile_provider', impl_name => 'user_profile_provider' ); Index: openacs-4/packages/user-profile/sql/oracle/user-profile-sanitize.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/user-profile/sql/oracle/user-profile-sanitize.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/user-profile/sql/oracle/user-profile-sanitize.sql 9 Aug 2002 20:56:32 -0000 1.3 +++ openacs-4/packages/user-profile/sql/oracle/user-profile-sanitize.sql 30 Sep 2003 13:11:42 -0000 1.4 @@ -30,7 +30,7 @@ from rel_segments where segment_name = 'Profiled Users'; - rel_segment.delete( + rel_segment.del( segment_id => foo ); @@ -41,7 +41,7 @@ from acs_sc_impls where impl_name = 'user_profile_provider'); - profiled_group.delete( + profiled_group.del( group_id => foo );