Index: openacs-4/packages/contacts/tcl/contact-search-procs.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/tcl/contact-search-procs.xql,v diff -u -N --- openacs-4/packages/contacts/tcl/contact-search-procs.xql 23 Nov 2005 17:31:47 -0000 1.9 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,88 +0,0 @@ - - - - - - select contact_search__log(:search_id,:user_id) - - - - - - select title - from contact_searches - where search_id = :search_id - - - - - - select * - from contact_searches - where search_id = :search_id - - - - - - - select type, - var_list - from contact_search_conditions - where search_id = :search_id - - - - - - select count(distinct party_id) - from parties left join cr_items on (parties.party_id = cr_items.item_id) left join cr_revisions on (cr_items.latest_revision = cr_revisions.revision_id ) , group_distinct_member_map - where parties.party_id = group_distinct_member_map.member_id - $group_where_clause - [contact::search_clause -and -search_id $search_id -query $query -party_id "parties.party_id" -revision_id "revision_id"] - - - - - - select - distinct type - from - contact_search_conditions - where - search_id = :search_id - - - - - - select - count(object_id_one) - from - acs_rels - where - rel_type = 'contact_rels_employment' - - - - - - select title, - owner_id, - all_or_any, - object_type - from contact_searches - where search_id = :search_id - - - - - - select type, - var_list - from contact_search_conditions - where search_id = :search_id - - - -