Makes a vendor account acceptable even if the invoice account isn't.

This commit is contained in:
2023-02-04 19:57:42 -08:00
parent afa6b79fcc
commit f7d5454d2c
8 changed files with 229 additions and 46 deletions

View File

@@ -189,8 +189,7 @@
(defn migrate [conn]
(let [
norms-map (merge {:auto-ap/base-schema {:txes auto-ap.datomic/base-schema}
(let [norms-map (merge {:auto-ap/base-schema {:txes auto-ap.datomic/base-schema}
:auto-ap/functions {:txes-fn 'auto-ap.datomic.migrate/functions
:requires [:auto-ap/base-schema]}
:auto-ap/fx-pay-function-10 {:txes-fn 'auto-ap.datomic.migrate/fix-pay-function
@@ -339,7 +338,8 @@
{:db/ident :account-client-override/name
:db/doc "client override"
:db/valueType :db.type/string
:db/cardinality :db.cardinality/one}]]}
:db/cardinality :db.cardinality/one}]]
:requires [:auto-ap/base-schema]}
:auto-ap/add-cleared-against {:txes [[{:db/ident :transaction/cleared-against
:db/doc "which entitiy it was cleared against"
:db/valueType :db.type/string
@@ -549,9 +549,10 @@
:db/cardinality :db.cardinality/one
:db/doc "a name search for accounts"
:db/fulltext true}]]
:requires [:auto-ap/add-account-overrides]}
:requires [:auto-ap/add-account-overrides :auto-ap/base-schema]}
:auto-ap/add-search-terms-accounts {:txes-fn `add-account-search-terms
:requires [:auto-ap/fulltext-accounts]}
:first-time-only true
:requires [:auto-ap/fulltext-accounts :auto-ap/base-schema :auto-ap/add-accounts]}
:auto-ap/add-account-options {:txes [[{:db/ident :account/invoice-allowance
:db/valueType :db.type/ref
:db/cardinality :db.cardinality/one
@@ -564,10 +565,11 @@
:db/doc "Warn on usage"}
{:db/ident :allowance/admin-only
:db/doc "Only admins can use it"}]]
:requires [:auto-ap/add-search-terms-accounts]}
:requires [:auto-ap/add-search-terms-accounts :auto-ap/add-accounts]}
:auto-ap/backfill-account-options {:txes-fn `backfill-account-options
:first-time-only true
:requires [:auto-ap/add-account-options]}
:requires [:auto-ap/add-account-options :auto-ap/add-accounts]}
:auto-ap/add-vendor-account-options2 {:txes [[{:db/ident :account/vendor-allowance
:db/valueType :db.type/ref
@@ -578,10 +580,10 @@
:db/cardinality :db.cardinality/one
:db/doc "Whether this account can be used generally"}
]]
:requires [:auto-ap/backfill-account-options]}
:requires [:auto-ap/backfill-account-options :auto-ap/add-accounts]}
:auto-ap/backfill-account-options3 {:txes-fn `backfill-account-options2
:requires [:auto-ap/add-vendor-account-options2]}}
:first-time-only true
:requires [:auto-ap/add-vendor-account-options2 :auto-ap/add-accounts]}}