Skip to content

I
intranet-core
Commit 11d62255 authored by Frank Bergmann's avatar Frank Bergmann
Browse files
Options

- added cc_users.member_state = approved to list 

  of random employee portraits
parent 242657f4
Hide whitespace changes
Inline Side-by-side
Showing with 4 additions and 1 deletion
tcl/intranet-portrait-procs.tcl
View file @ 11d62255
...@@ -49,9 +49,12 @@ ad_proc -public im_random_employee_component { } { ...@@ -49,9 +49,12 @@ ad_proc -public im_random_employee_component { } {
acs_rels a, acs_rels a,
cr_items c, cr_items c,
im_profiles p, im_profiles p,
group_distinct_member_map m group_distinct_member_map m,
cc_users u
where where
a.object_id_two = c.item_id a.object_id_two = c.item_id
and a.object_id_one = u.user_id
and u.member_state = 'approved'
and a.rel_type = 'user_portrait_rel' and a.rel_type = 'user_portrait_rel'
and m.member_id = a.object_id_one and m.member_id = a.object_id_one
and m.group_id = p.profile_id and m.group_id = p.profile_id
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment