httemplate/browse/sales.cgi

   1 <% include("/elements/header.html",'Sales Listing', menubar(
   2   'Add new sales person' => '../edit/sales.cgi'
   3 )) %>
   4 Sales people bring in business.<BR><BR>
   5 % if ( dbdef->table('sales')->column('disabled') ) {
   6
   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> )'; }
  12   %>
  13 % }
  14
  15
  16 <% include('/elements/table-grid.html') %>
  17 % my $bgcolor1 = '#eeeeee';
  18 %   my $bgcolor2 = '#ffffff';
  19 %   my $bgcolor = '';
  20
  21 <TR>
  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>
  25 </TR>
  26
  27 %foreach my $sales ( sort {
  28 %  $a->getfield('salesnum') cmp $b->getfield('salesnum')
  29 %} qsearch('sales', \%search ) ) {
  30 %
  31 %  if ( $bgcolor eq $bgcolor1 ) {
  32 %    $bgcolor = $bgcolor2;
  33 %  } else {
  34 %    $bgcolor = $bgcolor1;
  35 %  }
  36
  37       <TR>
  38
  39         <TD CLASS="grid" BGCOLOR="<% $bgcolor %>">
  40           <A HREF="<%$p%>edit/sales.cgi?<% $sales->salesnum %>"><% $sales->salesnum %></A>
  41         </TD>
  42
  43         <TD CLASS="grid" BGCOLOR="<% $bgcolor %>">
  44           <A HREF="<%$p%>edit/sales.cgi?<% $sales->salesnum %>"><% $sales->salesperson %></A>
  45         </TD>
  46
  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>'
  51             %>
  52           </TD>
  53 %       }
  54
  55 %       my ($agent) = qsearch('agent', { 'agentnum' => $sales->agentnum });
  56
  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>
  60         </TD>
  61
  62         <TD CLASS="grid" BGCOLOR="<% $bgcolor %>">
  63 %         foreach my $access_group (
  64 %           map $_->access_group,
  65 %               qsearch('access_groupsales', { 'salesnum' => $sales->salesnum })
  66 %         ) {
  67             <A HREF="<%$p%>edit/access_group.html?<% $access_group->groupnum %>"><% $access_group->groupname |h %><BR>
  68 %         }
  69         </TD>
  70
  71       </TR>
  72 % }
  73
  74     </TABLE>
  75
  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;
  80   }
  81 </SCRIPT>
  82
  83   </BODY>
  84 </HTML>
  85 <%init>
  86
  87 die "access denied"
  88   unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
  89
  90 my %search;
  91 if ( $cgi->param('showdisabled')
  92      || !dbdef->table('agent')->column('disabled') ) {
  93   %search = ();
  94 } else {
  95   %search = ( 'disabled' => '' );
  96 }
  97
  98 my $conf = new FS::Conf;
  99
 100 </%init>