makes signature show up and adds logging for why invoice might be imported wrong.

This commit is contained in:
2024-05-30 20:36:03 -07:00
parent e43f313ac0
commit bd3432f540
4 changed files with 30 additions and 7 deletions

View File

@@ -969,9 +969,17 @@
:headers (client-base-headers client)
:as :json})
:body)))
(->>
@(let [[c [l]] (get-square-client-and-location "NGGG")]
(search c l (time/plus (time/now))))
(filter (fn [r]
(str/starts-with? (:created_at r) "2024-03-14"))))
(def refs
(->>
@(let [[c [l]] (get-square-client-and-location "NGCL")]
@(let [[c [l]] (get-square-client-and-location "NGGG")]
(refunds-raw-cont c l nil []))
@@ -984,6 +992,8 @@
(map (fn [r] @(get-payment c (:payment_id r))) refs))
(get-square-client-and-location "NGGB")
(def my-results
(let [[c [l]] (get-square-client-and-location "NGFA")]))