fixes for kyle, ben, and cashflows.

src/clj/auto_ap/graphql/accounts.clj

@@ -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

src/clj/auto_ap/graphql/checks.clj

@@ -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 _]

src/cljc/auto_ap/ledger/reports.cljc

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