fixes cash pay issue.

This commit is contained in:
Bryce
2023-07-03 12:21:27 -07:00
parent b6fe435063
commit 1756051092
3 changed files with 19 additions and 2 deletions

View File

@@ -366,7 +366,8 @@
:transaction/description-original memo
:transaction/date (:payment/date payment)
:transaction/approval-status :transaction-approval-status/approved
:transaction/accounts [{:transaction-account/account (:db/id (a/get-account-by-numeric-code-and-sets 21000 ["default"]))
:transaction/accounts [{:db/id (str "transaction-account-" (:db/id vendor))
:transaction-account/account (:db/id (a/get-account-by-numeric-code-and-sets 21000 ["default"]))
:transaction-account/location "A"
:transaction-account/amount (Math/abs (:payment/amount base-payment))}]}]]
(-> []