added ability to link yodlee directly in.

This commit is contained in:
BC
2018-08-02 21:34:00 -07:00
parent a9d8bf21f9
commit dfbffdc01e
13 changed files with 151 additions and 2 deletions

View File

@@ -75,6 +75,23 @@
(recur (concat transactions transaction-batch) (+ batch-size skip))
transactions)))))
(defn get-access-token []
(let [cob-session (login-cobrand)
user-session (login-user cob-session)
token (->
(str (:yodlee-base-url env) "/user/accessTokens?appIds=" 10003600)
(client/get
{:headers (merge base-headers {"Authorization" (auth-header cob-session user-session)})
:as :json})
:body
:user
:accessTokens
first
:value
)]
[user-session token]))
(defn create-user []
(let [cob-session (login-cobrand)]
(-> (str (:yodlee-base-url env) "/user/register")