fs_selfservice/FS-SelfService/cgi/select_cust.html

   1 <HTML>
   2   <HEAD>
   3     <TITLE>Select customer</TITLE>
   4     <%= $head %>
   5   </HEAD>
   6   <BODY BGCOLOR="<%= $body_bgcolor || '#eeeeee' %>">
   7   <%= $body_header %>
   8
   9 <FONT SIZE=5>Select customer</FONT><BR><BR>
  10 <FONT SIZE="+1" COLOR="#ff0000"><%= $error %></FONT>
  11
  12 <%= $selfurl =~ s/\?.*//; ''; %>
  13 <FORM ACTION="<%= $selfurl %>" METHOD=POST>
  14 <INPUT TYPE="hidden" NAME="action" VALUE="switch_cust">
  15 <INPUT TYPE="hidden" NAME="agentnum" VALUE="<%= $agentnum %>">
  16
  17 <TABLE BGCOLOR="<%= $box_bgcolor || '#c0c0c0' %>" BORDER=0 CELLSPACING=2 CELLPADDING=0>
  18
  19   <TR>
  20     <TH ALIGN="right">Customer </TH>
  21     <TD>
  22       <SELECT NAME="custnum">
  23         <OPTION VALUE="">Select a customer
  24 <%=     $OUT .= qq(<OPTION VALUE="$_">). encode_entities( $customers{$_} )
  25           foreach keys %customers;
  26 %>
  27       </SELECT>
  28     </TD>
  29   </TR>
  30
  31   <TR>
  32     <TD COLSPAN=2 ALIGN="center"><INPUT TYPE="submit" VALUE="Select customer"></TD>
  33   </TR>
  34
  35 </TABLE>
  36 </FORM>
  37
  38 <%= $body_footer %>