<% include("/elements/header.html","$action Agent", menubar( 'View all agents' => $p. 'browse/agent.cgi', )) %> <% include('/elements/error.html') %>

Agent #<% $agent->agentnum ? $agent->agentnum : "(NEW)" %> % if ( $conf->exists('selfservice-agent_login') ) { % } else { % } % if ( $conf->exists('agent-invoice_template') ) { <% include('/elements/tr-select-invoice_template.html', 'label' => 'Invoice template', 'field' => 'invoice_template', 'curr_value' => $agent->invoice_template, ) %> % } else { % } % if ( $conf->config('ticket_system') ) { % my $default_queueid = $conf->config('ticket_system-default_queueid'); % my $default_queue = FS::TicketSystem->queue($default_queueid); % $default_queue = "(default) $default_queueid: $default_queue" % if $default_queueid; % my %queues = FS::TicketSystem->queues(); % my @queueids = sort { $a <=> $b } keys %queues; % % }

Agent
Agent type	% foreach my $agent_type (qsearch('agent_type',{})) { typenum && ( $agent->typenum == $agent_type->typenum ) ) ? ' SELECTED' : '' %>> <% $agent_type->getfield('typenum') %>: <% $agent_type->getfield('atype') %> % }
Master customer	<% include('/elements/search-cust_main.html', 'field_name' => 'agent_custnum', 'curr_value' => $agent->agent_custnum, 'find_button' => 1, ) %>
Username
Password
Disable	disabled eq 'Y' ? ' CHECKED' : '' %>>
Ticketing queue	<% $default_queue %> % foreach my $queueid ( @queueids ) { ticketing_queueid == $queueid ? ' SELECTED' : '' %>><% $queueid %>: <% $queues{$queueid} %> % }

<% mt('Access Groups') |h %>

<% include('/elements/checkboxes-table.html', 'source_obj' => $agent, 'link_table' => 'access_groupagent', 'target_table' => 'access_group', 'name_col' => 'groupname', 'target_link' => $p. 'edit/access_group.html?', ) %>

<% mt('Commissions') |h %> % #surprising amount of false laziness w/ edit/process/agent.cgi % my @pkg_class = qsearch('pkg_class', { 'disabled'=>'' }); % foreach my $pkg_class ( '', @pkg_class ) { % my %agent_pkg_class = ( 'agentnum' => $agent->agentnum, % 'classnum' => $pkg_class ? $pkg_class->classnum : '' % ); % my $agent_pkg_class = % qsearchs( 'agent_pkg_class', \%agent_pkg_class ) % || new FS::agent_pkg_class \%agent_pkg_class; % my $param = 'classnum'. $agent_pkg_class{classnum}; % }

%	<% $pkg_class ? $pkg_class->classname : mt('(no package class)') |h %>

% if ( $conf->config('currencies') ) { <% mt('Currencies') |h %>

<& /elements/checkboxes-table-name.html, 'link_table' => 'agent_currency', 'name_col' => 'currency', 'names_list' => [ map [ $_, {label=>"$_: ".code2currency($_)} ], $conf->config('currencies') ], &>

% }
">

<% include('/elements/footer.html') %> <%init> die "access denied" unless $FS::CurrentUser::CurrentUser->access_right('Configuration'); my $agent; if ( $cgi->param('error') ) { $agent = new FS::agent ( { map { $_, scalar($cgi->param($_)) } fields('agent') } ); } elsif ( $cgi->keywords ) { my($query) = $cgi->keywords; $query =~ /^(\d+)$/; $agent = qsearchs( 'agent', { 'agentnum' => $1 } ); } else { #adding $agent = new FS::agent {}; } my $action = $agent->agentnum ? 'Edit' : 'Add'; my $conf = new FS::Conf;