From 7b52c33bd48efe528b97171091396f9b1d7f8872 Mon Sep 17 00:00:00 2001
From: Bryce Covert <bryce@brycecovertoperations.com>
Date: Tue, 26 Jan 2021 07:28:47 -0800
Subject: [PATCH] adding integreat yodlee2 environment and try to prevent
 crashing?

---
 config/prod-background-worker.edn | 7 +++++++
 config/prod.edn                   | 8 ++++++++
 src/clj/auto_ap/yodlee/core2.clj  | 5 ++++-
 3 files changed, 19 insertions(+), 1 deletion(-)

diff --git a/config/prod-background-worker.edn b/config/prod-background-worker.edn
index ff2c67d7..6bff3dce 100644
--- a/config/prod-background-worker.edn
+++ b/config/prod-background-worker.edn
@@ -17,4 +17,11 @@
  :yodlee-proxy-port 8888
  :run-background? true
  :run-web? false
+
+ :yodlee2-admin-user "93398522-412b-470d-8400-3691392b12fb_ADMIN"
+ :yodlee2-integreat-user "integreat-main"
+ :yodlee2-client-id "3AATcwfPsWP1rP9oDoo4HvZhtaroGVcA"
+ :yodlee2-client-secret "cXTBmKbGfkaBFIpM"
+ :yodlee2-base-url "https://production.api.yodlee.com/ysl"
+ :yodlee2-fastlink "https://fl4.prod.yodlee.com/authenticate/USDevexProd2-319/fastlink/?channelAppName=usdevexprod2"
  }
diff --git a/config/prod.edn b/config/prod.edn
index 4a8c3689..55596073 100644
--- a/config/prod.edn
+++ b/config/prod.edn
@@ -17,4 +17,12 @@
  :yodlee-proxy-port 8888
  :run-background? false
  :run-web? true
+
+
+ :yodlee2-admin-user "93398522-412b-470d-8400-3691392b12fb_ADMIN"
+ :yodlee2-integreat-user "integreat-main"
+ :yodlee2-client-id "3AATcwfPsWP1rP9oDoo4HvZhtaroGVcA"
+ :yodlee2-client-secret "cXTBmKbGfkaBFIpM"
+ :yodlee2-base-url "https://production.api.yodlee.com/ysl"
+ :yodlee2-fastlink "https://fl4.prod.yodlee.com/authenticate/USDevexProd2-319/fastlink/?channelAppName=usdevexprod2"
  }
diff --git a/src/clj/auto_ap/yodlee/core2.clj b/src/clj/auto_ap/yodlee/core2.clj
index d5d780e9..1341f9e4 100644
--- a/src/clj/auto_ap/yodlee/core2.clj
+++ b/src/clj/auto_ap/yodlee/core2.clj
@@ -311,7 +311,10 @@
                              (mapcat (fn [client]
                                     (log/info "Upserting Yodlee Accounts for " (:client/code client))
                                     (lc/with-context {:client-code (:client/code client)}
-                                      (upsert-accounts-tx (:client/code client)))))
+                                      (try 
+                                        (upsert-accounts-tx (:client/code client))
+                                        (catch Exception e
+                                          (log/error "Could not update  client " (:client/code client)))))))
                              (async/to-chan (d-clients/get-all)))
     (let [result (async/<!! (async/into [] output-chan))]
       (log/info "Current yodlee state is " result)