account numbers.
This commit is contained in:
@@ -182,7 +182,8 @@
|
|||||||
{}
|
{}
|
||||||
(:entries args))
|
(:entries args))
|
||||||
all-vendors (into all-vendors new-hidden-vendors)
|
all-vendors (into all-vendors new-hidden-vendors)
|
||||||
all-accounts (transduce (map :account/code) conj #{} (a/get-accounts))
|
all-accounts (transduce (map (comp str :account/numeric-code)) conj #{} (a/get-accounts))
|
||||||
|
_ (println all-accounts)
|
||||||
transaction (doall (map
|
transaction (doall (map
|
||||||
(assoc-error (fn [entry]
|
(assoc-error (fn [entry]
|
||||||
(let [entry (-> entry
|
(let [entry (-> entry
|
||||||
|
|||||||
Reference in New Issue
Block a user