tweaks

src/clj/auto_ap/yodlee/core2.fiddle

@@ -0,0 +1,22 @@
+
+(in-ns 'auto-ap.yodlee.core2)
+
+(map :postDate (get-specific-transactions "NGGG" 	17203328))
+
+(->> (dc/q '[:find ?ba (count ?ya) 
+             :in $ 
+             :where [?ba :bank-account/yodlee-account ?ya]
+             ]
+           (dc/db conn))
+     (filter (comp #(> % 1) second)))
+
+(dc/q '[:find ?ya ?ba ?cd ?ud
+                                   :in $ ?cd
+                                   :where 
+                                   [?ba :bank-account/yodlee-account ?y]
+                                   [(get-else $ ?ba :bank-account/use-date-instead-of-post-date? false) ?ud]
+                                   [?c :client/bank-accounts ?ba]
+                                   [?c :client/code ?cd]
+                                   [?y :yodlee-account/id ?ya]]
+                                 (dc/db conn)
+      "NGGG")