X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fsearch%2Freport_cust_credit.html;h=be02e9fbdade2a9a8c2c64e749b660c7c59453cd;hb=baaf20963687533353e65917554ebf968dbc0f8b;hp=ab481025e34c92e1f8d0d28ebf6aeb0cbd1800a9;hpb=39fd666a49b2be516967131a46891f17ce0101da;p=freeside.git

diff --git a/httemplate/search/report_cust_credit.html b/httemplate/search/report_cust_credit.html
index ab481025e..be02e9fbd 100644
--- a/httemplate/search/report_cust_credit.html
+++ b/httemplate/search/report_cust_credit.html
@@ -4,22 +4,16 @@
 <INPUT TYPE="hidden" NAME="magic" VALUE="_date">
 
 <TABLE>
-  <TR>
-    <TD ALIGN="right">Credits by employee: </TD>
-
-    <TD>
-      <SELECT NAME="otaker">
-        <OPTION VALUE="">all</OPTION>
-%       foreach my $otaker ( @otakers ) { 
-          <OPTION VALUE="<% $otaker %>"><% $otaker %></OPTION>
-%       } 
-      </SELECT>
-    </TD>
-  </TR>
+
+  <% include( '/elements/tr-select-otaker.html',
+                'label'   => 'Credits by employee: ',
+                'otakers' => \@otakers,
+            )
+  %>
 
   <% include( '/elements/tr-select-agent.html',
-                 $cgi->param('agentnum'),
-                 'label' => 'for agent: ',
+                 'curr_value' => scalar( $cgi->param('agentnum') ),
+                 'label'      => 'for agent: ',
              )
   %>
 
@@ -42,6 +36,9 @@
 
 <%init>
 
+die "access denied"
+  unless $FS::CurrentUser::CurrentUser->access_right('Financial reports');
+
 my $sth = dbh->prepare("SELECT DISTINCT otaker FROM cust_credit")
   or die dbh->errstr;
 $sth->execute or die $sth->errstr;