This commit is contained in:
2022-02-16 18:44:29 -08:00
parent 21d3d14c1f
commit 38befab81d
2 changed files with 12 additions and 9 deletions

View File

@@ -220,7 +220,8 @@
:where [?c :client/bank-accounts ?ba]
[?ba :bank-account/type :bank-account-type/cash]
]
(d/db conn))]
(d/db conn)
client-id)]
#:transaction {:amount (- (:invoice/total invoice))
:payment payment-id
:client (:invoice/client invoice)
@@ -230,7 +231,7 @@
:raw-id transaction-id
:vendor (:invoice/vendor invoice)
:description-original "Cash payment"
:date date
:date (to-date date)
:approval-status :transaction-approval-status/approved
:accounts [{:transaction-account/account (:db/id (a/get-account-by-numeric-code-and-sets 21000 ["default"]))
:transaction-account/location "A"