Index: openacs-4/packages/acs-messaging/tcl/acs-messaging-procs-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-messaging/tcl/acs-messaging-procs-oracle.xql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/acs-messaging/tcl/acs-messaging-procs-oracle.xql 1 Jun 2001 13:02:40 -0000 1.2 +++ openacs-4/packages/acs-messaging/tcl/acs-messaging-procs-oracle.xql 20 Nov 2017 13:34:01 -0000 1.3 @@ -3,22 +3,6 @@ oracle8.1.6 - - - - insert into acs_messages_outgoing - (message_id, to_address, grouping_id, wait_until) - select :m__message_id, p.email, q.grouping_id, - nvl(q.wait_until, SYSDATE) as wait_until - from ($query) q, parties p - where not exists (select 1 from acs_messages_outgoing o - where o.message_id = :m__message_id - and p.email = o.to_address) - and p.party_id = q.recipient_id - - - - @@ -28,7 +12,6 @@ - @@ -38,47 +21,4 @@ - - - - - insert into acs_messages_outgoing - (message_id, to_address, grouping_id, wait_until) - select :m__message_id, p.email, q.grouping_id, - nvl(q.wait_until, SYSDATE) as wait_until - from ($query) q, parties p - where not exists (select 1 from acs_messages_outgoing o - where o.message_id = :m__message_id - and p.email = o.to_address) - and p.party_id = q.recipient_id - - - - - - - - - select o.message_id as sending_message_id, - o.to_address as recip_email, - p.email as sender_email, - to_char(m.sent_date, 'Dy, DD Mon YYYY HH24:MI:SS') as sent_date, - m.rfc822_id, - m.title, - m.mime_type, - m.content, - m2.rfc822_id as in_reply_to - from acs_messages_outgoing o, - acs_messages_all m, - acs_messages_all m2, - parties p - where o.message_id = m.message_id - and m2.message_id(+) = m.reply_to - and p.party_id = m.sender - and wait_until <= sysdate - - - - -