1 <% include("/elements/header.html",'Sales Listing', menubar(
2 'Add new sales person' => '../edit/sales.cgi'
4 Sales people bring in business.<BR><BR>
5 % if ( dbdef->table('sales')->column('disabled') ) {
7 <% $cgi->param('showdisabled')
8 ? do { $cgi->param('showdisabled', 0);
9 '( <a href="'. $cgi->self_url. '">hide disabled sales people</a> )'; }
10 : do { $cgi->param('showdisabled', 1);
11 '( <a href="'. $cgi->self_url. '">show disabled sales people</a> )'; }
16 <% include('/elements/table-grid.html') %>
17 % my $bgcolor1 = '#eeeeee';
18 % my $bgcolor2 = '#ffffff';
22 <TH CLASS="grid" BGCOLOR="#cccccc" COLSPAN=<% ( $cgi->param('showdisabled') || !dbdef->table('sales')->column('disabled') ) ? 2 : 3 %>>Sales person</TH>
23 <TH CLASS="grid" BGCOLOR="#cccccc">Agent</TH>
24 <TH CLASS="grid" BGCOLOR="#cccccc">Access Groups</TH>
27 %foreach my $sales ( sort {
28 % $a->getfield('salesnum') cmp $b->getfield('salesnum')
29 %} qsearch('sales', \%search ) ) {
31 % if ( $bgcolor eq $bgcolor1 ) {
32 % $bgcolor = $bgcolor2;
34 % $bgcolor = $bgcolor1;
39 <TD CLASS="grid" BGCOLOR="<% $bgcolor %>">
40 <A HREF="<%$p%>edit/sales.cgi?<% $sales->salesnum %>"><% $sales->salesnum %></A>
43 <TD CLASS="grid" BGCOLOR="<% $bgcolor %>">
44 <A HREF="<%$p%>edit/sales.cgi?<% $sales->salesnum %>"><% $sales->salesperson %></A>
47 % if ( ! $cgi->param('showdisabled') ) {
48 <TD CLASS="grid" BGCOLOR="<% $bgcolor %>" ALIGN="center">
49 <% $sales->disabled ? '<FONT COLOR="#FF0000"><B>DISABLED</B></FONT>'
50 : '<FONT COLOR="#00CC00"><B>Active</B></FONT>'
55 % my ($agent) = qsearch('agent', { 'agentnum' => $sales->agentnum });
57 <TD CLASS="grid" BGCOLOR="<% $bgcolor %>">
58 <A HREF="<%$p%>edit/sales.cgi?<% $sales->agentnum %>"><% $sales->agentnum %></A>
59 <A HREF="<%$p%>edit/agent.cgi?<% $agent->agentnum %>">(<% $agent->agent %>)<BR>
62 <TD CLASS="grid" BGCOLOR="<% $bgcolor %>">
63 % foreach my $access_group (
64 % map $_->access_group,
65 % qsearch('access_groupsales', { 'salesnum' => $sales->salesnum })
67 <A HREF="<%$p%>edit/access_group.html?<% $access_group->groupnum %>"><% $access_group->groupname |h %><BR>
76 <SCRIPT TYPE="text/javascript">
77 function areyousure(what, href) {
78 if ( confirm("Are you sure you want to " + what + "?") == true )
79 window.location.href = href;
88 unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
91 if ( $cgi->param('showdisabled')
92 || !dbdef->table('agent')->column('disabled') ) {
95 %search = ( 'disabled' => '' );
98 my $conf = new FS::Conf;