X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fbrowse%2Fagent.cgi;h=d8c74d1fee47529d3bf1ff0dac20faea074aa781;hb=ae7a7aedd844e581638d435e432e08a76f8097d1;hp=2eef5bb918f52b9f29311cdcb62fd2617e7c151e;hpb=c58132f6a26349d09744ef2b3b235dfb7c3757f6;p=freeside.git
diff --git a/httemplate/browse/agent.cgi b/httemplate/browse/agent.cgi
index 2eef5bb91..d8c74d1fe 100755
--- a/httemplate/browse/agent.cgi
+++ b/httemplate/browse/agent.cgi
@@ -10,29 +10,6 @@
%search = ( 'disabled' => '' );
}
- #bad false laziness with search/cust_main.cgi (also needs fixing up for
- #old mysql)
- my $ncancelled = "
- 0 < ( SELECT COUNT(*) FROM cust_pkg
- WHERE cust_pkg.custnum = cust_main.custnum
- AND ( cust_pkg.cancel IS NULL
- OR cust_pkg.cancel = 0
- )
- )
- OR 0 = ( SELECT COUNT(*) FROM cust_pkg
- WHERE cust_pkg.custnum = cust_main.custnum
- )
- ";
-
- my $ncancelled_sth = dbh->prepare("SELECT COUNT(*) FROM cust_main
- WHERE agentnum = ?
- AND ( $ncancelled ) ")
- or die dbh->errstr;
-
- my $total_sth = dbh->prepare("SELECT COUNT(*) FROM cust_main
- WHERE agentnum = ? ")
- or die dbh->errstr;
-
%>
<%= header('Agent Listing', menubar(
@@ -58,6 +35,9 @@ full offerings (via their type).
param('showdisabled') || !dbdef->table('agent')->column('disabled') ) ? 2 : 3 %>>Agent |
Type |
Customers |
+ Reports |
+ Registration Codes |
+ Prepaid cards |
Freq. |
Prog. |
@@ -70,14 +50,6 @@ foreach my $agent ( sort {
$a->getfield('agent') cmp $b->getfield('agent')
} qsearch('agent', \%search ) ) {
- $ncancelled_sth->execute($agent->agentnum) or die $ncancelled_sth->errstr;
- my $num_ncancelled = $ncancelled_sth->fetchrow_arrayref->[0];
-
- $total_sth->execute($agent->agentnum) or die $total_sth->errstr;
- my $num_total = $total_sth->fetchrow_arrayref->[0];
-
- my $num_cancelled = $num_total - $num_ncancelled;
-
my $cust_main_link = $p. 'search/cust_main.cgi?agentnum_on=1&'.
'agentnum='. $agent->agentnum;
@@ -94,14 +66,57 @@ foreach my $agent ( sort {
<%= $agent->agent %> |
<%= $agent->agent_type->atype %> |
+
+
+
+
+ <%= my $num_prospect = $agent->num_prospect_cust_main %>
+
+ <% if ( $num_prospect ) { %>
+ <% } %>prospects<% if ($num_prospect ) { %><% } %>
+
+
+ <%= my $num_active = $agent->num_active_cust_main %>
+
+ <% if ( $num_active ) { %>
+ <% } %>active<% if ( $num_active ) { %><% } %>
+
+
+ <%= my $num_susp = $agent->num_susp_cust_main %>
+
+ <% if ( $num_susp ) { %>
+ <% } %>suspended<% if ( $num_susp ) { %><% } %>
+
+
+ <%= my $num_cancel = $agent->num_cancel_cust_main %>
+
+ <% if ( $num_cancel ) { %>
+ <% } %>cancelled<% if ( $num_cancel ) { %><% } %>
+ |
+
- <%= $num_ncancelled %>
- active
- <%= $num_cancelled %>
- cancelled
+ Payments
+ Credits
+
|
+
+
+ <%= my $num_reg_code = $agent->num_reg_code %>
+ <% if ( $num_reg_code ) { %>
+ <% } %>Unused<% if ( $num_reg_code ) { %><% } %>
+ Generate codes
+ |
+
+
+ <%= my $num_prepay_credit = $agent->num_prepay_credit %>
+ <% if ( $num_prepay_credit ) { %>
+ <% } %>Unused<% if ( $num_prepay_credit ) { %><% } %>
+ Generate cards
+ |
+
<%= $agent->freq %> |
<%= $agent->prog %> |
+
<% } %>