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):
%3 db_dml db_dml (public) db_transaction db_transaction (public) callback::merge::MergePackageUser::impl::notifications callback::merge::MergePackageUser::impl::notifications callback::merge::MergePackageUser::impl::notifications->db_dml callback::merge::MergePackageUser::impl::notifications->db_transaction

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 $result
XQL 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

[ hide source ] | [ make this the default ]
Show another procedure: