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

Fixing findage of duplicates

Browse Source
This commit is contained in:
Bryce Covert
2022-01-06 17:00:11 -08:00
parent d553e6a683
commit 634e4f4820
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
src/clj/auto_ap/datomic/transactions.clj
View File

@@ -26,7 +26,8 @@
:where :where
[?tx :transaction/bank-account ?ba] [?tx :transaction/bank-account ?ba]
[?tx :transaction/amount ?amount] [?tx :transaction/amount ?amount]
[?tx :transaction/date ?date]] [?tx :transaction/date ?date]
(not [?tx :transaction/approval-status :transaction-approval-status/suppressed])]
db db
(:bank-account-id args)) (:bank-account-id args))
(group-by (fn [[tx amount date]] (group-by (fn [[tx amount date]]