httemplate/search/cust_pkg_report.cgi

   1 <HTML>
   2   <HEAD>
   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>
   8   </HEAD>
   9   <BODY BGCOLOR="#e8e8e8">
  10     <H1>Packages</H1>
  11     <FORM ACTION="cust_pkg.cgi" METHOD="post">
  12     <INPUT TYPE="hidden" NAME="magic" VALUE="bill">
  13       Return packages with next bill date:<BR><BR>
  14       <TABLE>
  15         <TR>
  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">
  19   Calendar.setup({
  20     inputField: "beginning_text",
  21     ifFormat:   "%m/%d/%Y",
  22     button:     "beginning_button",
  23     align:      "BR"
  24   });
  25 </SCRIPT>
  26         </TR>
  27         <TR>
  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">
  31   Calendar.setup({
  32     inputField: "ending_text",
  33     ifFormat:   "%m/%d/%Y",
  34     button:     "ending_button",
  35     align:      "BR"
  36   });
  37 </SCRIPT>
  38         </TR>
  39 <% my %agent_search = dbdef->table('agent')->column('disabled')
  40                         ? ( 'disabled' => '' ) : ();
  41    my @agents = qsearch( 'agent', \%agent_search );
  42    if ( scalar(@agents) == 1 ) {
  43 %>
  44      <INPUT TYPE="hidden" NAME="agentnum" VALUE="<%= $agents[0]->agentnum %>">
  45 <% } else { %>
  46
  47         <TR>
  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 %>
  52           <% } %>
  53           </TD>
  54         </TR>
  55 <% } %>
  56       </TABLE>
  57       <BR><INPUT TYPE="submit" VALUE="Get Report">
  58
  59     </FORM>
  60
  61   </BODY>
  62 </HTML>
  63