| |
|
1 |
set my_url [ad_conn url] |
| |
|
2 |
set user_id [ad_conn user_id] |
| |
|
3 |
|
| |
|
4 |
db_multirow site_nodes site_nodes { |
| |
|
5 |
select site_node__url(node_id) as url, |
| |
|
6 |
acs_object__name(object_id) as name |
| |
|
7 |
from site_nodes |
| |
|
8 |
where parent_id = site_node__node_id(:my_url,null) |
| |
|
9 |
and object_id is not null |
| |
|
10 |
and acs_permission__permission_p( |
| |
|
11 |
object_id, |
| |
|
12 |
coalesce(:user_id, acs__magic_object_id('the_public')), |
| |
|
13 |
'read') = 't' |
| |
|
14 |
} |
| |
|
15 |
|
| |
|
16 |
set context [list] |