callback::merge::MergeShowUserInfo::impl::notifications (private)

 callback::merge::MergeShowUserInfo::impl::notifications \
    -user_id user_id

Defined in packages/notifications/tcl/notification-callback-procs.tcl

Show the notifications of user_id

Switches:

-user_id

(required)

See Also:

• callback::merge::MergeShowUserInfo::contract

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

Testcases:

No testcase defined.

Source code:

    ::callback::merge::MergeShowUserInfo::contract__arg_parser {*}$args

    set result [list "Notifications of $user_id"]
    set user_notifications [db_list_of_lists user_notification {}]
    lappend result $user_notifications
    return $result

XQL Not present:

PostgreSQL, Oracle

Generic XQL file:

<fullquery name="callback::merge::MergeShowUserInfo::impl::notifications.user_notification">
    <querytext>	
          select notification_id, notif_subject
          from notifications
          where notif_user  = :user_id
        </querytext>
</fullquery>

packages/notifications/tcl/notification-callback-procs.xql