notid/integreat
1
0
Fork 0
Code Issues Pull Requests 3 Actions Packages Projects Releases Wiki Activity

feat(transactions): port manual bank-transaction import to SSR #8

Closed
notid wants to merge 133 commits from integreat-add-transaction-manual into master
pull from: integreat-add-transaction-manual
merge into: notid:master
Conversation 0 Commits 133 Files Changed 413 +3
1 changed files with 3 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
Showing only changes of commit 8189a7648b - Show all commits

3
src/clj/auto_ap/ssr/transaction/edit.clj
View File

@@ -1002,6 +1002,9 @@
(let [{:keys [base-amount remainder]} (calculate-spread (:transaction-account/amount account) (count locations))] (let [{:keys [base-amount remainder]} (calculate-spread (:transaction-account/amount account) (count locations))]
(map-indexed (fn [idx _] (map-indexed (fn [idx _]
(assoc account (assoc account
:db/id (if (= idx 0)
(:db/id account)
(random-tempid))
:transaction-account/amount (+ base-amount (if (< idx remainder) 1 0)) :transaction-account/amount (+ base-amount (if (< idx remainder) 1 0))
:transaction-account/location (nth locations idx))) :transaction-account/location (nth locations idx)))
locations)) locations))