X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=fs_selfservice%2FFS-SelfService%2Fcgi%2Fsignup.html;fp=fs_selfservice%2FFS-SelfService%2Fcgi%2Fsignup.html;h=2bc59ca5d45ebefb22cb709bf534bc7e9d03e3cd;hp=003632a6a684f1099b2b9797162306e12ad5b5a0;hb=b0dcfb17045dca111b177084ecb857ae2ee6c670;hpb=a63883fa4d6944e534c2cfbea1b32ec907d53ffe diff --git a/fs_selfservice/FS-SelfService/cgi/signup.html b/fs_selfservice/FS-SelfService/cgi/signup.html index 003632a6a..2bc59ca5d 100755 --- a/fs_selfservice/FS-SelfService/cgi/signup.html +++ b/fs_selfservice/FS-SelfService/cgi/signup.html @@ -30,9 +30,13 @@ ' Signup form

'; %> -<%= encode_entities($error) %> +<%= if ( $error ) { + $OUT .= ''. encode_entities($error). + '

'; + } +%> -
+ @@ -41,11 +45,24 @@ <%= - $OUT = join("\n",map { my $method = $_ ; map { qq|| } qw / payinfo payinfo1 payinfo2 payname paystate paytype paycvv month year type / } @payby); + $OUT = join("\n", + map { + my $method = $_ ; + map { qq|| } + qw( payinfo payinfo1 payinfo2 payname paystate paytype paycvv + month year type ) + } @payby + ); %> <%= - $OUT = join("\n", map { qq|| } qw / promo_code reg_code pkgpart username _password _password2 sec_phrase popnum domsvc mac_addr countrycode phonenum sip_password pin / ); + $OUT = join("\n", + map { qq|| } + qw( promo_code reg_code pkgpart username _password _password2 + sec_phrase popnum domsvc mac_addr countrycode phonenum + sip_password pin ), + map { ( "tax_$_", "tax_${_}_num" ) } @exempt_groups + ); %> <%= @@ -71,7 +88,7 @@ Where did you hear about our service? '; + + my $table = ''; 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
!, + 'CARD' => qq!$table!, + 'DCRD' => qq!$table!, '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 !, @@ -215,8 +235,8 @@ else { my( $account, $aba ) = split('@', $payinfo); my %paybychecked = ( - 'CARD' => '
* Card type$cardselect
* Card number
* Expiration!. expselect("CARD"). qq!
* Name on card
* Card type$cardselect
* Card number
* Expiration!. expselect("DCRD"). qq!
* Name on card
!, - 'DCRD' => qq!Credit card
*$cardselect
*Exp !. expselect("DCRD", $paydate). qq!
*Name on card
!, + 'CARD' => qq!$table!, + 'DCRD' => qq!$table!, '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 !, @@ -248,9 +268,9 @@ else { } my %payby_index = ( 'CARD' => qq/Credit Card/, - 'DCRD' => qq/Credit Card/, + 'DCRD' => qq/Credit Card (no auto-charge)/, 'CHEK' => qq/Check/, - 'DCHK' => qq/Check/, + 'DCHK' => qq/Check (no auto-charge)/, 'LECB' => qq/Phone Bill Billing/, 'BILL' => qq/Billing/, 'COMP' => qq/Complimentary/, @@ -270,7 +290,7 @@ HTML::Widgets::SelectLayers->new( options => \%options, selected_layer => $selected_layer, form_name => 'dummy', - html_between => '
* Card type$cardselect
* Card number
* Expiration!. expselect("CARD", $paydate). qq!
* Name on card
* Card type$cardselect
* Card number
* Expiration!. expselect("CARD", $paydate). qq!
* Name on card
* Card type$cardselect
* Card number
* Expiration!. expselect("DCRD", $paydate). qq!
* Name on card
', + html_between => '', form_action => 'dummy.cgi', layer_callback => sub { my $layer = shift; return ( shift @hide_payment_fields ? '' : $paybychecked{$layer} ) . ''; }, )->html; @@ -278,8 +298,42 @@ HTML::Widgets::SelectLayers->new( %> -* required fields -

First package + + + + + + + +<%= + foreach my $exempt_group ( @exempt_groups ) { + no strict 'refs'; + my $checked = ${"tax_$exempt_group"} ? 'CHECKED' : ''; + my $disabled = $checked ? '' : 'DISABLED'; + + $OUT .= qq! + + + !; + } +%> + + +
Tax Exempt ($exempt_group taxes) + - Exemption number
* required fields + +
+ +

First package @@ -429,10 +483,11 @@ I agree to the Terms of Se <%= length($terms_of_service) ? 'agree_to_terms(false)' : '' %> function fixup_form() { - + // copy payment method data up to OneTrueForm - var payment_method_elements = new Array( 'payinfo', 'payinfo1', 'payinfo2', 'payname', 'paycvv' , 'paystate', 'paytype', '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]; @@ -442,7 +497,20 @@ function fixup_form() { copyelement ( payment_method_form.elements[true_element_name], document.OneTrueForm.elements[true_element_name] ); } - + + + // copy tax exempt data up to OneTrueForm + + var tax_elements = new Array( + <%= join(', ', map "'tax_$_', 'tax_${_}_num'", @exempt_groups ) %> + ); + + for ( ii = 0 ; ii < tax_elements.length ; ii++ ) { + copyelement ( document.TaxForm.elements[tax_elements[ii]], + document.OneTrueForm.elements[tax_elements[ii]] ); + } + + // Copy signup details to OneTrueForm var signup_elements = new Array ( @@ -462,7 +530,6 @@ function fixup_form() { } function copyelement(from, to) { -// alert ( from + ' ' + to ); if ( from == undefined ) { to.value = ''; @@ -482,7 +549,7 @@ function copyelement(from, to) { to.value = from.value; } } -// alert(from.name + " (" + from.type + "): " + to.name + " => " + to.value); + //alert(from.name + " (" + from.type + "): " + to.name + " => " + to.value); } }