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

minor fixes.

Browse Source
This commit is contained in:
Bryce Covert
2022-12-11 07:17:30 -08:00
parent 6620666ca1
commit 51c7bc9bdb
2 changed files with 13 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
src/clj/auto_ap/graphql/ledger.clj
View File

@@ -518,8 +518,8 @@
{:filters {:client_id client-id
:location location
:date_range (:date_range input)
:from_numeric_code (get-in l-reports/ranges [category 0])
:to_numeric_code (get-in l-reports/ranges [category 1])
:from_numeric_code (l-reports/min-numeric-code category )
:to_numeric_code (l-reports/max-numeric-code category )
:per_page Integer/MAX_VALUE}}
nil)
:journal_entries
@@ -528,9 +528,7 @@
(filter (fn [jel]
(when-let [account (account-lookup (:id (:account jel)))]
(and
(<= (get-in l-reports/ranges [category 0])
(:numeric_code account)
(get-in l-reports/ranges [category 1]))
(l-reports/account-belongs-in-category? (:numeric-code account) category)
(= location (:location jel)))))
)
(map (fn [jel ]