X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=fs_selfservice%2FFS-SelfService%2Fcgi%2Fmyaccount.html;h=66e2c692ed6a451f60fcae8196b766fb047228be;hb=8dd41f364aaba88969dfd0908feb22709025e7f6;hp=9b54794bcd6a7e913a9fe2d21f4e4a054523d8d8;hpb=40a7b3dc653e099f7bd0bd762b649b04c4432db2;p=freeside.git
diff --git a/fs_selfservice/FS-SelfService/cgi/myaccount.html b/fs_selfservice/FS-SelfService/cgi/myaccount.html
index 9b54794bc..66e2c692e 100644
--- a/fs_selfservice/FS-SelfService/cgi/myaccount.html
+++ b/fs_selfservice/FS-SelfService/cgi/myaccount.html
@@ -1,20 +1,29 @@
-<%= $url = "$selfurl?session=$session_id;action="; ''; %>
-<%= include('header') %>
+<%= $url = "$selfurl?action="; ''; %>
+<%= include('header', 'My Account') %>
Hello <%= $name %>!
-<%= $small_custview %>
+
+<%= include('small_custview') %>
+
-<%= if ( $access_pkgnum ) {
- $OUT .= qq!Balance: \$$balance
!;
- }
- '';
+
+<%=
+ $OUT .= qq! View All Invoices !;
%>
<%= if ( $balance > 0 ) {
- if (scalar(grep $_, @hide_payment_fields)) {
+ if (scalar(grep $_, @hide_payment_fields)) { # this sucks
$OUT .= qq! Make a payment
!;
} else {
- $OUT .= qq! Make a payment
!;
+ $OUT .= qq! Make a payment
!;
+ foreach my $term ( sort { $b <=> $a } keys %discount_terms_hash ) {
+ my $saved = $discount_terms_hash{$term}->[1];
+ my $amount = $discount_terms_hash{$term}->[2];
+ my $savings = ( $amount + $saved > 0 )
+ ? sprintf('%d', $saved / ( $amount + $saved ) * 100 ) : '0';
+ $OUT .= qq! Save $savings\% by paying for $term months: $amount
!;
+ }
+ $OUT .= qq!
!;
}
} %>
<%=
@@ -22,17 +31,17 @@ Hello <%= $name %>!
$OUT .= '
Open Invoices | !;
my $a=qq!';
$OUT .=
"$a\$!. $invoice->{'owed'}.
+ qq! | $a\$!. $invoice->{'owed'}.
' | '.
'if ( @support_services ) { $OUT .= '
|
---|