fixes for kyle, ben, and cashflows.

This commit is contained in:
2023-03-14 20:42:09 -07:00
parent 437cbdcada
commit 12d9acba59
3 changed files with 10 additions and 4 deletions

View File

@@ -55,6 +55,7 @@
:account/invoice-allowance (some-> invoice-allowance (enum->keyword "allowance"))
:account/vendor-allowance (some-> vendor-allowance (enum->keyword "allowance"))
:account/default-allowance :allowance/allowed
:account/account-set account-set
:account/location location
:account/numeric-code (when-not id

View File

@@ -454,7 +454,7 @@
:bank-account-id (:db/id (:transaction/bank-account transaction))
:amount (- (:transaction/amount transaction))
:status :payment-status/pending
:date-range {:start (time/plus (:transaction/date transaction) (time/days 1))}})]
:date-range {:start (time/plus (:transaction/date transaction) (time/days -90))}})]
(map ->graphql (reverse (sort-by :payment/date payments)))))
(defn add-handwritten-check [context args _]

View File

@@ -121,9 +121,14 @@
(<= start account-code end)))
first
last)]
(if (= operation :add)
amount
(- amount))))
(cond (= operation :add)
amount
(= operation :subtract)
(- amount)
:else
amount)))
(defn min-numeric-code [category]
(->> (groupings category)