fs_selfservice/FS-SelfService/cgi/change_password.html

   1 <%= include('header', 'Change password') %>
   2
   3 <%= if ( $error ) {
   4   $OUT .= qq!<FONT SIZE="+1" COLOR="#ff0000">$error</FONT><BR><BR>!;
   5 } ''; %>
   6
   7 <FORM ACTION="<%= $selfurl %>" METHOD="POST">
   8 <INPUT TYPE="hidden" NAME="action" VALUE="process_change_password">
   9
  10 <TABLE BGCOLOR="#cccccc">
  11
  12   <TR>
  13     <TH ALIGN="right">Change password for account: </TH>
  14     <TD>
  15       <SELECT NAME="svcnum">
  16         <%= foreach my $svc ( @svcs ) {
  17               $OUT .= '<OPTION VALUE="'. $svc->{'svcnum'}. '"'.
  18                         ( $svc->{'svcnum'} eq $svcnum ? ' SELECTED' : '' ). '>'.
  19                       $svc->{'label'}. ': '. $svc->{'value'}. "\n";
  20             }
  21         %>
  22       </SELECT>
  23     </TD>
  24   </TR>
  25
  26   <TR>
  27     <TH ALIGN="right">New password: </TH>
  28     <TD><INPUT TYPE="password" NAME="new_password" SIZE="18"></TD>
  29   </TR>
  30
  31   <TR>
  32     <TH ALIGN="right">Re-enter new password: </TH>
  33     <TD><INPUT TYPE="password" NAME="new_password2" SIZE="18"></TD>
  34   </TR>
  35
  36 </TABLE>
  37 <BR>
  38
  39 <INPUT TYPE="submit" VALUE="Change password">
  40
  41 </FORM>
  42
  43
  44 <%= include('footer') %>