oracle8.1.6
update forums_messages
set forum_id = :forum_id,
tree_sortkey = tree.increment_key(:max_tree_sortkey)
where message_id = $message(message_id)
select message_id, substr(tree_sortkey, 7, length(tree_sortkey)) as child_tree_sortkey
from forums_messages
where forum_id = $message(forum_id) and tree_sortkey between tree.left('$message(tree_sortkey)') and tree.right ('$message(tree_sortkey)')
order by tree_sortkey desc
update forums_forums
set thread_count = :thread_count + 1, approved_thread_count = :approved_thread_count + 1, max_child_sortkey = tree.increment_key(max_child_sortkey), last_post = (select max(last_child_post)
from forums_messages
where forum_id = :forum_id)
where forum_id = :forum_id
update forums_messages
set forum_id = :forum_id, tree_sortkey = '000000'
where message_id = $message(message_id)