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

protoype.

Browse Source
This commit is contained in:
Bryce Covert
2019-04-06 14:13:33 -07:00
parent 039b513ed1
commit a7aa5f3452
4 changed files with 131 additions and 39 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/clj/auto_ap/graphql.clj
View File

@@ -130,8 +130,10 @@
:description_original {:type 'String}
:description_simple {:type 'String}
:status {:type 'String}
:merchant_name {:type 'String}
:client {:type :client}
:payment {:type :payment}
:vendor {:type :vendor}
:bank_account {:type :bank_account}
:date {:type 'String}
:post_date {:type 'String}}}

27
src/clj/auto_ap/yodlee/core.clj
View File

@@ -25,18 +25,21 @@
:cobSession))
(defn login-user [cob-session]
(-> (str (:yodlee-base-url env) "/user/login")
(client/post {:headers (merge base-headers {"Authorization" (auth-header cob-session)})
:body
(json/write-str {:user {:loginName (:yodlee-user-login env)
:password (:yodlee-user-password env)
:locale "en_US"}})
:as :json})
:body
:user
:session
:userSession))
(defn login-user
([cob-session] (:yodlee-user-login env) (:yodlee-user-password env))
([cob-session user password]
(-> (str (:yodlee-base-url env) "/user/login")
(client/post {:headers (merge base-headers {"Authorization" (auth-header cob-session)})
:body
(json/write-str {:user {:loginName user
:password password
:locale "en_US"}})
:as :json})
:body
:user
:session
:userSession))
)
(defn get-accounts []
(let [cob-session (login-cobrand)

3
src/clj/auto_ap/yodlee/import.clj
View File

@@ -83,8 +83,7 @@
:payment (when check-id
{:db/id check-id
:payment/status :payment-status/cleared}
)
})]
)})]
(d/transact (d/connect uri))))