fs_selfservice/FS-SelfService/cgi/order_pkg.html

   1 <SCRIPT TYPE="text/javascript">
   2 function enable_order_pkg () {
   3   if ( document.OrderPkgForm.pkgpart.selectedIndex > 0 ) {
   4     document.OrderPkgForm.submit.disabled = false;
   5   } else {
   6     document.OrderPkgForm.submit.disabled = true;
   7   }
   8 }
   9 </SCRIPT>
  10 <FONT SIZE=4>Purchase additional package</FONT><BR><BR>
  11 <%= if ( $error ) {
  12   $OUT .= qq!<FONT SIZE="+1" COLOR="#ff0000">$error</FONT><BR><BR>!;
  13 } ''; %>
  14 <FORM NAME="OrderPkgForm" ACTION="<%= $selfurl %>" METHOD=POST>
  15 <INPUT TYPE="hidden" NAME="session" VALUE="<%= $session_id %>">
  16 <INPUT TYPE="hidden" NAME="action" VALUE="process_order_pkg">
  17 <INPUT TYPE="hidden" NAME="custnum" VALUE="<%= $custnum %>">
  18 <TABLE BGCOLOR="#cccccc" BORDER=0 CELLSPACING=0>
  19 <TR>
  20   <TD COLSPAN=2><SELECT NAME="pkgpart" onChange="enable_order_pkg()">
  21   <OPTION VALUE="">
  22
  23   <%=
  24     foreach my $part_pkg ( @part_pkg ) {
  25       $OUT .= '<OPTION VALUE="'. $part_pkg->{'pkgpart'}. '"';
  26       $OUT .= ' SELECTED' if $pkgpart && $part_pkg->{'pkgpart'} == $pkgpart;
  27       $OUT .= '>'. $part_pkg->{'pkg'};
  28     }
  29   %>
  30
  31   </SELECT></TD>
  32 </TR>
  33 <TR>
  34   <TD ALIGN="right">Username</TD>
  35   <TD><INPUT TYPE="text" NAME="username" VALUE="<%= $username %>"></TD>
  36 </TR>
  37 <TR>
  38   <TD ALIGN="right">Password</TD>
  39   <TD><INPUT TYPE="password" NAME="_password" VALUE="<%= $_password %>"></TD>
  40 </TR>
  41 <TR>
  42   <TD ALIGN="right">Re-enter Password</TD>
  43   <TD><INPUT TYPE="password" NAME="_password2" VALUE="<%= $_password2 %>"></TD>
  44 </TR>
  45 <%=
  46   if ( $security_phrase ) {
  47     $OUT .= <<ENDOUT;
  48 <TR>
  49   <TD ALIGN="right">Security Phrase</TD>
  50   <TD><INPUT TYPE="text" NAME="sec_phrase" VALUE="$sec_phrase">
  51   </TD>
  52 </TR>
  53 ENDOUT
  54   } else {
  55     $OUT .= '<INPUT TYPE="hidden" NAME="sec_phrase" VALUE="">';
  56   }
  57 %>
  58 <%=
  59   if ( @svc_acct_pop ) {
  60     $OUT .= '<TR><TD ALIGN="right">Access number</TD><TD>'.
  61             popselector( 'popnum'        => $popnum,
  62                          'pops'          => \@svc_acct_pop,
  63                          'init_popstate' => $init_popstate,
  64                          'popac'         => $popac,
  65                          'acstate'       => $acstate,
  66                        ).
  67             '</TD></TR>';
  68   } else {
  69     $OUT .= popselector(popnum=>$popnum, pops=>\@svc_acct_pop);
  70   }
  71 %>
  72 </TABLE>
  73 <INPUT NAME="submit" TYPE="submit" VALUE="Purchase" disabled>
  74 </FORM>
  75