<% include("/elements/header.html",'Sales Listing', menubar( 'Add new sales person' => '../edit/sales.cgi' )) %> Sales people bring in business.

% if ( dbdef->table('sales')->column('disabled') ) { <% $cgi->param('showdisabled') ? do { $cgi->param('showdisabled', 0); '( hide disabled sales people )'; } : do { $cgi->param('showdisabled', 1); '( show disabled sales people )'; } %> % } <% include('/elements/table-grid.html') %> % my $bgcolor1 = '#eeeeee'; % my $bgcolor2 = '#ffffff'; % my $bgcolor = ''; param('showdisabled') || !dbdef->table('sales')->column('disabled') ) ? 2 : 3 %>>Sales person Agent Access Groups %foreach my $sales ( sort { % $a->getfield('salesnum') cmp $b->getfield('salesnum') %} qsearch('sales', \%search ) ) { % % if ( $bgcolor eq $bgcolor1 ) { % $bgcolor = $bgcolor2; % } else { % $bgcolor = $bgcolor1; % } <% $sales->salesnum %> <% $sales->salesperson %> % if ( ! $cgi->param('showdisabled') ) { <% $sales->disabled ? 'DISABLED' : 'Active' %> % } % my ($agent) = qsearch('agent', { 'agentnum' => $sales->agentnum }); <% $sales->agentnum %> (<% $agent->agent %>)
% foreach my $access_group ( % map $_->access_group, % qsearch('access_groupsales', { 'salesnum' => $sales->salesnum }) % ) {
<% $access_group->groupname |h %>
% } % } <%init> die "access denied" unless $FS::CurrentUser::CurrentUser->access_right('Configuration'); my %search; if ( $cgi->param('showdisabled') || !dbdef->table('agent')->column('disabled') ) { %search = (); } else { %search = ( 'disabled' => '' ); } my $conf = new FS::Conf;