Index: openacs-4/packages/dotlrn/www/register-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/Attic/register-oracle.xql,v diff -u -N --- openacs-4/packages/dotlrn/www/register-oracle.xql 29 May 2003 18:05:01 -0000 1.2 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,42 +0,0 @@ - - - - oracle8.1.6 - - - - - select parties.email, - decode(acs_objects.object_type, - 'user', - (select first_names - from persons - where person_id = parties.party_id), - 'group', - (select group_name - from groups - where group_id = parties.party_id), - 'rel_segment', - (select segment_name - from rel_segments - where segment_id = parties.party_id), - '') as first_names, - decode(acs_objects.object_type, - 'user', - (select last_name - from persons - where person_id = parties.party_id), - '') as last_name - from party_approved_member_map, - parties, - acs_objects - where party_approved_member_map.party_id = $segment_id - and party_approved_member_map.member_id <> $segment_id - and party_approved_member_map.member_id = parties.party_id - and parties.party_id = acs_objects.object_id - - - - - - Index: openacs-4/packages/dotlrn/www/register-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/Attic/register-postgresql.xql,v diff -u -N --- openacs-4/packages/dotlrn/www/register-postgresql.xql 29 May 2003 18:05:01 -0000 1.2 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,43 +0,0 @@ - - - - postgresql7.1 - - - - - select parties.email, - case acs_objects.object_type - when 'user' then - (select first_names - from persons - where person_id = parties.party_id) - when 'group' then - (select group_name - from groups - where group_id = parties.party_id) - when 'rel_segment' then - (select segment_name - from rel_segments - where segment_id = parties.party_id) - else '' - end as first_names, - case acs_objects.object_type - when 'user' then - (select last_name - from persons - where person_id = parties.party_id) - else '' - end as last_name - from party_approved_member_map, - parties, - acs_objects - where party_approved_member_map.party_id = $segment_id - and party_approved_member_map.member_id <> $segment_id - and party_approved_member_map.member_id = parties.party_id - and parties.party_id = acs_objects.object_id - - - - - Index: openacs-4/packages/dotlrn/www/register.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/register.xql,v diff -u -N -r1.2 -r1.3 --- openacs-4/packages/dotlrn/www/register.xql 4 Dec 2002 09:51:04 -0000 1.2 +++ openacs-4/packages/dotlrn/www/register.xql 29 May 2018 08:44:11 -0000 1.3 @@ -19,4 +19,41 @@ + + + + select parties.email, + case acs_objects.object_type + when 'user' then + (select first_names + from persons + where person_id = parties.party_id) + when 'group' then + (select group_name + from groups + where group_id = parties.party_id) + when 'rel_segment' then + (select segment_name + from rel_segments + where segment_id = parties.party_id) + else '' + end as first_names, + case acs_objects.object_type + when 'user' then + (select last_name + from persons + where person_id = parties.party_id) + else '' + end as last_name + from party_approved_member_map, + parties, + acs_objects + where party_approved_member_map.party_id = :segment_id + and party_approved_member_map.member_id <> :segment_id + and party_approved_member_map.member_id = parties.party_id + and parties.party_id = acs_objects.object_id + + + +