},
&>
</div>
-% if ($send_to_domain) {
+% if ($send_to_domain && $cgi->param('custnum')) {
<div>
<INPUT TYPE="checkbox" NAME="emailtovoice" ID="emailtovoice" VALUE="ON" onclick="toggleDiv(this)">Email to voice
</div>
@search{keys %search} = map { /\0/ ? [ split /\0/, $_ ] : $_ } values %search;
}
+# rebuild contacts hash
+delete $search{contacts}
+ if exists $search{contacts} && ref $search{contacts};
+$search{'contacts'} = {
+ map { $_ => $search{$_}, }
+ grep { /^(contacts_*)/ && $search{$_} }
+ keys %search
+};
+
&{$opt{'post_search_hook'}}(
'conf' => $conf,
'search' => \%search,
my $classnum_url_part;
if (@classnum) {
- $classnum_url_part = join '', map{ "&classnums=$_" } @classnum, @dest;
+ $classnum_url_part = join '', map{ "&classnums=$_" } @classnum;
$classnum_url_part .= '&classnums=0' if $classnum_null;
}
+my $dest_url_part;
+if (@dest) {
+ $dest_url_part = join '', map{ "&dest=$_" } @dest;
+}
+
# E-mail pipeline, from email-customers.html through to email queue job,
# doesn't support cust_prospect table
my $send_email_link = undef;
'&refnum=1'.
'&with_email=on'.
$classnum_url_part.
+ $dest_url_part.
"\">Email a notice to these customers</a>";
}
# URI::query_from does not support hashref
# results in: ...&contacts=HASH(0x55e16cb81da8)&...
my %query_hash = %search_hash;
+ foreach (keys %{$query_hash{contacts}}) { $query_hash{$_} = $query_hash{contacts}{$_}; }
+
delete $query_hash{contacts}
if exists $query_hash{contacts} && ref $query_hash{contacts};