diff --git a/src/clj/auto_ap/graphql/ledger.clj b/src/clj/auto_ap/graphql/ledger.clj index 26b66791..3cd590fb 100644 --- a/src/clj/auto_ap/graphql/ledger.clj +++ b/src/clj/auto_ap/graphql/ledger.clj @@ -250,7 +250,7 @@ :journal-entry/client [:client/code (:client_code entry)] :journal-entry/date (coerce/to-date (parse/parse-value :clj-time "MM/dd/yyyy" (:date entry))) :journal-entry/external-id (:external_id entry) - :journal-entry/vendor (all-vendors (:vendor_name entry)) + :journal-entry/vendor (:db/id (all-vendors (:vendor_name entry))) :journal-entry/amount (:amount entry) :journal-entry/note (:note entry) :journal-entry/cleared-against (:cleared_against entry) @@ -287,10 +287,10 @@ success)] (log/info "manual ledger import has " (count success) " new rows") (run! (fn [batch] - (log/info "transacting retraction batch") + (log/info "transacting retraction batch" (first batch)) @(d/transact (d/connect uri) batch)) (partition-all 100 retraction)) (run! (fn [batch] - (log/info "transacting success batch") + (log/info "transacting success batch" (first batch)) @(d/transact (d/connect uri) batch)) (partition-all 100 success)) {:successful (map (fn [x] {:external_id (:journal-entry/external-id x)}) success) :existing []