X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fsearch%2Fcust_pkg.cgi;h=ee4c82d8e24e041d320bb0101292189703941a3f;hb=df9864e8fa039c889005c01b05489fde8c836784;hp=13d0c7af8c89e6a17c911c3d85b252f11f0c2301;hpb=04a69f9d197efee6fa396bd35d04ae553e669978;p=freeside.git diff --git a/httemplate/search/cust_pkg.cgi b/httemplate/search/cust_pkg.cgi index 13d0c7af8..ee4c82d8e 100755 --- a/httemplate/search/cust_pkg.cgi +++ b/httemplate/search/cust_pkg.cgi @@ -39,8 +39,9 @@ shift->part_pkg->option('setup_fee'), ); }, - sub { sprintf( $money_char.'%.2f', - shift->part_pkg->base_recur + sub { my $c = shift; + sprintf( $money_char.'%.2f', + $c->part_pkg->base_recur($c) ); }, sub { #shift->part_pkg->freq_pretty; @@ -157,14 +158,26 @@ my $money_char = $conf->config('money_char') || '$'; # my %part_pkg = map { $_->pkgpart => $_ } qsearch('part_pkg', {}); - my %search_hash = (); +my %search_hash = (); + +#some false laziness w/misc/bulk_change_pkg.cgi - $search_hash{'query'} = $cgi->keywords; +$search_hash{'query'} = $cgi->keywords; - for my $param (qw(agentnum magic status classnum pkgpart custom)) { - $search_hash{$param} = $cgi->param($param) - if $cgi->param($param); - } +for (qw( agentnum custnum magic status classnum custom cust_fields )) { + $search_hash{$_} = $cgi->param($_) if $cgi->param($_); +} + +$search_hash{'pkgpart'} = [ $cgi->param('pkgpart') ]; + +for my $param ( qw(censustract) ) { + $search_hash{$param} = $cgi->param($param) || '' + if ( grep { /$param/ } $cgi->param ); +} + +my @report_option = $cgi->param('report_option') + if $cgi->param('report_option'); +$search_hash{report_option} = join(',', @report_option) if @report_option; ### # parse dates @@ -191,7 +204,7 @@ foreach my $field (qw( setup last_bill bill adjourn susp expire cancel )) { } -my $sql_query = FS::cust_pkg->search_sql(\%search_hash); +my $sql_query = FS::cust_pkg->search(\%search_hash); my $count_query = delete($sql_query->{'count_query'}); my $show = $curuser->default_customer_view =~ /^(jumbo|packages)$/