From 7c4eb4229c042d1dddf97108278b99fa2c39a953 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Thu, 3 Dec 2009 19:22:59 +0000
Subject: [PATCH] average per cust_pkg option for peter

---
 httemplate/graph/cust_bill_pkg.cgi | 12 +++++++-----
 1 file changed, 7 insertions(+), 5 deletions(-)

diff --git a/httemplate/graph/cust_bill_pkg.cgi b/httemplate/graph/cust_bill_pkg.cgi
index 2346d9416..ccd41b8a9 100644
--- a/httemplate/graph/cust_bill_pkg.cgi
+++ b/httemplate/graph/cust_bill_pkg.cgi
@@ -1,5 +1,5 @@
 <% include('elements/monthly.html',
-                'title'        => $title. 'Sales Report (Gross)',
+                'title'        => $title,
                 'graph_type'   => 'Mountain',
                 'items'        => \@items,
                 'params'       => \@params,
@@ -21,6 +21,10 @@ die "access denied"
 my $link = "${p}search/cust_bill_pkg.cgi?nottax=1;include_comp_cust=1";
 my $bottom_link = "$link;";
 
+my $use_override         = $cgi->param('use_override')         ? 1 : 0;
+my $use_usage            = $cgi->param('use_usage')            ? 1 : 0;
+my $average_per_cust_pkg = $cgi->param('average_per_cust_pkg') ? 1 : 0;
+
 #XXX or virtual
 my( $agentnum, $sel_agent ) = ('', '');
 if ( $cgi->param('agentnum') =~ /^(\d+)$/ ) {
@@ -30,6 +34,8 @@ if ( $cgi->param('agentnum') =~ /^(\d+)$/ ) {
   die "agentnum $agentnum not found!" unless $sel_agent;
 }
 my $title = $sel_agent ? $sel_agent->agent.' ' : '';
+$title .= 'Sales Report (Gross)';
+$title .= ', average per customer package'  if $average_per_cust_pkg;
 
 #classnum (here)
 # 0: all classes
@@ -68,10 +74,6 @@ if ( $cgi->param('classnum') =~ /^(\d*)$/ ) {
 }
 #eslaf
 
-my $use_override         = $cgi->param('use_override')         ? 1 : 0;
-my $use_usage            = $cgi->param('use_usage')            ? 1 : 0;
-my $average_per_cust_pkg = $cgi->param('average_per_cust_pkg') ? 1 : 0;
-
 my $hue = 0;
 #my $hue_increment = 170;
 #my $hue_increment = 145;
-- 
2.11.0