diff options
Diffstat (limited to 'httemplate/graph/money_time.cgi')
| -rw-r--r-- | httemplate/graph/money_time.cgi | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/httemplate/graph/money_time.cgi b/httemplate/graph/money_time.cgi index 166735fc6..9071fc7b9 100644 --- a/httemplate/graph/money_time.cgi +++ b/httemplate/graph/money_time.cgi @@ -8,6 +8,7 @@ 'links' => \%link, 'agentnum' => $agentnum, 'refnum' => $refnum, + 'cust_classnum'=> \@classnums, 'nototal' => scalar($cgi->param('12mo')), ) %> @@ -25,6 +26,11 @@ if ( $cgi->param('agentnum') =~ /^(\d+)$/ ) { } 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; @@ -93,6 +99,7 @@ $color{$_.'_12mo'} = $color{$_} foreach keys %color; my $ar = "agentnum=$agentnum;refnum=$refnum"; +$ar .= ";cust_classnum=$_" foreach @classnums; my %link = ( 'invoiced' => "${p}search/cust_bill.html?$ar;", |