diff --git a/src/clj/auto_ap/graphql.clj b/src/clj/auto_ap/graphql.clj index 2612d03e..2d64ce86 100644 --- a/src/clj/auto_ap/graphql.clj +++ b/src/clj/auto_ap/graphql.clj @@ -598,7 +598,12 @@ (->graphql users))) - +#_{:clj-kondo/ignore [:clojure-lsp/unused-public-var]} +(defn categorize [x] + (cond (<= x 0) :due + (<= x 30 ) :due-30 + (<= x 60 ) :due-60 + :else :due-later)) (defn get-expense-account-stats [_ {:keys [client_id] } _] diff --git a/src/clj/auto_ap/import/yodlee2.clj b/src/clj/auto_ap/import/yodlee2.clj index 42a2a1ca..bd444c51 100644 --- a/src/clj/auto_ap/import/yodlee2.clj +++ b/src/clj/auto_ap/import/yodlee2.clj @@ -15,6 +15,7 @@ [unilog.context :as lc] [yang.scheduler :as scheduler])) +#_{:clj-kondo/ignore [:unresolved-var]} (defn yodlee->transaction [transaction use-date-instead-of-post-date?] (let [{post-date :postDate account-id :accountId @@ -32,8 +33,7 @@ date (atime/parse date "YYYY-MM-dd")] #:transaction {:post-date (coerce/to-date (atime/parse post-date "YYYY-MM-dd")) - :id #_{:clj-kondo/ignore [:unresolved-var]} - (di/sha-256 (str id)) + :id (di/sha-256 (str id)) :raw-id (str id) :account-id account-id :date (if use-date-instead-of-post-date? diff --git a/src/clj/auto_ap/yodlee/core2.clj b/src/clj/auto_ap/yodlee/core2.clj index f59831b0..ae3aced1 100644 --- a/src/clj/auto_ap/yodlee/core2.clj +++ b/src/clj/auto_ap/yodlee/core2.clj @@ -87,6 +87,7 @@ :token :accessToken)))) +#_{:clj-kondo/ignore [:clojure-lsp/unused-public-var]} (defn get-accounts [client-code ] (let [cob-session (login-user (client-code->login client-code))] (-> (str (:yodlee2-base-url env) "/accounts") @@ -124,6 +125,7 @@ +#_{:clj-kondo/ignore [:clojure-lsp/unused-public-var]} (defn get-transactions [client-code] (let [cob-session (login-user (client-code->login client-code)) batch-size 100 @@ -172,6 +174,7 @@ :providerAccount first))) +#_{:clj-kondo/ignore [:clojure-lsp/unused-public-var]} (defn update-provider-account [client-code pa] (let [cob-session (login-user (client-code->login client-code))] @@ -216,6 +219,7 @@ (log/error e) (throw e)))) +#_{:clj-kondo/ignore [:clojure-lsp/unused-public-var]} (defn create-user [client-code] (let [cob-session (login-cobrand)] (-> (str (:yodlee2-base-url env) "/user/register") @@ -263,6 +267,7 @@ provider-account-ids))) +#_{:clj-kondo/ignore [:clojure-lsp/unused-public-var]} (defn get-provider-accounts-with-accounts [client-code] (let [provider-accounts (by :id (get-provider-accounts-with-details client-code)) accounts (get-accounts-for-providers client-code (keys provider-accounts))] diff --git a/src/clj/user.clj b/src/clj/user.clj index 744d8745..bb595735 100644 --- a/src/clj/user.clj +++ b/src/clj/user.clj @@ -533,6 +533,7 @@ (square/upsert client square-location (c/to-date-time date) (t/plus (c/to-date-time date) (t/days 1)))))) +#_{:clj-kondo/ignore [:clojure-lsp/unused-public-var]} (defn upsert-invoice-amounts [tsv] (let [data (with-open [reader (io/reader (char-array tsv))] (doall (csv/read-csv reader :separator \tab))) diff --git a/src/cljs/auto_ap/views/components/invoice_table.cljs b/src/cljs/auto_ap/views/components/invoice_table.cljs index ad3df282..384319ce 100644 --- a/src/cljs/auto_ap/views/components/invoice_table.cljs +++ b/src/cljs/auto_ap/views/components/invoice_table.cljs @@ -260,7 +260,7 @@ [grid/grid {:data-page data-page :check-boxes? check-boxes :column-count (if selected-client 8 9)} - [grid/controls {:action-buttons action-buttons} + [grid/controls (assoc data :action-buttons action-buttons) [:div.level-item [:div.tags [:div.tag.is-info.is-light "Outstanding " (nf (:outstanding data))] diff --git a/src/cljs/auto_ap/views/pages/payments/table.cljs b/src/cljs/auto_ap/views/pages/payments/table.cljs index e6f83620..eee0dd4d 100644 --- a/src/cljs/auto_ap/views/pages/payments/table.cljs +++ b/src/cljs/auto_ap/views/pages/payments/table.cljs @@ -110,7 +110,7 @@ [grid/grid {:data-page data-page :check-boxes? true :column-count (if selected-client 7 8)} - [grid/controls {:action-buttons action-buttons} data] + [grid/controls (assoc data :action-buttons action-buttons) data] [grid/table {:fullwidth true} [grid/header {} [grid/row {:id "header" diff --git a/src/cljs/auto_ap/views/pages/transactions/table.cljs b/src/cljs/auto_ap/views/pages/transactions/table.cljs index e343310d..783c439e 100644 --- a/src/cljs/auto_ap/views/pages/transactions/table.cljs +++ b/src/cljs/auto_ap/views/pages/transactions/table.cljs @@ -69,7 +69,7 @@ [grid/grid {:data-page data-page :column-count (if selected-client 6 7) :check-boxes? check-boxes?} - [grid/controls {:action-buttons action-buttons} + [grid/controls (assoc data :action-buttons action-buttons) data] [grid/table {:fullwidth true} [grid/header {}