3 <TITLE>Credit report criteria</TITLE>
4 <LINK REL="stylesheet" TYPE="text/css" HREF="../elements/calendar-win2k-2.css" TITLE="win2k-2">
5 <SCRIPT TYPE="text/javascript" SRC="../elements/calendar_stripped.js"></SCRIPT>
6 <SCRIPT TYPE="text/javascript" SRC="../elements/calendar-en.js"></SCRIPT>
7 <SCRIPT TYPE="text/javascript" SRC="../elements/calendar-setup.js"></SCRIPT>
9 <BODY BGCOLOR="#e8e8e8">
10 <H1>Credit report criteria</H1>
11 <FORM ACTION="cust_credit.html" METHOD="post">
12 <INPUT TYPE="hidden" NAME="magic" VALUE="_date">
15 <TD ALIGN="right">Credits by employee: </TD>
17 my $sth = dbh->prepare("SELECT DISTINCT otaker FROM cust_credit")
19 $sth->execute or die $sth->errstr;
20 my @otakers = map { $_->[0] } @{$sth->fetchall_arrayref};
22 <TD><SELECT NAME="otaker">
23 <OPTION VALUE="">all</OPTION>
24 <% foreach my $otaker ( @otakers ) { %>
25 <OPTION VALUE="<%= $otaker %>"><%= $otaker %></OPTION>
31 <TD ALIGN="right">From: </TD>
32 <TD><INPUT TYPE="text" NAME="beginning" ID="beginning_text" VALUE="" SIZE=11 MAXLENGTH=10> <IMG SRC="../images/calendar.png" ID="beginning_button" STYLE="cursor: pointer" TITLE="Select date"><BR><i>m/d/y</i></TD>
33 <SCRIPT TYPE="text/javascript">
35 inputField: "beginning_text",
37 button: "beginning_button",
42 <TD ALIGN="right">To: </TD>
43 <TD><INPUT TYPE="text" NAME="ending" ID="ending_text" VALUE="" SIZE=11 MAXLENGTH=10> <IMG SRC="../images/calendar.png" ID="ending_button" STYLE="cursor: pointer" TITLE="Select date"><BR><i>m/d/y</i></TD>
44 <SCRIPT TYPE="text/javascript">
46 inputField: "ending_text",
48 button: "ending_button",
54 <BR><INPUT TYPE="submit" VALUE="Get Report">