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

make it possible to revert yodlee account id.

Browse Source
This commit is contained in:
Bryce Covert
2020-12-15 08:39:51 -08:00
parent d7e99205fc
commit c2407a73c6
3 changed files with 72 additions and 52 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
src/clj/auto_ap/square/core.clj
View File

@@ -103,7 +103,7 @@
{:headers {"Square-Version" "2020-08-12"
"Authorization" "Bearer EAAAEO2xSqesDutZz71hz3eulKmrlKTiEqG3uZ4j25x5GYlOluQ2cj2JxNUXqXD7"
"Content-Type" "application/json"}
:body (json/write-str (cond-> {"location_ids" [l] "limit" 4000}
:body (json/write-str (cond-> {"location_ids" [l] "limit" 10000}
d (merge (pc d))))
:as :json})
:body
@@ -127,6 +127,20 @@
"4X8T65741AEPS" ["NGVZ" "NP"]
"KMVFQ9CRCXJ10" ["NGZO" "VT"]} location))
;; to get totals:
(comment
(reduce
(fn [total i]
(+ total (+ (- (:sales-order/total i)
(:sales-order/tax i)
(:sales-order/tip i)
(:sales-order/service-charge i))
(:sales-order/returns i)
(:sales-order/discount i)
)))
0.0))
(defn daily-results [d]
(->> (locations)
(map :id)