notification::new (public)
notification::new [ -notification_id notification_id ] \ -type_id type_id -object_id object_id [ -response_id response_id ] \ [ -notif_subject notif_subject ] [ -notif_text notif_text ] \ [ -notif_html notif_html ] [ -subset subset ] \ [ -already_notified already_notified ] [ -action_id action_id ] \ [ -force ] [ -default_request_data default_request_data ] \ [ -return_notified ] [ -notif_user notif_user ] \ [ -notif_date notif_date ] [ -file_ids file_ids ]
Defined in packages/notifications/tcl/notification-procs.tcl
Create a new notification if any notification requests exist for the object and type.
The normal function is to send one notification per notification_request that match this notification. However, by supplying one or more of the parameters below, it's possible to notify only a subset of those people who have requested notification.
This is useful in two situations. One is when you have multiple notification types that cover the same event, for example notification for an entire forum, and for a single thread within that forum. In this situation, you typically want people to receive only one notification per event (per delivery method and interval). The 'already_notified' and 'return_notified' switches help you do this.
Another situation is when your relevant audience really depends on something dynamic in your application, such as who's assigned to a certain action in a workflow, or if you want to offer a 'notify me of all activity in all forum threads that I've posted to'. In this case, the notification type would be 'my_threads' or similar. But when you notify, you only want to notify the users who've requested this notification, and who have posted to this thread. Thus, you'll need to pass in a list of user_id's of the users who posted to the current thread in the 'subset' parameter, and only those who have both a request and are in the subset list will get notified.
A variation on this is when you want people to get notified, even if they didn't request notification. This is what the -force flag does, it causes all users in the subset to get notified, whether or not they have a notification request.
In this case, the request will use the interval, delivery method, and format as specified in the 'default_request_data' parameter. If such a parameter is not specified, default values of 'instant', 'email', and 'text' will be used. The value to 'default_request_data' should be an array list with entries interval_id, delivery_method_id, and format.
In any situation where you're doing dynamic notifications, you must supply the ID of an ACS object which is specific to the underlying event in the 'action_id' parameter. This is required for the integral functioning of dynamic recipient groups. Typically this would be the ID of a forums posting, a workflow log entry, or a web log entry.
- Switches:
- -notification_id (optional)
- -type_id (required)
- -object_id (required)
- -response_id (optional)
- -notif_subject (optional)
- -notif_text (optional)
- -notif_html (optional)
- -subset (optional)
- A list of user_id's of a subset of users who should be notified. Only those who have a notification request for this object, and who are in the subset list will get notified. Unless you specify the -force flag, in which case everybody in the subset list will get notified, whether they requested the notification or not. In this case, the 'default_request_data' will be used for these new requests.
- -already_notified (optional)
- A list of 'user_id interval_id delivery_method_id' of users already notified of this action. This is used in conjunction with the 'return_notification' boolean flag, which causes this proc to return a similar list of users notified by this call. This is used to ensure that a user is never notified twice in the same way for the same action, which could otherwise happen if you have, for example, notification requests for both an entire forum and a particular thread.
- -action_id (optional)
- If you're supplying either the 'subset' or the 'already_notified' parameter, you must also supply the action_id parameter. The action_id parameter should be the object ID of an ACS Object, and should be specific to the underlying event.
- -force (optional, boolean)
- See the 'subset' parameter.
- -default_request_data (optional)
- An array list with entries interval_id, delivery_method_id, and format, used to initialize new requests caused by the combination of the 'subset' and the 'force' parameters.
- -return_notified (optional, boolean)
- -notif_user (optional)
- -notif_date (optional)
- -file_ids (optional)
- Authors:
- Ben Adida
- Lars Pind
- Partial Call Graph (max 5 caller/called nodes):
- Testcases:
- No testcase defined.
Source code: set requests_p [notification::request::request_exists -object_id $object_id -type_id $type_id] # We're only going to do anything if there are people who have requests, # or if we have a nonempty subset and a force flag. set subset_arg_p [expr {[llength $subset] > 0}] set already_notified_arg_p [expr {[llength $already_notified] > 0}] if { ($subset_arg_p || $already_notified_arg_p) && $action_id eq "" } { error "You must supply an action_id if you have a subset or already_notified list" } # This will store the list of user_id,interval_id,delivery_method_id of notifications sent set notified_list {} if { $requests_p || ($subset_arg_p && $force_p) } { if { $subset_arg_p || $already_notified_arg_p } { # This is going to be a non-standard notification with a dynamic group of recipients # Variables: # # default_request_data: default request, if the -force switch makes us sign people up automatically # array get list of interval_id, delivery_method_id, format # # default_request: same, but as an array # # request: array, keyed by (user_id interval_id delivery_method_id) which holds # the dynamic requests which we'll need to create # # already_notified: list of "user_id interval_id delivery_method_id" of people already notified # who shouldn't be notified again # # already_notified_p: Above as an array for quick lookup, so we don't have to do a sequential scan # on the list above to find out if a given (user_id interval_id delivery_method_id) # has already been notified # if { $default_request_data eq "" } { set default_request_data [list interval_id [notification::interval::get_id_from_name -name "instant"] delivery_method_id [notification::delivery::get_id -short_name "email"] format "text"] } array set default_request $default_request_data array set request [list] # Start with the existing requests for the original object_id db_foreach select_notification_requests {} -column_array row { set "request(${row(user_id)} ${row(interval_id)} ${row(delivery_method_id)})" $row(format) } # Restructure already_notified as an array for quick lookups foreach entry $already_notified { set already_notified_p($entry) 1 } if { $subset_arg_p } { # Restructure subset as an array for quick lookups foreach user_id $subset { set subset_member_p($user_id) 1 } # Delete request that shouldn't be there foreach entry [array names request] { # if not in subset, delete # if in already_notified, delete set user_id [lindex $entry 0] if { ![info exists subset_member_p($user_id)] || [info exists already_notified_p($entry)] } { array unset request $entry } } if { $force_p } { # Add requests that should be forced foreach user_id $subset { if { [llength [array get request "$user_id,*"]] == 0 } { set entry "$user_id $default_request(interval_id) $default_request(delivery_method_id)" set request($entry) $default_request(format) } } } } else { # Get rid of users who are on the already notified list foreach entry $already_notified { # If user has already received a notification with the same # interval and delivery method, don't send again if { [info exists request($entry)] } { array unset request $entry } } } if { $return_notified_p } { set notified_list [array names request] } } else { # Normal notification if { $return_notified_p } { set notified_list [db_list_of_lists select_notified {}] } } if { $notif_user eq "" && [ns_conn isconnected] } { set notif_user [ad_conn user_id] } # Actually carry out inserting the notification db_transaction { if { $subset_arg_p || $already_notified_arg_p } { foreach entry [array names request] { lassign $entry user_id interval_id delivery_method_id set format $request($entry) notification::request::new -type_id $type_id -user_id $user_id -object_id $action_id -interval_id $interval_id -delivery_method_id $delivery_method_id -format $format -dynamic_p "t" } } # The notification below should be for the action_id object, not for the default object_id if { $subset_arg_p || $already_notified_arg_p } { set object_id $action_id } # Truncate notif_subject to the max len of 100 set notif_subject [ad_string_truncate -len 100 -- $notif_subject] # Set up the vars set extra_vars [ns_set create s notification_id $notification_id type_id $type_id object_id $object_id response_id $response_id notif_subject $notif_subject notif_text $notif_text notif_html $notif_html notif_user $notif_user file_ids $file_ids ] if { $notif_date ne "" } { ns_set put $extra_vars notif_date $notif_date } # Create the notification package_instantiate_object -extra_vars $extra_vars notification # teadams@alum.mit.edu - pl/sql has a 32K limit for parameters. # Updating the clob columns directly # to avoid this limitation. db_dml update_message {} -clobs [list $notif_html $notif_text] } } # This var will only be set if we were asked to return the list of user_ids notified return $notified_listGeneric XQL file: <fullquery name="notification::new.select_notification_requests"> <querytext> select cc.user_id, interval_id, delivery_method_id, format from notification_requests nr, cc_users cc where type_id = :type_id and nr.object_id = :object_id and nr.user_id = cc.user_id and cc.member_state = 'approved' </querytext> </fullquery> <fullquery name="notification::new.select_notified"> <querytext> select user_id, interval_id, delivery_method_id from notification_requests where type_id = :type_id and object_id = :object_id </querytext> </fullquery>packages/notifications/tcl/notification-procs.xql
PostgreSQL XQL file: <fullquery name="notification::new.update_message"> <querytext> update notifications set notif_html = :notif_html, notif_text = :notif_text where notification_id = :notification_id </querytext> </fullquery>packages/notifications/tcl/notification-procs-postgresql.xql
Oracle XQL file: <fullquery name="notification::new.update_message"> <querytext> update notifications set notif_html = empty_clob(), notif_text = empty_clob() where notification_id = :notification_id returning notif_html, notif_text into :1, :2 </querytext> </fullquery>packages/notifications/tcl/notification-procs-oracle.xql