shows the matching information.
This commit is contained in:
@@ -46,6 +46,12 @@
|
||||
:invoice-status/paid
|
||||
:invoice-status/unpaid)]])})}]] )
|
||||
|
||||
(def add-client-identifier
|
||||
[[{:db/ident :invoice/client-identifier
|
||||
:db/doc "An identifier found in an uploaded invoice"
|
||||
:db/valueType :db.type/string
|
||||
:db/cardinality :db.cardinality/one}]])
|
||||
|
||||
(defn -main [& args]
|
||||
(println "Creating database...")
|
||||
(d/create-database uri)
|
||||
@@ -78,6 +84,7 @@
|
||||
:auto-ap/add-new-vendors {:txes-fn 'auto-ap.datomic.migrate.add-new-vendors/add-new-vendors :requires [:auto-ap/fix-check-numbers]}
|
||||
:auto-ap/add-account-visibility-fields {:txes-fn 'auto-ap.datomic.migrate.account-sorting/add-account-visibility-fields :requires [:auto-ap/add-new-vendors]}
|
||||
:auto-ap/make-every-account-visible {:txes-fn 'auto-ap.datomic.migrate.account-sorting/make-every-account-visible :requires [:auto-ap/add-account-visibility-fields]}
|
||||
:auto-ap/add-client-identifier2 {:txes add-client-identifier :requires [:auto-ap/make-every-account-visible]}
|
||||
|
||||
}]
|
||||
(println "Conforming database...")
|
||||
|
||||
Reference in New Issue
Block a user