Index: openacs-4/packages/acs-subsite/www/permissions/one-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/permissions/one-oracle.xql,v diff -u -N -r1.8 -r1.8.2.1 --- openacs-4/packages/acs-subsite/www/permissions/one-oracle.xql 20 Jun 2018 09:56:19 -0000 1.8 +++ openacs-4/packages/acs-subsite/www/permissions/one-oracle.xql 26 Oct 2022 14:20:35 -0000 1.8.2.1 @@ -22,6 +22,25 @@ + + +select count(*) from ( + select grantee_id, grantee_name, privilege + from (select grantee_id, acs_object.name(grantee_id) as grantee_name, + privilege, 1 as counter + from acs_permissions_all + where object_id = :object_id + union all + select grantee_id, acs_object.name(grantee_id) as grantee_name, + privilege, -1 as counter + from acs_permissions + where object_id = :object_id ) + group by grantee_id, grantee_name, privilege + having sum(counter) > 0 +) as counts + + +