X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=httemplate%2Fview%2Fsvc_acct.cgi;h=1322a69fd1f1a9382cb9923caa2917b69d06afbc;hb=049da6c538c952f938af4544a07c688b89c26a17;hp=78c3a3809dc08a5645513f3761b4dbe9a4d7477b;hpb=cf8b6e93f3e4e024be25e19abae9f8819fc86435;p=freeside.git diff --git a/httemplate/view/svc_acct.cgi b/httemplate/view/svc_acct.cgi index 78c3a3809..1322a69fd 100755 --- a/httemplate/view/svc_acct.cgi +++ b/httemplate/view/svc_acct.cgi @@ -45,8 +45,7 @@ function areyousure(href) { <%= header('Account View', menubar( ( ( $pkgnum || $custnum ) - ? ( "View this package (#$pkgnum)" => "${p}view/cust_pkg.cgi?$pkgnum", - "View this customer (#$custnum)" => "${p}view/cust_main.cgi?$custnum", + ? ( "View this customer (#$custnum)" => "${p}view/cust_main.cgi?$custnum", ) : ( "Cancel this (unaudited) account" => "javascript:areyousure(\'${p}misc/cancel-unaudited.cgi?$svcnum\')" ) @@ -57,7 +56,9 @@ function areyousure(href) { <% #if ( $cust_pkg && $cust_pkg->part_pkg->plan eq 'sqlradacct_hour' ) { -if ( $part_svc->part_export('sqlradius') ) { +if ( $part_svc->part_export('sqlradius') + || $part_svc->part_export('sqlradius_withdomain') +) { my $last_bill; my %plandata; @@ -92,8 +93,9 @@ if ( $part_svc->part_export('sqlradius') ) { } if ( $cust_pkg ) { - print ' since last bill ('. time2str("%C", $last_bill). ') - '. - $plandata{recur_included_hours}. ' total hours in plan
'; + print ' since last bill ('. time2str("%C", $last_bill). ')'. + print ' - '. $plandata{recur_included_hours}. ' total hours in plan
' + if length($plandata{recur_included_hours}); } else { print ' (no billing cycle available for unaudited account)
'; } @@ -101,12 +103,57 @@ if ( $part_svc->part_export('sqlradius') ) { print 'Input: '. sprintf("%.3f", $input). ' megabytes
'; print 'Output: '. sprintf("%.3f", $output). ' megabytes
'; + my $href = qq!all sessions!; + print '
'; } #print qq!
Send account information!; +%> + +<% + my @part_svc = (); + if ( $pkgnum ) { + @part_svc = grep { $_->svcdb eq 'svc_acct' + && $_->svcpart != $part_svc->svcpart } + $cust_pkg->available_part_svc; + } else { + @part_svc = qsearch('part_svc', { + svcdb => 'svc_acct', + disabled => '', + svcpart => { op=>'!=', value=>$part_svc->svcpart }, + } ); + } + if ( @part_svc ) { +%> + +
+ + + + +
+<% } %> + +<% + print qq!Edit this information
!. &ntable("#cccccc"). ''. &ntable("#cccccc",2). "Service number".