Transactions in the last #{hrs} hours:

$forall (hrs',cap) <- buttonIntervals $if hrs == hrs' #{cap} $else #{cap}

Sort Mode Hide/Show Mode $forall Entity _ t <- trans

#{showDateTime $ transactionDateTime $ t} $if transactionTransForCorp t

P $if transactionTransIsSell t

#{transactionTypeName t}

#{transactionQuantity t}

#{prettyISK $ transactionPriceCents t}

#{prettyISK $ transactionQuantity t * transactionPriceCents t} $maybe profit <- transRealProfit t $if (&&) (transactionTransIsSell t) (profit > 0)

#{prettyISK $ profit} $elseif (&&) (transactionTransIsSell t) (profit < 0)

#{prettyISK $ profit} $elseif not (transactionTransIsSell t)

#{prettyISK $ profit} $else

#{prettyISK $ profit}

#{profitPercent profit t}% $nothing

$maybe secs <- transactionSecondsToSell t #{showSecsToSell secs} $nothing

#{transactionClientName t}

#{transactionStationName t}

Statistices for the last #{days} days:

$forall days' <- profitIntervals $if days == days' #{days'} days $else #{days'} days

Sort Mode Hide/Show Mode $forall (Profit t b s p bf tt) <- profits $with (ProfitSum b s p bf tt) <- profitssum

Date	ISK Buy	ISK Sell	ISK Profit	ISK Broker Fee	ISK Transaction Tax	Real Profit	%
#{show t}	#{prettyISK b}	#{prettyISK s}	#{prettyISK p}	#{prettyISK bf}	#{prettyISK tt}	#{transRealProfit' p bf tt}	$maybe pp <- profitPercent' p bf tt s #{pp} $nothing
Total	#{prettyISK b}	#{prettyISK s}	#{prettyISK p}	#{prettyISK bf}	#{prettyISK tt}	#{transRealProfit' p bf tt}	$maybe pp <- profitPercent' p bf tt s #{pp} $nothing