Index: openacs-4/packages/notifications/tcl/sweep-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/tcl/sweep-procs-oracle.xql,v
diff -u -N -r1.20 -r1.21
--- openacs-4/packages/notifications/tcl/sweep-procs-oracle.xql	27 Mar 2010 14:26:47 -0000	1.20
+++ openacs-4/packages/notifications/tcl/sweep-procs-oracle.xql	7 Aug 2017 23:48:13 -0000	1.21
@@ -57,4 +57,15 @@
         </querytext>
     </fullquery>
 
+    <fullquery name="notification::sweep::cleanup_notifications.select_invalid_request_ids">
+        <querytext>
+         select request_id
+          from notification_requests
+          where not exists (select 1 from acs_object_party_privilege_map ppm 
+                             where ppm.object_id = notification_requests.object_id
+                               and ppm.privilege = 'read'
+                               and ppm.party_id = notification_requests.user_id)
+        </querytext>
+    </fullquery>
+
 </queryset>