diff options
Diffstat (limited to 'fs_selfservice/FS-SelfService')
| -rw-r--r-- | fs_selfservice/FS-SelfService/cgi/small_custview.html | 15 |
1 files changed, 11 insertions, 4 deletions
diff --git a/fs_selfservice/FS-SelfService/cgi/small_custview.html b/fs_selfservice/FS-SelfService/cgi/small_custview.html index 308eae928..329f82e90 100644 --- a/fs_selfservice/FS-SelfService/cgi/small_custview.html +++ b/fs_selfservice/FS-SelfService/cgi/small_custview.html @@ -59,10 +59,17 @@ Customer #<B><%= $display_custnum %></B> </TR></TABLE> -<%= unless ( $access_pkgnum ) { - $OUT .= '<BR>Balance: <B>$'. $balance. '</B><BR>'; - } - ''; +<%= +unless ( $access_pkgnum ) { + if ($balance >= 0) { + $OUT .= '<BR>Balance: <B>'. $balance_pretty . '</B><BR>'; + } else { + my $credit_balance_pretty = $balance_pretty; + $credit_balance_pretty =~ s/-//; + $OUT .= '<BR>Credit Balance: <B>'. $credit_balance_pretty . '</B><BR>'; + } +} +''; %> </DIV> |