mirror of
https://github.com/simonmichael/hledger.git
synced 2024-09-19 18:29:36 +03:00
tools: generatejournal: vary amount, make reports with fewer zeroes
This commit is contained in:
parent
e9d2b56fb2
commit
d04a5a03f0
@ -40,7 +40,7 @@ showtxn txnno date acct1 acct2 =
|
||||
printf "%s transaction %d\n %-40s %2d A\n %-40s %2d A\n\n" d txnno acct1 amt acct2 (-amt)
|
||||
where
|
||||
d = show date
|
||||
amt = 1::Int
|
||||
amt = txnno
|
||||
|
||||
showmarketprice :: Day -> Double -> String
|
||||
showmarketprice date rate = printf "P %s A %.2f B\n" (show date) rate
|
||||
|
Loading…
Reference in New Issue
Block a user