fs_selfservice/FS-SelfService/cgi/check.html

   1 <TR>
   2   <TD ALIGN="right">Account&nbsp;type</TD>
   3   <TD>
   4     <SELECT NAME="paytype">
   5       <%= foreach ( @paytypes ) {
   6             $selected = $paytype eq $_ ? ' SELECTED' : '';
   7             $OUT .= qq(<OPTION$selected VALUE="$_">$_\n);
   8       } %>
   9     </SELECT>
  10   </TD>
  11 </TD><TR>
  12   <TD ALIGN="right">Account&nbsp;number</TD>
  13   <TD><INPUT TYPE="text" NAME="payinfo1" SIZE=10 MAXLENGTH=20 VALUE="<%=$payinfo1%>"></TD>
  14 </TD><TR>
  15   <TD ALIGN="right">ABA/Routing&nbsp;number</TD>
  16   <TD><INPUT TYPE="text" NAME="payinfo2" SIZE=10 MAXLENGTH=9 VALUE="<%=$payinfo2%>"></TD>
  17 </TR><TR>
  18   <TD ALIGN="right">Bank&nbsp;name</TD>
  19   <TD><INPUT TYPE="text" SIZE=32 MAXLENGTH=80 NAME="payname" VALUE="<%=$payname%>"></TD>
  20 </TR><TR>
  21   <%=
  22     $OUT = '';
  23     if ($show_paystate) {
  24       $OUT .= qq!<TD ALIGN="right">Bank state</TD><TD><SELECT NAME="paystate">!;
  25       for ( @states ) {
  26         $OUT .= '<OPTION'. ($_ eq $paystate ? ' SELECTED' : '' ). ">$_\n";
  27       }
  28       $OUT .= '</SELECT></TD></TR><TR>';
  29     }
  30   %>
  31   <%=
  32     $OUT = '';
  33     if ($show_ss) {
  34       $OUT .= '<TD ALIGN="right">Account&nbsp;holder<BR>Social&nbsp;';
  35       $OUT .= 'security&nbsp;or&nbsp;tax&nbsp;ID&nbsp;#</TD><TD>';
  36       $OUT .= qq!<INPUT TYPE="text" SIZE=32 MAXLENGTH=80 NAME="ss" VALUE="$ss">!;
  37       $OUT .= '</TD></TR><TR>';
  38     }
  39   %>
  40   <%=
  41     $OUT = '';
  42     if ($show_stateid) {
  43       $OUT .= '<TD ALIGN="right">';
  44       $OUT .= qq!Account&nbsp;holder<BR>$stateid_label</TD><TD>!;
  45       $OUT .= qq!<INPUT TYPE="text" SIZE=32 MAXLENGTH=80 NAME="stateid" VALUE="$stateid"></TD>!;
  46       $OUT .= qq!<TD ALIGN="right">$stateid_state_label</TD>!;
  47       $OUT .= '<TD><SELECT NAME="stateid_state">';
  48       for ( @states ) {
  49         $OUT .= '<OPTION'. ($_ eq $stateid_state ? ' SELECTED' : '' ). ">$_\n";
  50       }
  51       $OUT .='</SELECT></TD></TR><TR>';
  52     }
  53   %>
  54 </TR>