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

bug fix for ledgers missing bank account details.

Browse Source
This commit is contained in:
Bryce Covert
2023-04-26 09:56:42 -07:00
parent 6247164c33
commit 9ab89b2952
2 changed files with 11 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
docker-compose.dev.yml
View File

@@ -18,7 +18,11 @@ services:
restart: "always" restart: "always"
environment: environment:
- DATOMIC_PORT=4334 - DATOMIC_PORT=4334
- XMS=-Xms4g - XMS=-Xms3g
- XMX=-Xmx8g - XMX=-Xmx6g
ulimits:
nofile:
soft: 65536
hard: 65536
ports: ports:
- 4334:4334 - 4334:4334

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

@@ -69,15 +69,17 @@
({:bank-account-type/check :account-type/asset ({:bank-account-type/check :account-type/asset
:bank-account-type/cash :account-type/asset :bank-account-type/cash :account-type/asset
:bank-account-type/credit :account-type/liability} :bank-account-type/credit :account-type/liability}
(:db/ident (:bank-account/type (:account li)))))] (:db/ident (:bank-account/type (:journal-entry-line/account li)))))]
[(-> j :journal-entry/client :client/code) [(-> j :journal-entry/client :client/code)
(-> j :journal-entry/vendor :vendor/name) (-> j :journal-entry/vendor :vendor/name)
(atime/unparse (coerce/to-date-time (-> j :journal-entry/date)) (atime/unparse (coerce/to-date-time (-> j :journal-entry/date))
atime/normal-date) atime/normal-date)
(-> j :db/id) (-> j :db/id)
(-> li :db/id) (-> li :db/id)
(-> li :journal-entry-line/account :account/numeric-code) (or (-> li :journal-entry-line/account :account/numeric-code)
(-> li :journal-entry-line/account :account/name) (-> li :journal-entry-line/account :bank-account/numeric-code))
(or (-> li :journal-entry-line/account :account/name)
(-> li :journal-entry-line/account :bank-account/name))
(some-> account-type name ) (some-> account-type name )
(-> li :journal-entry-line/debit) (-> li :journal-entry-line/debit)
(-> li :journal-entry-line/credit) (-> li :journal-entry-line/credit)