X-Git-Url: http://git.hcoop.net/hcoop/portal.git/blobdiff_plain/f8f485d8cde6e4617fa605a5284e293c557b9fc0..64264243ac899669f55285e53a5ba511bbac9340:/money.mlt diff --git a/money.mlt b/money.mlt index e846c3f..9129de9 100644 --- a/money.mlt +++ b/money.mlt @@ -7,7 +7,7 @@ ref showNormal = true; if $"hist" <> "" then showNormal := false; val id = Web.stoi ($"hist") %> -
Date | Description | Amount | ||||||||||||||||||||||||||||||||||
<% #d trn %> | <% Web.html (#descr trn) %> | <% amount %>/<% #amount trn %> |
Date | Description | Amount | Last modified | Participants | ||||||||||||||||||||||||||||||||
<% #d trn %> | <% Web.html (#descr trn) %> | <% #amount trn %> | <% #stamp trn %> | @@ -42,10 +42,10 @@ end %>
Date | Description | Amount | Last modified | Participants | |||||||||||||||||||
<% #d trn %> | <% Web.html (#descr trn) %> | <% #amount trn %> | <% #stamp trn %> | +||||||||||||||||||||
<% #d trn %> | <% Web.html (#descr trn) %> | <% #amount trn %> | <% #stamp trn %> | <% switch Money.listChargesWithNames (#id trn) of [(name, cha)] => %><% name %> | <% | _ => %>multi | <% @@ -579,7 +579,7 @@ elseif $"cmd" = "checkout" then elseif $"cmd" = "delinq" then showNormal := false; val dqs = Money.delinquentPledgers () %> -
Member | Pledge | Balance | |||||||||
---|---|---|---|---|---|---|---|---|---|---|---|
<% #name dq %> | <% #shares dq %> | $<% #balance dq %> |
Date | Member | Name on Card | Amount (After Fees) | @@ -681,7 +681,7 @@ Co-op balance: $<% #amount (Balance.lookupBalance (valOf (Balance.balanceNameToI | <% #name (Init.lookupUser (#webuser_id stripePmt)) %> | <% #paid_on stripePmt %> | <% #card_name stripePmt %> - | $<% #net stripePmt %> | +$<% #net stripePmt %> |