notid/integreat
1
0
Fork 0
Code Issues Pull Requests 1 Actions Packages Projects Releases Wiki Activity

adds client label and allows sorting by date, status, amount.

Browse Source
This commit is contained in:
Bryce
2024-08-30 09:05:40 -07:00
parent 3b410cf200
commit ef6f0aef7d
2 changed files with 5 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/clj/auto_ap/ssr/ledger.clj
View File

@@ -477,9 +477,7 @@
:hide? (fn [args] :hide? (fn [args]
(and (= (count (:clients args)) 1) (and (= (count (:clients args)) 1)
(= 1 (count (:client/locations (:client args)))))) (= 1 (count (:client/locations (:client args))))))
:render (fn [x] [:div.flex.items-center.gap-2 (-> x :invoice/client :client/name) :render (fn [x] [:div.flex.items-center.gap-2 (-> x :journal-entry/client :client/name) ])}
(map #(com/pill {:color :primary} (-> % :invoice-expense-account/location))
(:invoice/expense-accounts x)) ])}
{:key "vendor" {:key "vendor"
:name "Vendor" :name "Vendor"

5
src/clj/auto_ap/ssr/payments.clj
View File

@@ -393,11 +393,12 @@
check-number))} check-number))}
{:key "status" {:key "status"
:name "Status" :name "Status"
:sort-key "status"
:render (fn [{:payment/keys [status]}] :render (fn [{:payment/keys [status]}]
(condp = status (condp = status
:payment-status/cleared :payment-status/cleared
(com/pill {:color :primary} "cleared") (com/pill {:color :primary} "cleared")
:payment-status/pending :payment-status/pending
(com/pill {:color :secondary} "pending") (com/pill {:color :secondary} "pending")
:payment-status/voided :payment-status/voided
@@ -406,10 +407,12 @@
""))} ""))}
{:key "date" {:key "date"
:name "Date" :name "Date"
:sort-key "date"
:show-starting "lg" :show-starting "lg"
:render (fn [{:payment/keys [date]}] :render (fn [{:payment/keys [date]}]
(some-> date (atime/unparse-local atime/normal-date)))} (some-> date (atime/unparse-local atime/normal-date)))}
{:key "amount" {:key "amount"
:sort-key "amount"
:name "Amount" :name "Amount"
:render (fn [{:payment/keys [amount]}] :render (fn [{:payment/keys [amount]}]
(some->> amount (format "$%.2f")))} (some->> amount (format "$%.2f")))}