projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
1157c6c
)
fix agentnum/refnum criteria in accounting summary, #23660, apparent fallout from...
author
Mark Wells
<mark@freeside.biz>
Wed, 3 Jul 2013 19:28:05 +0000
(12:28 -0700)
committer
Mark Wells
<mark@freeside.biz>
Wed, 3 Jul 2013 19:28:05 +0000
(12:28 -0700)
httemplate/search/customer_accounting_summary.html
patch
|
blob
|
history
diff --git
a/httemplate/search/customer_accounting_summary.html
b/httemplate/search/customer_accounting_summary.html
index
b48ff21
..
c9cfa40
100644
(file)
--- a/
httemplate/search/customer_accounting_summary.html
+++ b/
httemplate/search/customer_accounting_summary.html
@@
-121,10
+121,7
@@
die "access denied"
unless $FS::CurrentUser::CurrentUser->access_right('Financial reports');
my ($agentnum,$sel_agent);
unless $FS::CurrentUser::CurrentUser->access_right('Financial reports');
my ($agentnum,$sel_agent);
-if ( $cgi->param('agentnum') eq 'all' ) {
- $agentnum = 0;
-}
-elsif ( $cgi->param('agentnum') =~ /^(\d+)$/ ) {
+if ( $cgi->param('agentnum') =~ /^(\d+)$/ ) {
$agentnum = $1;
$sel_agent = qsearchs('agent', { 'agentnum' => $agentnum } );
die "agentnum $agentnum not found!" unless $sel_agent;
$agentnum = $1;
$sel_agent = qsearchs('agent', { 'agentnum' => $agentnum } );
die "agentnum $agentnum not found!" unless $sel_agent;
@@
-177,10
+174,6
@@
my $query = FS::cust_main::Search->search(\%search_hash);
my @custs = qsearch($query);
foreach my $cust_main ( @custs ) {
my @custs = qsearch($query);
foreach my $cust_main ( @custs ) {
- # XXX should do this in the qsearch
- next unless ($status eq '' || $status eq $cust_main->status);
- next unless ($agentnum == 0 || $cust_main->agentnum eq $agentnum);
- next unless ($refnum == 0 || $cust_main->refnum eq $refnum);
push @custnames, $cust_main->name;
push @custnames, $cust_main->name;