blob: ceffca75d018c334a4718928f3ec431e97b69ab3 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
|
<HTML>
<HEAD>
<TITLE>Credit report criteria</TITLE>
<LINK REL="stylesheet" TYPE="text/css" HREF="../elements/calendar-win2k-2.css" TITLE="win2k-2">
<SCRIPT TYPE="text/javascript" SRC="../elements/calendar_stripped.js"></SCRIPT>
<SCRIPT TYPE="text/javascript" SRC="../elements/calendar-en.js"></SCRIPT>
<SCRIPT TYPE="text/javascript" SRC="../elements/calendar-setup.js"></SCRIPT>
</HEAD>
<BODY BGCOLOR="#e8e8e8">
<H1>Credit report criteria</H1>
<FORM ACTION="cust_credit.html" METHOD="post">
<INPUT TYPE="hidden" NAME="magic" VALUE="_date">
<TABLE>
<TR>
<TD ALIGN="right">Credits by employee: </TD>
<%
my $sth = dbh->prepare("SELECT DISTINCT otaker FROM cust_credit")
or die dbh->errstr;
$sth->execute or die $sth->errstr;
my @otakers = map { $_->[0] } @{$sth->fetchall_arrayref};
%>
<TD><SELECT NAME="otaker">
<OPTION VALUE="">all</OPTION>
<% foreach my $otaker ( @otakers ) { %>
<OPTION VALUE="<%= $otaker %>"><%= $otaker %></OPTION>
<% } %>
</SELECT>
</TD>
</TR>
<TR>
<TD ALIGN="right">From: </TD>
<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>
<SCRIPT TYPE="text/javascript">
Calendar.setup({
inputField: "beginning_text",
ifFormat: "%m/%d/%Y",
button: "beginning_button",
align: "BR"
});
</SCRIPT>
</TR>
<TR>
<TD ALIGN="right">To: </TD>
<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>
<SCRIPT TYPE="text/javascript">
Calendar.setup({
inputField: "ending_text",
ifFormat: "%m/%d/%Y",
button: "ending_button",
align: "BR"
});
</SCRIPT>
</TR>
</TABLE>
<BR><INPUT TYPE="submit" VALUE="Get Report">
</FORM>
</BODY>
</HTML>
|