lots of new fixes.
This commit is contained in:
@@ -1,5 +1,6 @@
|
||||
(ns auto-ap.entities.transaction-rule
|
||||
(:require [clojure.spec.alpha :as s]
|
||||
(:require [auto-ap.entities.transaction-rule-account :as transaction-rule-account]
|
||||
[clojure.spec.alpha :as s]
|
||||
[clojure.string :as str]))
|
||||
|
||||
(s/def ::client (s/nilable map?))
|
||||
@@ -12,6 +13,7 @@
|
||||
(s/def ::bank-account (s/nilable map?))
|
||||
(s/def ::vendor (s/nilable map?))
|
||||
(s/def ::yodlee-merchant (s/nilable map?))
|
||||
(s/def ::accounts (s/coll-of ::transaction-rule-account/transaction-rule-account :min-count 1))
|
||||
|
||||
(s/def ::transaction-rule (s/and (s/keys :req-un [::client
|
||||
::description
|
||||
@@ -21,7 +23,8 @@
|
||||
::dom-lte
|
||||
::note
|
||||
::bank-account
|
||||
::vendor]
|
||||
::vendor
|
||||
::accounts]
|
||||
:opt-un [::yodlee-merchant])
|
||||
|
||||
(s/or :description-required #(not (str/blank? (:description %)))
|
||||
|
||||
10
src/cljc/auto_ap/entities/transaction_rule_account.cljc
Normal file
10
src/cljc/auto_ap/entities/transaction_rule_account.cljc
Normal file
@@ -0,0 +1,10 @@
|
||||
(ns auto-ap.entities.transaction-rule-account
|
||||
(:require [clojure.spec.alpha :as s]
|
||||
[clojure.string :as str]))
|
||||
|
||||
|
||||
|
||||
(s/def ::account map?)
|
||||
|
||||
(s/def ::transaction-rule-account (s/keys :req-un [::account]
|
||||
:opt-un []))
|
||||
Reference in New Issue
Block a user