ad_page_contract { @author yon (yon@openforce.net) @creation-date 2002-05-13 @cvs-id $Id: index.tcl,v 1.7 2002/09/10 22:22:30 jeffd Exp $ } -query { {orderby "send_date*,subject"} } -properties { title:onevalue context:onevalue table:onevalue } set package_id [ad_conn package_id] permission::require_permission -object_id $package_id -privilege admin set title [bulk_mail::pretty_name] set context [list All] set table_def { {send_date {Send Date} {bulk_mail_messages.send_date $order} {
No bulk mail messages to display.} \ -Torderby $orderby \ -Ttable_extra_html {width="95%"} \ select_bulk_mail_messages \ $sql \ $table_def \ ] ad_return_template