quiet warnings about CGI::param in list context
[freeside.git] / httemplate / search / report_prospect_main.html
1 <& /elements/header.html, 'Prospect Report' &>
2
3 <FORM ACTION="prospect_main.html" METHOD="GET">
4
5   <FONT CLASS="fsinnerbox-title"><% emt('Search options') %></FONT>
6   <TABLE CLASS="fsinnerbox">
7
8     <& /elements/tr-select-agent.html,
9          'curr_value'    => scalar($cgi->param('agentnum')),
10          'disable_empty' => 0,
11     &>
12
13     <& /elements/tr-select-part_referral.html,
14          'curr_value'    => scalar($cgi->param('refnum')),
15          'empty_label'   => 'all',
16          'disable_empty' => 0,
17     &>
18
19   </TABLE>
20
21 <BR>
22 <INPUT TYPE="submit" VALUE="Get Report">
23
24 </FORM>
25
26 <& /elements/footer.html &>
27 <%init>
28
29 die "access denied"
30   unless $FS::CurrentUser::CurrentUser->access_right('List prospects');
31
32 my $conf = new FS::Conf;
33
34 </%init>