adding new invoices has validation.

This commit is contained in:
Bryce Covert
2018-05-23 12:16:18 -07:00
parent 0611c169c7
commit a0007c2bbc
4 changed files with 15 additions and 6 deletions

View File

@@ -2,6 +2,7 @@
(:require [re-frame.core :as re-frame]
[reagent.core :as r]
[clojure.string :as str]
[clojure.spec.alpha :as s]
[auto-ap.entities.companies :as company]
[auto-ap.entities.invoice :as invoice]
[auto-ap.entities.vendors :as vendor]
@@ -269,11 +270,11 @@
(defn new-invoice-modal []
(let [data @(re-frame/subscribe [::new-invoice])
change-event [::events/change-form [::new-invoice]]]
(println data)
[action-modal {:id ::new-invoice
:title "New Invoice"
:action-text "Create"
:save-event [::create-invoice]}
:save-event [::create-invoice]
:can-submit? (s/valid? ::invoice/invoice data)}
[horizontal-field
[:label.label "Vendor"]
[bind-field