fs_selfservice/FS-SelfService/cgi/check.html

   1 <%=
   2   $OUT = '';
   3   if ($ach_read_only) {
   4     $OUT .= qq!<TR><TD COLSPAN=2><FONT COLOR="red">You only have read only access</TD></TR>!;
   5   }
   6 %>
   7 <TR>
   8   <TD ALIGN="right">Account&nbsp;type</TD>
   9   <TD <%= ($ach_read_only ? ' BGCOLOR="#ffffff"' : '') %> >
  10   <%=
  11     if ($ach_read_only) {
  12       $OUT = $paytype . '<INPUT TYPE="hidden" NAME="paytype" VALUE="' . $paytype . '">';
  13     } else {
  14       $OUT .= '<SELECT NAME="paytype">';
  15       foreach ( @paytypes ) {
  16         $selected = $paytype eq $_ ? ' SELECTED' : '';
  17         $OUT .= qq(<OPTION$selected VALUE="$_">$_\n);
  18       }
  19       $OUT .= '</SELECT>';
  20     }
  21   %>
  22   </TD>
  23 </TR><TR>
  24   <TD ALIGN="right">Account&nbsp;number</TD>
  25   <TD <%= ($ach_read_only ? ' BGCOLOR="#ffffff"' : '') %> >
  26   <%= if ($ach_read_only) {
  27       $OUT = qq! $payinfo1 <INPUT TYPE="hidden" NAME="payinfo1" VALUE="$payinfo1"> !;
  28     } else {
  29       $OUT = qq! <INPUT TYPE="text" NAME="payinfo1" SIZE=10 MAXLENGTH=20 VALUE="$payinfo1"> !;
  30     }
  31   %>
  32   </TD>
  33 </TR><TR>
  34   <TD ALIGN="right">ABA/Routing&nbsp;number</TD>
  35   <TD <%= ($ach_read_only ? ' BGCOLOR="#ffffff"' : '') %> >
  36   <%=
  37     if ($ach_read_only) {
  38       $OUT = qq! $payinfo2 <INPUT TYPE="hidden" NAME="payinfo2" VALUE="$payinfo2"> !;
  39     } else {
  40       $OUT = qq! <INPUT TYPE="text" NAME="payinfo2" SIZE=10 MAXLENGTH=20 VALUE="$payinfo2"> !;
  41     }
  42   %>
  43   </TD>
  44 </TR><TR>
  45   <TD ALIGN="right">Bank&nbsp;name</TD>
  46   <TD <%= ($ach_read_only ? ' BGCOLOR="#ffffff"' : '') %> >
  47   <%=
  48     if ($ach_read_only) {
  49       $OUT = qq! $payname <INPUT TYPE="hidden" NAME="payname" VALUE="$payname"> !;
  50     } else {
  51       $OUT = qq! <INPUT TYPE="text" NAME="payname" SIZE=10 MAXLENGTH=20 VALUE="$payname"> !;
  52     }
  53   %>
  54   </TD>
  55 </TR>
  56   <%=
  57     $OUT = '';
  58     if ($show_paystate) {
  59       $OUT .= '<TR><TD ALIGN="right">Bank state</TD><TD' . ($ach_read_only ? ' BGCOLOR="#ffffff"' : '') . '>';
  60       if ($ach_read_only) {
  61         $OUT .= qq! $paystate <INPUT TYPE="hidden" NAME="paystate" VALUE="$paystate"> !;
  62       } else {
  63         $OUT .= '<SELECT NAME="paystate">';
  64         for ( @states ) {
  65           $OUT .= '<OPTION'. ($_ eq $paystate ? ' SELECTED' : '' ). ">$_\n";
  66         }
  67         $OUT .= '</SELECT>';
  68       }
  69       $OUT .= '</TD></TR>';
  70     }
  71   %>
  72   <%=
  73     $OUT = '';
  74     if ($show_ss) {
  75       $OUT .= '<TR><TD ALIGN="right">Account&nbsp;holder<BR>Social&nbsp;';
  76       $OUT .= 'security&nbsp;or&nbsp;tax&nbsp;ID&nbsp;#</TD><TD' . ($ach_read_only ? ' BGCOLOR="#ffffff"' : '') . '>';
  77       if ($ach_read_only) {
  78         $OUT .= qq! $ss <INPUT TYPE="hidden" NAME="ss" VALUE="$ss">!;
  79       } else {
  80         $OUT .= qq!<INPUT TYPE="text" SIZE=32 MAXLENGTH=80 NAME="ss" VALUE="$ss">!;
  81       }
  82       $OUT .= '</TD></TR>';
  83     }
  84   %>
  85   <%=
  86     $OUT = '';
  87     if ($show_stateid) {
  88       $OUT .= qq!<TR><TD ALIGN="right">Account&nbsp;holder<BR>$stateid_label</TD>!;
  89       $OUT .= '<TD' . ($ach_read_only ? ' BGCOLOR="#ffffff"' : '') . '>';
  90       if ($ach_read_only) {
  91         $OUT .= qq! $stateid <INPUT TYPE="hidden" NAME="stateid" VALUE="$stateid">!;
  92       } else {
  93         $OUT .= qq!<INPUT TYPE="text" SIZE=32 MAXLENGTH=80 NAME="stateid" VALUE="$stateid"></TD>!;
  94         $OUT .= qq!<TD ALIGN="right">$stateid_state_label</TD>!;
  95         $OUT .= '<TD><SELECT NAME="stateid_state">';
  96         for ( @states ) {
  97           $OUT .= '<OPTION'. ($_ eq $stateid_state ? ' SELECTED' : '' ). ">$_\n";
  98         }
  99         $OUT .='</SELECT>';
 100       }
 101       $OUT .='</TD></TR>';
 102     }
 103   %>