diff options
| author | Christopher Burger <burgerc@freeside.biz> | 2019-02-05 12:09:46 -0500 |
|---|---|---|
| committer | Christopher Burger <burgerc@freeside.biz> | 2019-02-05 12:09:46 -0500 |
| commit | 1fe87434632f2627de487ca2aed6cfadea2c6061 (patch) | |
| tree | 12070f532ffbde1cf5156433db6fc8b32ac9ae81 /httemplate | |
| parent | 9a74b15fe926c37f00added2d034d34bf6c95d7f (diff) | |
RT# 82094 - updated UI for bulk emailing from advanced customer reports
Diffstat (limited to 'httemplate')
| -rw-r--r-- | httemplate/misc/email-customers.html | 13 | ||||
| -rwxr-xr-x | httemplate/search/cust_main.html | 7 |
2 files changed, 15 insertions, 5 deletions
diff --git a/httemplate/misc/email-customers.html b/httemplate/misc/email-customers.html index b631165dc..cf3ab1b48 100644 --- a/httemplate/misc/email-customers.html +++ b/httemplate/misc/email-customers.html @@ -372,6 +372,15 @@ if ( !$cgi->param('preview') ) { $body ||= $content->body; } + my $sql_query = "FS::$table"->search(\%search); + my $count_query = delete($sql_query->{'count_query'}); + my $count_sth = dbh->prepare($count_query) + or die "Error preparing $count_query: ". dbh->errstr; + $count_sth->execute + or die "Error executing $count_query: ". $count_sth->errstr; + my $count_arrayref = $count_sth->fetchrow_arrayref; + $num_cust = $count_arrayref->[0]; + } else { my @checked_email_dest; @@ -520,8 +529,8 @@ if ( my @in_classnums = $cgi->param('classnums') ) { $dest_ischecked{message} = 1 unless %dest_ischecked; my @optin_checkboxes = ( - [ 'message' => { label => 'Message recipients' } ], - [ 'invoice' => { label => 'Invoice recipients' } ], + [ 'message' => { label => 'Message recipients', desc => 'send this notice to all message recipients for the '.$num_cust.' selected customers.' } ], + [ 'invoice' => { label => 'Invoice recipients', desc => 'send this notice to all invoice recipients for the '.$num_cust.' selected customers.' } ], ); my @classnum_checkboxes = ( [ '0' => { label => '(None)' }], diff --git a/httemplate/search/cust_main.html b/httemplate/search/cust_main.html index f6c6c62d8..4c7fa14aa 100755 --- a/httemplate/search/cust_main.html +++ b/httemplate/search/cust_main.html @@ -155,9 +155,10 @@ if ( $FS::CurrentUser::CurrentUser->access_right('Bulk send customer notices') ) $uri->query_form( \%query_hash ); my $query = $uri->query; - push @$menubar, emt('Email a notice to these customers') => - "${p}misc/email-customers.html?table=cust_main&$query", - + push @$menubar, emt('Email a notice to these customers message recipients') => + "${p}misc/email-customers.html?table=cust_main&classnums=message&$query"; + push @$menubar, emt('Email a notice to these customers invoice recipients') => + "${p}misc/email-customers.html?table=cust_main&classnums=invoice&$query"; } </%init> |