invoice fixups.
This commit is contained in:
@@ -214,7 +214,7 @@
|
||||
(try
|
||||
(f entry)
|
||||
(catch Exception e
|
||||
(log/warn e)
|
||||
(log/warn (.getMessage e))
|
||||
(assoc entry :error (.getMessage e)
|
||||
:status (or (:status (ex-data e))
|
||||
:error))))))
|
||||
@@ -371,6 +371,7 @@
|
||||
retraction (mapv (fn [x] [:db/retractEntity [:journal-entry/external-id (:external_id x)]])
|
||||
success)]
|
||||
(log/info "manual ledger import has " (count success) " new rows")
|
||||
(log/info errors)
|
||||
|
||||
|
||||
(audit-transact-batch retraction (:id context))
|
||||
|
||||
Reference in New Issue
Block a user