starting to be able to choose invoices
This commit is contained in:
@@ -24,12 +24,12 @@
|
||||
|
||||
|
||||
|
||||
(defn invoice-table [{:keys [id invoice-page status on-params-change vendors params check-boxes on-check-changed]}]
|
||||
(defn invoice-table [{:keys [id invoice-page status on-params-change vendors params check-boxes checked on-check-changed]}]
|
||||
(let [state (reagent/atom (or @params {}))
|
||||
opc (fn [p]
|
||||
(swap! state merge p)
|
||||
(on-params-change p))]
|
||||
(fn [{:keys [id invoice-page status on-params-change vendors]}]
|
||||
(fn [{:keys [id invoice-page status on-params-change vendors checked]}]
|
||||
(let [{:keys [sort-by asc]} @state
|
||||
{:keys [invoices start end count total]} @invoice-page]
|
||||
[:div
|
||||
@@ -82,8 +82,12 @@
|
||||
^{:key id}
|
||||
[:tr
|
||||
(when check-boxes
|
||||
[:td [:input.checkbox {:type "checkbox" :on-change (fn [x e] (when on-check-changed
|
||||
(on-check-changed id)))} ]])
|
||||
[:td [:input.checkbox {:type "checkbox"
|
||||
:checked (if (get checked id)
|
||||
"checked"
|
||||
"")
|
||||
:on-change (fn [x e] (when on-check-changed
|
||||
(on-check-changed id)))} ]])
|
||||
[:td (:name vendor)]
|
||||
[:td (:name company)]
|
||||
[:td invoice-number]
|
||||
|
||||
Reference in New Issue
Block a user