everything is audited.

This commit is contained in:
Bryce Covert
2020-09-04 19:53:39 -07:00
parent 3d0f079de2
commit 11f61464f5
15 changed files with 297 additions and 131 deletions

View File

@@ -91,7 +91,37 @@
:db/valueType :db.type/double
:db/cardinality :db.cardinality/one}
]]}})
]]}
:add-expected-deposits {:txes [[{:db/ident :expected-deposit/external-id
:db/doc "The external id for the deposit"
:db/valueType :db.type/string
:db/cardinality :db.cardinality/one
:db/unique :db.unique/identity}
{:db/ident :expected-deposit/client
:db/doc "The client for the deposit"
:db/valueType :db.type/ref
:db/cardinality :db.cardinality/one}
{:db/ident :expected-deposit/location
:db/doc "The location of the sale"
:db/valueType :db.type/string
:db/cardinality :db.cardinality/one}
{:db/ident :expected-deposit/date
:db/doc "The date the deposit was initiated"
:db/valueType :db.type/instant
:db/cardinality :db.cardinality/one}
{:db/ident :expected-deposit/total
:db/doc "The total amount on the deposit"
:db/valueType :db.type/double
:db/cardinality :db.cardinality/one}
{:db/ident :expected-deposit/fee
:db/doc "The total fee on the deposit"
:db/valueType :db.type/double
:db/cardinality :db.cardinality/one}]]} })

View File

@@ -3,7 +3,8 @@
[auto-ap.graphql.utils :refer [limited-clients]]
[auto-ap.utils :refer [dollars=]]
[clj-time.coerce :as c]
[datomic.api :as d]))
[datomic.api :as d]
[clojure.tools.logging :as log]))
(defn <-datomic [result]
(-> result
@@ -75,7 +76,6 @@
true
(merge-query {:query {:find ['?sort-default '?e]
:where ['[?e :sales-order/date ?sort-default]]}}))]
(cond->> query
true (d/query)
@@ -92,6 +92,7 @@
payments))
(defn get-graphql [args]
(log/info "ARGS" args)
(let [db (d/db (d/connect uri))
{ids-to-retrieve :ids matching-count :count} (raw-graphql-ids db args)]