added start date.

src/clj/auto_ap/datomic/clients.clj

@@ -1,7 +1,8 @@
 (ns auto-ap.datomic.clients
   (:require [datomic.api :as d]
             [auto-ap.datomic :refer [uri]]
-            [clojure.tools.logging :as log]))
+            [clojure.tools.logging :as log]
+            [clj-time.coerce :as coerce]))
 
 (defn cleanse [e]
   (-> e
@@ -13,6 +14,7 @@
                 (map (fn [i ba]
                        (-> ba
                            (update :bank-account/type :db/ident )
+                           (update :bank-account/start-date #(some-> % (coerce/to-date-time)))
                            (update :bank-account/sort-order (fn [so] (or so i)))))
                      (range) bas)))))
 (defn get-all []