yammat/templates/journal.hamlet
nek0 f175d71198 Merge branch 'i18n' of https://github.com/astro/yammat into astro-i18n
Conflicts:
	Handler/CashCheck.hs
	Handler/NewUser.hs
	templates/journal.hamlet
	templates/modify.hamlet
2015-04-10 18:37:36 +02:00

40 lines
1.2 KiB
Plaintext

$doctype 5
<h3>Journal
$if not $ L.null entries
<table>
<thead>
<tr>
<th>_{MsgTime}
<th>_{MsgDescription}
<th>_{MsgValueIn $ appCurrency $ appSettings master}
$forall (eTransCash) <- list
$case eTransCash
$of Left trans
<tr>
<td>#{formatTime defaultTimeLocale "%A %F %H:%M" $ transactionTime trans}
<td>#{transactionDescription trans}
<td>#{formatIntCurrency (transactionAmount trans)} #{appCurrency $ appSettings master}
$of Right cash
<tr #check>
<td colspan="2">
_{MsgCashCheckOf $ formatTime defaultTimeLocale "%A %F %H:%M" $ cashCheckTime cash}:
<td>#{formatIntCurrency (cashCheckBalance cash)} #{appCurrency $ appSettings master}
<tfoot>
<tr>
<td colspan="2">_{MsgTotalValue}:
<td>#{formatIntCurrency (fromIntegral total)} #{appCurrency $ appSettings master}
<p>
_{MsgCashStock}: #{formatIntCurrency (fromIntegral cashBalance)} #{appCurrency $ appSettings master}
<ul>
<li>
<a href=@{PayoutR}>
_{MsgPayoutFromCash}
<li>
<a href=@{CashCheckR}>
_{MsgCashCheck}
$else
<p>_{MsgNothingToShow}