cleaned up how these are generated.
This commit is contained in:
@@ -237,7 +237,7 @@
|
||||
:class (status/class-for (get unautopay-states (:id i)))
|
||||
:event [::unautopay i]}])]]]))
|
||||
|
||||
(defn invoice-table [{:keys [check-boxes overrides actions data-page checkable-fn]}]
|
||||
(defn invoice-table [{:keys [check-boxes overrides actions data-page checkable-fn action-buttons]}]
|
||||
(let [{:keys [data status params table-params]} @(re-frame/subscribe [::data-page/page data-page])
|
||||
selected-client @(re-frame/subscribe [::subs/client])
|
||||
is-loading? (= :loading (:state status))
|
||||
@@ -260,10 +260,11 @@
|
||||
[grid/grid {:data-page data-page
|
||||
:check-boxes? check-boxes
|
||||
:column-count (if selected-client 8 9)}
|
||||
[grid/controls data
|
||||
[grid/controls {:action-buttons action-buttons}
|
||||
[:div.level-item
|
||||
"Outstanding " (nf (:outstanding data))
|
||||
" Total " (nf (:total-amount data))]]
|
||||
[:div.tags
|
||||
[:div.tag.is-info.is-light "Outstanding " (nf (:outstanding data))]
|
||||
[:div.tag.is-info.is-light " Total " (nf (:total-amount data))]]]]
|
||||
(for [invoices invoice-groups]
|
||||
^{:key (or (:id (first invoices)) "init")}
|
||||
[grid/table {:fullwidth true}
|
||||
|
||||
Reference in New Issue
Block a user