From 2f91e1d377e1e03f567ea1ec6bcd9fab0bedff5e Mon Sep 17 00:00:00 2001 From: ivan Date: Thu, 17 Oct 2002 15:05:55 +0000 Subject: [PATCH] UI change for hour info --- httemplate/view/svc_acct.cgi | 70 ++++++++++++++++++++++---------------------- 1 file changed, 35 insertions(+), 35 deletions(-) diff --git a/httemplate/view/svc_acct.cgi b/httemplate/view/svc_acct.cgi index d50241d40..c79f71f5d 100755 --- a/httemplate/view/svc_acct.cgi +++ b/httemplate/view/svc_acct.cgi @@ -56,6 +56,41 @@ function areyousure(href) { <% +#if ( $cust_pkg && $cust_pkg->part_pkg->plan eq 'sqlradacct_hour' ) { +if ( $part_svc->part_export('sqlradius') ) { + + my $last_bill; + if ( $cust_pkg ) { + #false laziness w/httemplate/edit/part_pkg... this stuff doesn't really + #belong in plan data + my %plandata = map { /^(\w+)=(.*)$/; ( $1 => $2 ); } + split("\n", $cust_pkg->part_pkg->plandata ); + + $last_bill = $cust_pkg->last_bill; + } else { + $last_bill = 0; + } + + my $seconds = $svc_acct->seconds_since_sqlradacct( $last_bill, time ); + my $h = int($seconds/3600); + my $m = int( ($seconds%3600) / 60 ); + my $s = $seconds%60; + + if ( $seconds ) { + print "Online $hh $mm $ss"; + } else { + print 'Has not logged on'; + } + + if ( $cust_pkg ) { + print ' this billing cycle (since '. time2str(%C, $last_bill). ') - '. + $plandata{recur_included_hours}. ' total hours in plan

'; + } else { + print ' (no billing cycle available for unaudited package)

'; + } + +} + #print qq!
Send account information!; print qq!Edit this information
!. @@ -146,41 +181,6 @@ print 'RADIUS groups'. print '

'; -#if ( $cust_pkg && $cust_pkg->part_pkg->plan eq 'sqlradacct_hour' ) { -if ( $part_svc->part_export('sqlradius') ) { - - my $last_bill; - if ( $cust_pkg ) { - #false laziness w/httemplate/edit/part_pkg... this stuff doesn't really - #belong in plan data - my %plandata = map { /^(\w+)=(.*)$/; ( $1 => $2 ); } - split("\n", $cust_pkg->part_pkg->plandata ); - - $last_bill = $cust_pkg->last_bill; - } else { - $last_bill = 0; - } - - my $seconds = $svc_acct->seconds_since_sqlradacct( $last_bill, time ); - my $h = int($seconds/3600); - my $m = int( ($seconds%3600) / 60 ); - my $s = $seconds%60; - - if ( $seconds ) { - print "Online ${h}h ${m}m ${s}s"; - } else { - print 'Has not logged on'; - } - - if ( $cust_pkg ) { - print ' this billing cycle (since '. time2str(%C, $last_bill). ') - '. - $plandata{recur_included_hours}. ' total hours in plan

'; - } else { - print ' (no billing cycle available for unaudited package)

'; - } - -} - print join("\n", $conf->config('svc_acct-notes') ). '

'. joblisting({'svcnum'=>$svcnum}, 1). ''; -- 2.11.0