3 <TITLE>Packages</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">
11 <FORM ACTION="cust_pkg.cgi" METHOD="GET">
12 <INPUT TYPE="hidden" NAME="magic" VALUE="bill">
13 Return packages with next bill date:<BR><BR>
16 <TD ALIGN="right">From: </TD>
17 <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>
18 <SCRIPT TYPE="text/javascript">
20 inputField: "beginning_text",
22 button: "beginning_button",
28 <TD ALIGN="right">To: </TD>
29 <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>
30 <SCRIPT TYPE="text/javascript">
32 inputField: "ending_text",
34 button: "ending_button",
39 <% my %agent_search = dbdef->table('agent')->column('disabled')
40 ? ( 'disabled' => '' ) : ();
41 my @agents = qsearch( 'agent', \%agent_search );
42 if ( scalar(@agents) == 1 ) {
44 <INPUT TYPE="hidden" NAME="agentnum" VALUE="<%= $agents[0]->agentnum %>">
48 <TD ALIGN="right">Agent: </TD>
49 <TD><SELECT NAME="agentnum"><OPTION VALUE="">(all)
50 <% foreach my $agent ( sort { $a->agent cmp $b->agent; } @agents) { %>
51 <OPTION VALUE="<%= $agent->agentnum %>"><%= $agent->agent %>
57 <BR><INPUT TYPE="submit" VALUE="Get Report">