Don't import the wrong refunds

2021-08-27 08:09:22 -07:00
parent 98d1dac0b8
commit 8b0bc6fdfa
2 changed files with 12 additions and 14 deletions
--- a/src/clj/auto_ap/square/core.clj
+++ b/src/clj/auto_ap/square/core.clj
@@ -312,6 +312,7 @@
                                                               (log/warn "Retrying after failure " ex)
                                                               (if (> try-count 4) false true))})))]
    (->> refunds
+         (filter (fn [r] (= "COMPLETED" (:status r))))
         (map (fn [r]
                (let [[client location] (location_id->client-location l)]
                  #:sales-refund {:external-id (str "square/refund/" (:id r))