removed way of finding old checks.

This commit is contained in:
BC
2018-07-12 22:58:25 -07:00
parent 00d468a403
commit 29bbe10826

View File

@@ -121,20 +121,3 @@
yodlee-account-id->bank-account-id (by :yodlee-account-id :bank-account-id all-bank-accounts)]
(import-transactions transactions yodlee-account-id->company yodlee-account-id->bank-account-id)))
#_(defn match-old-checks []
(let [transactions (transactions/get-unmatched)]
(doseq [transaction transactions]
(when-let (transaction->check-id transaction
(:check-number transaction)
(:company-id transaction)
(:band-account-id transaction)
(:amount transaction))
(transactions/upsert!
{:id id
:check-id check-id})
(when check-id
(checks/update! {:id check-id :status "cleared"}))
)
)
)
)