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

you can now delete yodlee accounts again.

Browse Source
This commit is contained in:
Bryce Covert
2020-12-22 14:21:13 -08:00
parent bbdb9602aa
commit c3b79a6f2f
4 changed files with 54 additions and 61 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
src/clj/auto_ap/routes/yodlee2.clj
View File

@@ -72,15 +72,19 @@
:headers {"Content-Type" "application/edn"}
:body (pr-str {:message (.getMessage e)
:error (.toString e)})})))
(POST "/provider-accounts/delete/:id" {:keys [query-params identity] {:keys [id]} :route-params :as request}
(POST "/provider-accounts/delete/" {:keys [query-params edn-params identity] {:keys [id]} :route-params :as request}
(assert-admin identity)
(try
(let [[session token] (yodlee/get-access-token)]
(yodlee/delete-provider-account (Long/parseLong id))
{:status 200
:headers {"Content-Type" "application/edn"}
:body (pr-str @yodlee/in-memory-cache) })
(yodlee/delete-provider-account (-> (:client-id edn-params)
Long/parseLong
d-clients/get-by-id
:client/code)
(:provider-account-id edn-params))
{:status 200
:headers {"Content-Type" "application/edn"}
:body (pr-str {}) }
(catch Exception e
(log/error e)
{:status 400
:headers {"Content-Type" "application/edn"}
:body (pr-str {:message (.getMessage e)

4
src/clj/auto_ap/yodlee/core2.clj
View File

@@ -260,7 +260,7 @@
(defn delete-provider-account [client-code id]
(let [cob-session (login-user client-code)]
(let [cob-session (login-user (client-code->login client-code))]
(-> (str (:yodlee2-base-url env) "/providerAccounts/" id )
@@ -270,7 +270,7 @@
:body
:providerAccount
first))
@(d/transact conn [:db/retractEntity [:yodlee-provider-account/id id]]))
@(d/transact conn [[:db/retractEntity (:db/id (d/entity (d/db conn) [:yodlee-provider-account/id id]))]]))
(defn upsert-accounts-tx
([client-code]