| 1 | <% val you = Init.getUser(); |
| 2 | val bal = Balance.lookupBalance (#bal you); |
| 3 | @header [] %> |
| 4 | |
| 5 | <% @payment [] %> |
| 6 | |
| 7 | <h3><a href="money">Your recent account activity</a></h3> |
| 8 | |
| 9 | <table> |
| 10 | <tr> <td><b>Date</b></td> <td><b>Description</b></td> <td><b>Amount</b></td> </tr> |
| 11 | <% foreach (amount, trn) in Money.listUserTransactionsLimit (Init.getUserId (), 5) do %> |
| 12 | <tr> <td><% #d trn %></td> <td><a href="money?trn=<% #id trn %>"><% Web.html (#descr trn) %></a></td> <td><% amount %>/<% #amount trn %></td> </tr> |
| 13 | <% end %> |
| 14 | </table> |
| 15 | <b>Balance: $<% #amount bal %></b> |
| 16 | |
| 17 | <% val polls = Poll.listCurrentPolls (); |
| 18 | switch polls of |
| 19 | _::_ => %> |
| 20 | <h3><a href="poll">Current polls</a></h3> |
| 21 | |
| 22 | <% foreach pol in polls do %> |
| 23 | <li> <a href="poll?id=<% #id pol %>"><% Web.html (#title pol) %></a> |
| 24 | <% if Poll.takingVotes pol then %><a href="poll?vote=<% #id pol %>">[VOTE]</a><% end %> |
| 25 | (<% Web.html (#starts pol) %> to <% Web.html (#ends pol) %>)</li> |
| 26 | <% end |
| 27 | end %> |
| 28 | |
| 29 | <% val issues = Support.listOpenIssues (#id you); |
| 30 | switch issues of |
| 31 | _::_ => %> |
| 32 | <h3><a href="support">Open support issues</a></h3> |
| 33 | |
| 34 | <% foreach (name, issue) in issues do %> |
| 35 | <a href="user?id=<% #usr issue %>"><% name %></a>: <a href="issue?cat=<% #cat issue %>&id=<% #id issue %>"><% Web.html (#title issue) %></a> |
| 36 | <% switch #status issue of |
| 37 | Support.NEW => %>(New)<% |
| 38 | | Support.PENDING => %>(Pending)<% |
| 39 | | Support.CLOSED => %>(Closed)<% |
| 40 | end %> |
| 41 | <br> |
| 42 | <% end |
| 43 | end; |
| 44 | |
| 45 | @footer [] %> |