diff --git a/src/clj/auto_ap/datomic/invoices.clj b/src/clj/auto_ap/datomic/invoices.clj index 9865ac31..9613c8e8 100644 --- a/src/clj/auto_ap/datomic/invoices.clj +++ b/src/clj/auto_ap/datomic/invoices.clj @@ -14,6 +14,7 @@ [auto-ap.time-utils :refer [next-dom]] [clj-time.coerce :as coerce] [clj-time.core :as time] + [com.brunobonacci.mulog :as mu] [clojure.set :refer [rename-keys]] [datomic.api :as dc] [iol-ion.tx :refer [random-tempid]])) @@ -293,6 +294,8 @@ [])) (defn code-invoice [invoice] + (mu/log ::trying-to-code-invoice + :invoice invoice) (let [db (dc/db auto-ap.datomic/conn) client-id (:invoice/client invoice) vendor-id (:invoice/vendor invoice) diff --git a/src/clj/auto_ap/import/yodlee2.clj b/src/clj/auto_ap/import/yodlee2.clj index d8c8b887..b2db10c4 100644 --- a/src/clj/auto_ap/import/yodlee2.clj +++ b/src/clj/auto_ap/import/yodlee2.clj @@ -32,6 +32,7 @@ #:transaction {:post-date (coerce/to-date (atime/parse post-date "YYYY-MM-dd")) :id (di/sha-256 (str id)) + :db/id (random-tempid) :raw-id (str id) :account-id account-id :date (if use-date-instead-of-post-date? diff --git a/src/clj/auto_ap/jobs/sysco.clj b/src/clj/auto_ap/jobs/sysco.clj index 506215f2..e283aa80 100644 --- a/src/clj/auto_ap/jobs/sysco.clj +++ b/src/clj/auto_ap/jobs/sysco.clj @@ -11,6 +11,7 @@ [clj-time.coerce :as coerce] [clojure.data.csv :as csv] [clojure.java.io :as io] + [com.brunobonacci.mulog :as mu] [clojure.string :as str] [clojure.tools.logging :as log] [com.unbounce.dogstatsd.core :as statsd]