%
my %search;
if ( $cgi->param('showdisabled')
|| !dbdef->table('agent')->column('disabled') ) {
%search = ();
} else {
%search = ( 'disabled' => '' );
}
my $conf = new FS::Conf;
%>
<%= 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() %>
param('showdisabled') || !dbdef->table('agent')->column('disabled') ) ? 2 : 3 %>>Agent |
Type |
Customers |
Customer packages |
Reports |
Registration codes |
Prepaid cards |
<% if ( $conf->config('ticket_system') ) { %>
Ticketing |
<% } %>
Payment Gateway Overrides |
Freq. |
Prog. |
<%
# Agent # |
# Agent |
foreach my $agent ( sort {
#$a->getfield('agentnum') <=> $b->getfield('agentnum')
$a->getfield('agent') cmp $b->getfield('agent')
} qsearch('agent', \%search ) ) {
my $cust_main_link = $p. 'search/cust_main.cgi?agentnum_on=1&'.
'agentnum='. $agent->agentnum;
my $cust_pkg_link = $p. 'search/cust_pkg.cgi?agentnum='. $agent->agentnum;
%>
<%= $agent->agentnum %> |
<% if ( dbdef->table('agent')->column('disabled')
&& !$cgi->param('showdisabled') ) { %>
<%= $agent->disabled ? 'DISABLED' : '' %> |
<% } %>
<%= $agent->agent %> |
<%= $agent->agent_type->atype %> |
|
|
Payments
Credits
A/R Aging
|
<%= 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
|
<% if ( $conf->config('ticket_system') ) { %>
<% if ( $agent->ticketing_queueid ) { %>
Queue: <%= $agent->ticketing_queueid %>: <%= $agent->ticketing_queue %>
<% } %>
|
<% } %>
<% foreach my $override (
# sort { } want taxclass-full stuff first? and default cards (empty cardtype)
qsearch('agent_payment_gateway', { 'agentnum' => $agent->agentnum } )
) {
%>
<%= $override->cardtype || 'Default' %> to <%= $override->payment_gateway->gateway_module %> (<%= $override->payment_gateway->gateway_username %>)
<%= $override->taxclass
? ' for '. $override->taxclass. ' only'
: ''
%>
(delete)
|
<% } %>
(add override) |
|
<%= $agent->freq %> |
<%= $agent->prog %> |
<% } %>