projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
select multiple package classes (or report classes) on sales report, RT#24776
[freeside.git]
/
httemplate
/
graph
/
money_time.cgi
diff --git
a/httemplate/graph/money_time.cgi
b/httemplate/graph/money_time.cgi
index
166735f
..
9071fc7
100644
(file)
--- a/
httemplate/graph/money_time.cgi
+++ b/
httemplate/graph/money_time.cgi
@@
-8,6
+8,7
@@
'links' => \%link,
'agentnum' => $agentnum,
'refnum' => $refnum,
'links' => \%link,
'agentnum' => $agentnum,
'refnum' => $refnum,
+ 'cust_classnum'=> \@classnums,
'nototal' => scalar($cgi->param('12mo')),
)
%>
'nototal' => scalar($cgi->param('12mo')),
)
%>
@@
-25,6
+26,11
@@
if ( $cgi->param('agentnum') =~ /^(\d+)$/ ) {
}
my $agentname = $agent ? $agent->agent.' ' : '';
}
my $agentname = $agent ? $agent->agent.' ' : '';
+my @classnums;
+if ( $cgi->param('cust_classnum') ) {
+ @classnums = grep /^\d+$/, $cgi->param('cust_classnum');
+}
+
my( $refnum, $part_referral ) = ('', '');
if ( $cgi->param('refnum') =~ /^(\d+)$/ ) {
$refnum = $1;
my( $refnum, $part_referral ) = ('', '');
if ( $cgi->param('refnum') =~ /^(\d+)$/ ) {
$refnum = $1;
@@
-93,6
+99,7
@@
$color{$_.'_12mo'} = $color{$_}
foreach keys %color;
my $ar = "agentnum=$agentnum;refnum=$refnum";
foreach keys %color;
my $ar = "agentnum=$agentnum;refnum=$refnum";
+$ar .= ";cust_classnum=$_" foreach @classnums;
my %link = (
'invoiced' => "${p}search/cust_bill.html?$ar;",
my %link = (
'invoiced' => "${p}search/cust_bill.html?$ar;",