callback::merge::MergePackageUser::impl::notifications (private)
callback::merge::MergePackageUser::impl::notifications \ -from_user_id from_user_id -to_user_id to_user_id
Defined in packages/notifications/tcl/notification-callback-procs.tcl
Merge the notifications of two users.
- Switches:
- -from_user_id (required)
- -to_user_id (required)
- See Also:
- Partial Call Graph (max 5 caller/called nodes):
- Testcases:
- No testcase defined.
Source code: ::callback::merge::MergePackageUser::contract__arg_parser {*}$args set msg "Merging notifications" set result [list $msg] ns_log Notice $msg db_transaction { db_dml upd_notifications {} db_dml upd_map {} lappend result "Notifications merge is done" } return $resultXQL Not present: PostgreSQL, Oracle Generic XQL file: <fullquery name="callback::merge::MergePackageUser::impl::notifications.upd_notifications"> <querytext> update notifications set notif_user = :to_user_id where notif_user = :from_user_id </querytext> </fullquery> <fullquery name="callback::merge::MergePackageUser::impl::notifications.upd_map"> <querytext> update notification_user_map set user_id = :to_user_id where user_id = :from_user_id </querytext> </fullquery>packages/notifications/tcl/notification-callback-procs.xql