#{title'} $if elem AddPermission perms Kirjaa tapahtuma
$forall torig <- items

#{show (tdate torig)} $if not $ T.null $ tcode torig
(#{tcode torig})
#{textElideRight 60 (tdescription torig)} $if null $ filter isVisibleTag $ ttags torig $else
$forall (tagName, tagValue) <- filter isVisibleTag $ ttags torig

#{tagName}
#{tagValue}
$forall Posting { paccount = acc, pamount = amt, ptags = tags } <- tpostings torig

#{elideAccountName 40 acc}
^{mixedAmountAsHtml amt} $if null $ filter (isPostingTag acc) $ filter isVisibleTag tags $else
$forall (tagName, tagValue) <- filter (isPostingTag acc) $ filter isVisibleTag tags

#{tagName}
#{tagValue} $if elem AddPermission perms ^{addModal AddR j today}