AP
Size: a a a
AP
DL
A
A
A
A
A
DL
A
A
(defn get-total-for [accts]
(as-> accts v
(concat '("hledger" "bal" "--value=end,$" "--format" "%(total)") v)
(apply shell/sh v)
(:out v)
(.split #"\n" v)
(last v)
(subs v 1)
(bigdec v)))
DL
(let [cmdline (str "hledger" "bal" "--value=end,$" "--flat" "--format" "%(total)" accts)
{:keys [out]} (shell/sh cmdline)]
(-> out
string/split-lines
last
(subs 1)
bigdec))
S
A
DL
A
LL
VL
A
PG