X-Git-Url: https://git.hcoop.net/hcoop/zz_old/portal.git/blobdiff_plain/1fe415e08e00c6d35d0561f8213914d3c15532a4..bde01dd3ce0444d75da0f3837bede5a037a18f3d:/money.mlt
diff --git a/money.mlt b/money.mlt
index 2293821..74bc1f6 100644
--- a/money.mlt
+++ b/money.mlt
@@ -37,7 +37,7 @@ end %>
<% elseif $"cmd" = "bals" then
showNormal := false %>
-
Balances
+Active Balances
<% foreach bal in Balance.listOwnedBalances () do %>
@@ -53,6 +53,45 @@ end %>
<% end %>
+<% elseif $"cmd" = "deadbals" then
+ showNormal := false %>
+
+Retired Balances
+
+
+
+<% elseif $"cmd" = "nbals" then
+ showNormal := false;
+ val bals = Balance.listNegativeOwnedBalances () %>
+
+Negative Active Balances (<% length bals %>)
+
+
+
<% elseif $"cmd" = "hosting" then
Group.requireGroupName "money";
showNormal := false %>
@@ -140,7 +179,13 @@ end %>
+
Date | Description | Amount |
-<% foreach (amount, trn) in Money.listUserTransactionsLimit (Init.getUserId (), 20) do %>
+<% foreach (amount, trn) in Money.listUserTransactionsLimit (Init.getUserId (), lookback) do %>
<% #d trn %> | <% Web.html (#descr trn) %> | <% amount %>/<% #amount trn %> |
<% end %>