X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=fs_selfservice%2FFS-SelfService%2Fcgi%2Fmyaccount.html;h=a6352e07a3e83af18cc12972577b91f9750e886e;hb=a1a0800de7c69fe5ee414b79e408ceacd4a1c2c3;hp=0de738515b872db92896249afc40b3e7384e9709;hpb=1958c28884c750ca37979f19bec3e3daf0386731;p=freeside.git
diff --git a/fs_selfservice/FS-SelfService/cgi/myaccount.html b/fs_selfservice/FS-SelfService/cgi/myaccount.html
index 0de738515..a6352e07a 100644
--- a/fs_selfservice/FS-SelfService/cgi/myaccount.html
+++ b/fs_selfservice/FS-SelfService/cgi/myaccount.html
@@ -2,19 +2,28 @@
<%= 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 .= '
|
---|