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.24 -r1.25
--- openacs-4/packages/new-portal/tcl/portal-procs-oracle.xql	24 Apr 2009 11:51:20 -0000	1.24
+++ openacs-4/packages/new-portal/tcl/portal-procs-oracle.xql	3 Sep 2024 15:37:39 -0000	1.25
@@ -27,36 +27,6 @@
         </querytext>
     </fullquery>
 
-    <fullquery name="portal::configure_dispatch.show_here_update_sk">
-        <querytext>
-            update portal_element_map
-            set region = :region,
-                page_id = :page_id,
-                sort_key = (select nvl((select max(pem.sort_key) + 1
-                                        from portal_element_map pem
-                                        where pem.page_id = :page_id
-                                        and region = :region),
-                                       1)
-                            from dual)
-            where element_id = :element_id
-        </querytext>
-    </fullquery>
-
-    <fullquery name="portal::move_element_to_page.update">
-        <querytext>
-            update portal_element_map
-            set page_id = :page_id,
-                region = :region,
-                sort_key = (select nvl((select max(sort_key) + 1
-                                        from portal_element_map
-                                        where page_id = :page_id
-                                        and region = :region),
-                                       1)
-                            from dual)
-            where element_id = :element_id
-        </querytext>
-    </fullquery>         
-
     <fullquery name="portal::add_element_to_region.template_params_insert">
         <querytext>
             insert into portal_element_parameters
@@ -76,15 +46,6 @@
         </querytext>
     </fullquery>
 
-    <fullquery name="portal::add_element_to_region.insert">
-        <querytext>
-            insert into portal_element_map
-            (element_id, name, pretty_name, page_id, datasource_id, region, sort_key)
-            values
-            (:new_element_id, :ds_name, :pretty_name, :page_id, :ds_id, :region, :sort_key)
-        </querytext>
-    </fullquery>
-
     <fullquery name="portal::add_element_param_value.insert">
         <querytext>
             insert into portal_element_parameters
@@ -99,20 +60,6 @@
         </querytext>
     </fullquery>
 
-    <fullquery name="portal::move_element.update">
-        <querytext>
-            update portal_element_map
-            set region = :target_region,
-                sort_key = (select nvl((select max(pem.sort_key) + 1
-                                        from portal_element_map pem
-                                        where page_id = :my_page_id
-                                        and region = :target_region),
-                                       1)
-                            from dual)
-            where element_id = :element_id
-        </querytext>
-    </fullquery>         
-
     <fullquery name="portal::page_create.page_create_insert">
         <querytext>
             begin
@@ -134,63 +81,4 @@
         </querytext>
     </fullquery>
 
-    <fullquery name="portal::swap_element.get_prev_sort_key">
-        <querytext>
-            select sort_key as other_sort_key,
-                   element_id as other_element_id
-            from (select pem.sort_key,
-                         element_id
-                  from portal_element_map pem,
-                       portal_pages pp
-                  where pp.portal_id = :portal_id
-                  and pem.page_id = :my_page_id
-                  and pp.page_id = pem.page_id
-                  and region = :region
-                  and pem.sort_key < :my_sort_key
-                  and state != 'pinned'
-                  order by pem.sort_key desc)
-            where rownum = 1
-        </querytext>
-    </fullquery>
-
-    <fullquery name="portal::swap_element.get_next_sort_key">
-        <querytext>
-            select sort_key as other_sort_key,
-                   element_id as other_element_id
-            from (select pem.sort_key,
-                         element_id
-                  from portal_element_map pem, portal_pages pp
-                  where pp.portal_id = :portal_id
-                  and pem.page_id = :my_page_id
-                  and pem.page_id = pp.page_id
-                  and region = :region
-                  and pem.sort_key > :my_sort_key
-                  and state != 'pinned'
-                  order by pem.sort_key)
-            where rownum = 1
-        </querytext>
-    </fullquery>
-
-    <fullquery name="portal::configure_dispatch.revert_max_page_id_select">
-        <querytext>
-            select *
-            from (select page_id
-                  from portal_pages
-                  where portal_id = :portal_id
-                  order by sort_key desc)
-            where rownum = 1
-        </querytext>
-    </fullquery>
-
-    <fullquery name="portal::configure_dispatch.revert_min_page_id_select">
-        <querytext>
-            select *
-            from (select page_id
-                  from portal_pages
-                  where portal_id = :portal_id
-                  order by sort_key)
-            where rownum = 1
-        </querytext>
-    </fullquery>
-
 </queryset>