sysco fix

This commit is contained in:
2022-09-28 09:05:46 -07:00
parent 4042f367a7
commit d6d1dfaf22

View File

@@ -118,10 +118,6 @@
(map :key))]
(statsd/event {:title "Sysco import started"
:text (format "Found %d sysco invoice to import: %s" (count keys) (pr-str keys))
:priority :low}
nil)
(log/infof "Found %d sysco invoice to import: %s" (count keys) (pr-str keys))
(let [transaction (->> keys
@@ -149,12 +145,9 @@
println)}))
[])))))
result (transact-with-ledger transaction {:user/name "sysco importer" :user/role "admin"})]
(log/infof "Imported %d invoices" (/ (count (:tempids result)) 2)))
#_(log/infof "Imported %d invoices" (/ (count (:tempids result)) 2)))
(doseq [k keys]
(mark-key k))
(statsd/event {:title "Sysco import ended"
:text "Sysco completed"
:priority :low} nil)))
(mark-key k))))
(defn -main [& _]