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 -N -r1.24.8.1 -r1.24.8.2
--- openacs-4/packages/new-portal/tcl/portal-procs-oracle.xql 8 Jan 2020 11:55:18 -0000 1.24.8.1
+++ openacs-4/packages/new-portal/tcl/portal-procs-oracle.xql 5 Oct 2021 10:17:27 -0000 1.24.8.2
@@ -81,63 +81,4 @@
-
-
- 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
-
-
-
-
-
- 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
-
-
-
-
-
- select *
- from (select page_id
- from portal_pages
- where portal_id = :portal_id
- order by sort_key desc)
- where rownum = 1
-
-
-
-
-
- select *
- from (select page_id
- from portal_pages
- where portal_id = :portal_id
- order by sort_key)
- where rownum = 1
-
-
-