(cloud) made cintas imports work smoothly
This commit is contained in:
@@ -1,8 +1,7 @@
|
||||
(ns auto-ap.jobs.ntg
|
||||
(:require
|
||||
[amazonica.aws.s3 :as s3]
|
||||
[iol-ion.tx :refer [propose-invoice]]
|
||||
[auto-ap.datomic :refer [conn audit-transact]]
|
||||
[auto-ap.datomic :refer [audit-transact conn]]
|
||||
[auto-ap.jobs.core :refer [execute]]
|
||||
[auto-ap.logging :as log]
|
||||
[auto-ap.parse :as parse]
|
||||
@@ -14,7 +13,8 @@
|
||||
[clojure.string :as str]
|
||||
[clojure.xml :as xml]
|
||||
[clojure.zip :as zip]
|
||||
[datomic.client.api :as d])
|
||||
[datomic.client.api :as d]
|
||||
[iol-ion.tx :refer [propose-invoice random-tempid]])
|
||||
(:import
|
||||
(java.util UUID)))
|
||||
|
||||
@@ -148,7 +148,8 @@
|
||||
:content
|
||||
first
|
||||
Double/parseDouble)
|
||||
invoice {:invoice/vendor :vendor/cintas
|
||||
invoice {:db/id (random-tempid)
|
||||
:invoice/vendor :vendor/cintas
|
||||
:invoice/import-status :import-status/imported
|
||||
:invoice/status :invoice-status/unpaid
|
||||
:invoice/location location
|
||||
@@ -175,6 +176,7 @@
|
||||
(-> vendor :vendor/default-account :db/id)
|
||||
:invoice-expense-account/location location
|
||||
:invoice-expense-account/amount (Math/abs total)
|
||||
:db/id (random-tempid)
|
||||
}]}]
|
||||
(log/info ::cintas-invoice-importing
|
||||
:invoice invoice)
|
||||
|
||||
Reference in New Issue
Block a user