-
-
- <% my $num_susp = $agent->num_susp_cust_main %>
-
- |
+
+
|
+% ##
+% # customer packages
+% ##
+
-
-
-
- <% my $num_inactive_pkg = $agent->num_inactive_cust_pkg %>
-
- |
-
-
-% if ( $num_inactive_pkg ) {
-
-
-% }
-inactive
-% if ( $num_inactive_pkg ) {
-
-% }
-
- |
-
-
-
-
-
- <% my $num_active_pkg = $agent->num_active_cust_pkg %>
-
- |
-
-
-% if ( $num_active_pkg ) {
-
-
-% }
-active
-% if ( $num_active_pkg ) {
-
-% }
-
- |
-
+% #my @pkg_status = FS::cust_pkg->statuses;
+% my @pkg_status = ( 'on hold', 'one-time charge', 'not yet billed',
+% qw( active suspended cancelled ) );
+% my %method = ( 'one-time charge' => 'inactive',
+% 'suspended' => 'susp',
+% 'cancelled' => 'cancel',
+% );
+% my $statuscolor = FS::cust_pkg->statuscolors;
+%
+% foreach my $status ( @pkg_status ) {
+% my $magic = exists($method{$status}) ? $method{$status} : $status;
+% $magic =~ s/ /_/g;
+% my $meth = 'num_'. $magic. '_cust_pkg';
+% ( my $label = $status ) =~ s/ / /g;
-
-
-
- <% my $num_susp_pkg = $agent->num_susp_cust_pkg %>
-
+ |
+% my $num = 0;
+% unless ( $disable_counts ) {
+
+
+ <% $num = $agent->$meth() %>
+
+ |
+% }
-
-% if ( $num_susp_pkg ) {
+% if ( $num || $disable_counts ) {
-
+
% }
-suspended
-% if ( $num_susp_pkg ) {
+<% $label %>
+% if ( $num || $disable_counts ) {
% }
|
-
-
-
-
- <% my $num_cancel_pkg = $agent->num_cancel_cust_pkg %>
-
- |
-
-
-% if ( $num_cancel_pkg ) {
-
-
-% }
-cancelled
-% if ( $num_cancel_pkg ) {
-
-% }
- |
-
+% }
|
+% ##
+% # reports
+% ##
Package Churn
Payments
Credits
A/R Aging
-
|
+% ##
+% # registration codes
+% ##
+
<% my $num_reg_code = $agent->num_reg_code %>
% if ( $num_reg_code ) {
@@ -303,6 +290,10 @@ Unused
Generate codes
|
+% ##
+% # prepaid cards
+% ##
+
<% my $num_prepay_credit = $agent->num_prepay_credit %>
% if ( $num_prepay_credit ) {
@@ -316,18 +307,32 @@ Unused
Generate cards
|
-% if ( $conf->config('ticket_system') ) {
-
+% ##
+% # ticketing
+% ##
+% if ( $conf->config('ticket_system') ) {
-% if ( $agent->ticketing_queueid ) {
-
- Queue: <% $agent->ticketing_queueid %>: <% $agent->ticketing_queue %>
+% if ( $agent->ticketing_queueid ) {
+ Queue: <% $agent->ticketing_queueid %>:
+ <% $agent->ticketing_queue %>
+
+% }
+ |
% }
+% ##
+% # currencies
+% ##
+% if ( $conf->config('currencies') ) {
+
+ <% join(' ', sort keys %{ $agent->agent_currency_hashref } ) %>
|
% }
+% ##
+% # payment gateway overrides
+% ##
@@ -344,7 +349,7 @@ Unused
? ' for '. $override->taxclass. ' only'
: ''
%>
- (delete)
+ (delete)
% }
@@ -355,6 +360,10 @@ Unused
|
+% ##
+% # configuration overrides
+% ##
+
|
@@ -381,6 +389,14 @@ Unused