@@ -120,23 +136,17 @@ Contact Information
<%=
my $cardselect = '';
my %payby = (
'CARD' => qq!Credit card *$cardselect *Exp !. expselect("CARD"). qq! *Name on card !,
'DCRD' => qq!Credit card *$cardselect *Exp !. expselect("DCRD"). qq! *Name on card !,
- 'CHEK' => qq!Electronic check ${r}Account number ${r}ABA/Routing code ${r}Bank name !,
- 'DCHK' => qq!Electronic check ${r}Account number ${r}ABA/Routing code ${r}Bank name !,
+ 'CHEK' => qq!Electronic check ${r}Account number ${r}ABA/Routing code Type {$r}Bank State ${r}Bank name !,
+ 'DCHK' => qq!Electronic check ${r}Account number Type ${r}ABA/Routing code {$r}Bank State ${r}Bank name !,
'LECB' => qq!Phone bill billing ${r}Phone number !,
'BILL' => qq!Billing P.O. *Exp !. expselect("BILL", "12-2037"). qq! *Attention !,
'COMP' => qq!Complimentary *Approved by *Exp !. expselect("COMP"),
@@ -148,13 +158,25 @@ Contact Information
$payby{$payby} .= qq! |
* Card type | $cardselect |
* Card number | |
* Expration | !. expselect("CARD", $paydate). qq! |
* Name on card | |
!,
'DCRD' => qq!Credit card
*$cardselect
*Exp !. expselect("DCRD", $paydate). qq!
*Name on card
!,
- 'CHEK' => qq!Electronic check
${r}Account number
${r}ABA/Routing code
${r}Bank name !,
- 'DCHK' => qq!Electronic check
${r}Account number
${r}ABA/Routing code
${r}Bank name !,
+ 'CHEK' => qq!Electronic check
${r}Account number Type
${r}ABA/Routing code
${r}Bank name !,
+ 'DCHK' => qq!Electronic check
${r}Account number Type
${r}ABA/Routing code
${r}Bank name !,
'LECB' => qq!Phone bill billing
${r}Phone number !,
'BILL' => qq!Billing
P.O.
*Exp !. expselect("BILL", $paydate). qq!
*Attention
!,
'COMP' => qq!Complimentary
*Approved by
*Exp !. expselect("COMP", $paydate),
@@ -166,6 +188,22 @@ Contact Information
$paybychecked{$payby} .= qq!CVV2 (help) | |
!;
}
}
+ if ( $paystate_enabled ) {
+ foreach my $payby ( grep { exists $payby{$_} } qw(CHEK DCHK) ) {
+ my ($county_html, $state_html, $country_html) =
+ regionselector( {
+ prefix => "${payby}_pay",
+ selected_county => $county,
+ selected_state => $state,
+ selected_country => $country,
+ default_state => $statedefault,
+ default_country => $countrydefault,
+ locales => \@cust_main_county,
+ } );
+ $paybychecked{$payby} .= "
${r}Bank state $county_html $state_html";
+ }
+ }
+
use Tie::IxHash;
use HTML::Widgets::SelectLayers;
@@ -207,7 +245,8 @@ HTML::Widgets::SelectLayers->new(
|
+<%=
+ if ( $signup_service eq 'svc_phone' ) {
+
+ $OUT .= 'Phone number | '.
+ didselector( 'field' => 'phonenum',
+ 'svcpart' => $default_svcpart,
+ ).
+ ' |
';
+
+ $OUT .= <
+ Voicemail PIN |
+ |
+
+ENDOUT
+
+ } else {
+
+ $OUT .= <
Username |
- |
+ |
Password |
- |
+ |
Re-enter Password |
- |
+ |
-<%=
- if ( $security_phrase ) {
- $OUT .= <
Security Phrase |
|
-ENDOUT
- } else {
- $OUT .= '';
+SECPHRASE
+ } else {
+ $OUT .= '';
+ }
+
}
-%>
-<%=
+
if ( @svc_acct_pop ) {
$OUT .= 'Access number | '.
popselector( 'popnum' => $popnum,
@@ -255,7 +315,9 @@ ENDOUT
} else {
$OUT .= popselector(popnum=>$popnum, pops=>\@svc_acct_pop);
}
+
%>
+
|
<%=
@@ -287,7 +349,7 @@ function fixup_form() {
// copy payment method data up to OneTrueForm
- var payment_method_elements = new Array( 'payinfo', 'payinfo1', 'payinfo2', 'payname', 'paycvv' , 'month', 'year','type' );
+ var payment_method_elements = new Array( 'payinfo', 'payinfo1', 'payinfo2', 'payname', 'paycvv' , 'paystate', 'paytype', 'month', 'year','type' );
var payment_method_form_name = document.OneTrueForm.select.options[document.OneTrueForm.select.selectedIndex].value;
document.OneTrueForm.elements['payby'].value = payment_method_form_name;
var payment_method_form = document.forms[payment_method_form_name];
@@ -335,7 +397,7 @@ function copyelement(from, to) {
to.value = from.value;
}
}
-// alert(from + " (" + from.type + "): " + to.name + " => " + to.value);
+// alert(from.name + " (" + from.type + "): " + to.name + " => " + to.value);
}
}