%
my %search;
if ( $cgi->param('showdisabled')
|| !dbdef->table('agent')->column('disabled') ) {
%search = ();
} else {
%search = ( 'disabled' => '' );
}
%>
<%= header('Agent Listing', menubar(
'Main Menu' => $p,
'Agent Types' => $p. 'browse/agent_type.cgi',
# 'Add new agent' => '../edit/agent.cgi'
)) %>
Agents are resellers of your service. Agents may be limited to a subset of your
full offerings (via their type).
Add a new agent
<% if ( dbdef->table('agent')->column('disabled') ) { %>
<%= $cgi->param('showdisabled')
? do { $cgi->param('showdisabled', 0);
'( hide disabled agents )'; }
: do { $cgi->param('showdisabled', 1);
'( show disabled agents )'; }
%>
<% } %>
<%= table() %>
<%= 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 ) { %><% } %> |