ISP Signup form

*State/Country

+ <%= + ($county_html, $state_html, $country_html) = + regionselector( $county, $state, $country ); + + "$county_html $state_html"; + %> +

<%= $country_html %>

Email invoice

Billing type

X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=fs_signup%2FFS-SignupClient%2Fcgi%2Fsignup.html;h=a6cbf21468fc55fbdc1374616157f00b4952f864;hp=b97511e971b9b7ba2bbfcbf6db331980bd0ae309;hb=7598902376bff0ddeba07ef9eb973f64efe87ad5;hpb=4fa13bb706c06379b76b085c5f4acdea42902f4f diff --git a/fs_signup/FS-SignupClient/cgi/signup.html b/fs_signup/FS-SignupClient/cgi/signup.html index b97511e97..a6cbf2146 100755 --- a/fs_signup/FS-SignupClient/cgi/signup.html +++ b/fs_signup/FS-SignupClient/cgi/signup.html @@ -1,10 +1,33 @@ ISP Signup form -ISP Signup form

+ + +ISP Signup form

<%= $error %> -

+ +Where did you hear about our service?

Contact Information @@ -28,26 +51,21 @@ Contact Information - + + + + @@ -75,31 +93,74 @@ Contact Information -

+<%= scalar(@payby) > 1 ? 'Billing type' : '' %> + <%= + + my $cardselect = ''; + my %payby = ( - 'CARD' => qq!Credit card
*
*Exp !. expselect("CARD"). qq!
*Name on card
!, + '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 !, + '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"), 'PREPAY' => qq!Prepaid card
*!, ); + if ( $init_data->{'cvv_enabled'} ) { + foreach my $payby ( grep { exists $payby{$_} } qw(CARD DCRD) ) { #1.4/1.5 + $payby{$payby} .= qq!
CVV2 (help) !; + } + } + + my( $account, $aba ) = split('@', $payinfo); my %paybychecked = ( - 'CARD' => qq!Credit card
*
*Exp !. expselect("CARD", $paydate). qq!
*Name on card
!, + 'CARD' => qq!Credit card
*$cardselect
*Exp !. 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 !, + '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), 'PREPAY' => qq!Prepaid card
*!, ); + if ( $init_data->{'cvv_enabled'} ) { + foreach my $payby ( grep { exists $payby{$_} } qw(CARD DCRD) ) { #1.4/1.5 + $paybychecked{$payby} .= qq!
CVV2 (help) !; + } + } + for (@payby) { - $OUT .= qq!!; + if ( scalar(@payby) == 1) { + $OUT .= '"; } else { - $OUT .= qq!> $payby{$_}!; + $OUT .= qq!!; + } else { + $OUT .= qq!> $payby{$_}!; + } + } } %> @@ -126,13 +187,11 @@ Contact Information - + - + <%= if ( $init_data->{'security_phrase'} ) { @@ -147,10 +206,14 @@ ENDOUT $OUT .= ''; } %> - - - - +<%= + if ( scalar(@$pops) ) { + $OUT .= ''; + } else { + $OUT .= popselector($popnum); + } +%>

$paybychecked{$_}	'. + qq!!. + "$paybychecked{$_}	$paybychecked{$_}
Password	- (blank to generate)
Re-enter Password	-
Access number	<%= popselector($popnum) %>
Access number	'. + popselector($popnum). '

-

+