postgresql7.1
select bboard_forum__forum_p(:forum_id);
select bboard_forum__new (
:forum_id,
:short_name,
:charter,
:moderated_p,
:bboard_id,
:context_id,
now(),
:creation_user,
:creation_ip,
'bboard_forum'
);
select bboard_forum__set_attrs (
:forum_id,
:short_name,
:charter,
:moderated_p,
:bboard_id
);
select bboard_category__category_p(:category_id);
select bboard_category__new (
:category_id,
:short_name,
:description,
:forum_id,
null,
now(),
null,
null,
'bboard_category'
);
select bboard_category__set_attrs (
:category_id,
:short_name,
:description,
:forum_id
);
select bboard_message__new (
:message_id,
:reply_to,
:sent_date,
:sender,
null, -- rfc822_id
:title,
:mime_type,
null, -- text
null, -- data
:context_id,
now(),
:creation_user,
:creation_ip,
'acs_message'
);
update cr_revisions
set content = :content
where revision_id = :revision_id
select bboard_message__set_attrs (
:message_id,
:reply_to,
:sent_date,
:sender,
:title,
:mime_type,
:context_id
);
update cr_revisions
set content = :content
where revision_id = :revision_id
select bboard_message__clear_categories ( :message_id );
select bboard_message__add_category (
:message_id,
:category_id
);
select bboard_message__remove_category (
:message_id,
:category_id
);
select bboard_message__set_status (
:message_id,
:forum_id,
:status
);
select bboard_forum__subscribe (
:forum_id,
:subscriber_id
);
select bboard_category__subscribe (
:category_id,
:subscriber_id
);
select bboard_message__subscribe (
:thread_id,
:subscriber_id
);
select count(*) as subscribed_p from bboard_thread_subscribers
where subscriber_id = :user_id
and thread_id in
(select message_id
from acs_messages b
where tree_sortkey like
(select tree_sortkey
from acs_messages
where message_id = :message_id) || '%')
select bboard_forum__forum_containing_message(:message_id) as forum_id
select acs_message__first_ancestor(:message_id) as ancestor_id
select acs_message__new_image (
:message_id,
:file_id,
:short_filename,
:title,
null, -- description
:mime_type,
null, -- content
:width,
:height,
now(),
:user_id,
:creation_ip,
't' -- is_live
);
select content_item__get_latest_revision(:file_id) as revision_id
update cr_revisions
set content = :content
where revision_id = :revision_id
select acs_message__new_file (
:message_id,
:file_id,
:short_filename,
:title,
null, -- description
:mime_type,
null, -- content
now(),
:user_id,
:creation_ip,
't' -- is_live
);
select content_item__get_latest_revision(:file_id) as revision_id
update cr_revisions
set content = :content
where revision_id = :revision_id
select image_id
from images
where image_id = content_item__get_latest_revision(:file_id)
select acs_message__delete_image(:file_id);
select acs_message__delete_file(:file_id);
update cr_items
set latest_revision=null, live_revision=null
where item_id in
(select object_id as message_id
from acs_objects
where object_type = 'acs_message'
and object_id not in (select message_id
from bboard_forum_message_map));
declare
message_rec record;
begin
for message_rec in
select object_id as message_id
from acs_objects
where object_type = 'acs_message'
and object_id not in (select message_id
from bboard_forum_message_map)
loop
perform bboard_message__remove(message_rec.message_id);
end loop;
return 0;
end;
select subscriber_id as recipient_id, thread_id as grouping_id,
now() as wait_until
from bboard_thread_subscribers s
where s.thread_id in
(select message_id from acs_messages
where tree_sortkey like
(select substring(tree_sortkey from 0 for 4) || '%'
from acs_messages
where message_id = :message_id))
and s.subscriber_id in (select party_id
from acs_object_party_privilege_map
where object_id = :message_id
and privilege = 'bboard_read_message')
select s.subscriber_id as recipient_id, s.category_id as grouping_id,
now() as wait_until
from bboard_category_subscribers s, bboard_category_message_map m
where m.message_id = :message_id
and s.category_id = m.category_id
and s.subscriber_id in (select party_id
from acs_object_party_privilege_map
where object_id = :message_id
and privilege = 'bboard_read_message')
select s.subscriber_id as recipient_id, s.forum_id as grouping_id,
now() as wait_until
from bboard_forum_subscribers s, bboard_forum_message_map m
where m.message_id = :message_id
and s.forum_id = m.forum_id
and s.subscriber_id in (select party_id
from acs_object_party_privilege_map
where object_id = :message_id
and privilege = 'bboard_read_message')