notid/integreat
1
0
Fork 0
Code Issues Pull Requests 3 Actions Packages Projects Releases Wiki Activity

(cloud) Made invoice proposition a usable ion

Browse Source
This commit is contained in:
Bryce Covert
2023-03-21 19:18:51 -07:00
parent 444d8d25ef
commit 142d9474ae
6 changed files with 41 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
src/clj/auto_ap/jobs/ntg.clj
View File

@@ -3,6 +3,7 @@
[amazonica.aws.s3 :as s3]
[auto-ap.datomic.clients :as d-clients]
[auto-ap.jobs.core :refer [execute]]
[iol-ion.tx :refer [propose-invoice]]
[auto-ap.logging :as log]
[auto-ap.parse :as parse]
[auto-ap.time :as atime]
@@ -83,7 +84,7 @@
:destination-key invoice-key})
(->> (extract-invoice-details (read-csv k) clients)
(map (fn [i]
[:propose-invoice (assoc i :invoice/source-url invoice-url)]))
[`(propose-invoice ~(assoc i :invoice/source-url invoice-url))]))
))
(catch Exception e
(log/error ::cant-load-file

1
src/clj/auto_ap/jobs/sysco.clj
View File

@@ -5,6 +5,7 @@
[auto-ap.jobs.core :refer [execute]]
[auto-ap.datomic.clients :as d-clients]
[auto-ap.datomic.invoices :refer [code-invoice propose-invoice]]
[iol-ion.tx :refer [propose-invoice]]
[auto-ap.ledger :refer [transact-with-ledger]]
[auto-ap.parse :as parse]
[auto-ap.time :as t]