callback::search::url::impl::forums_message (private)

 callback::search::url::impl::forums_message

Defined in packages/forums/tcl/forums-callback-procs.tcl

Author:

dave@thedesignexperience.org

Created:

2005-06-08 Returns a URL for a message to the search package.

See Also:

• callback::search::url::contract

Partial Call Graph (max 5 caller/called nodes):

Testcases:

No testcase defined.

Source code:

    ::callback::search::url::contract__arg_parser {*}$args

    set message_id $object_id
    set forum_package_id [db_string select_forums_package {
        select package_id from forums_forums
        where forum_id = (select forum_id from forums_messages
                          where message_id = :message_id)
    }]
    set forum_package_url [site_node::get_url_from_object_id -object_id $forum_package_id]
    return "[ad_url]${forum_package_url}message-view?message_id=$message_id"

XQL Not present:

PostgreSQL, Oracle

Generic XQL file:

packages/forums/tcl/forums-callback-procs.xql