diff --git a/src/clj/auto_ap/pdf/ledger.clj b/src/clj/auto_ap/pdf/ledger.clj
index 9391abea..a17f3502 100644
--- a/src/clj/auto_ap/pdf/ledger.clj
+++ b/src/clj/auto_ap/pdf/ledger.clj
@@ -228,7 +228,7 @@
 (defn make-cash-flows [args data]
   (let [data          (<-graphql data)
         args          (<-graphql args)
-        clients       (d/pull-many (d/db conn) '[:client/code :client/name :db/id] (:client-ids args))
+        clients       (pull-many (dc/db conn) '[:client/code :client/name :db/id] (:client-ids args))
         data          (->> data
                            :periods
                            (mapcat (fn [p1 p2]
@@ -310,7 +310,7 @@
         max-date (atime/unparse-local
                    (->> args :periods (map :end) last)
                    atime/iso-date)
-        names    (str/replace (->> args :client_ids (d/pull-many (d/db conn) [:client/name]) (map :client/name) (str/join "-")) #" " "_" )]
+        names    (str/replace (->> args :client_ids (pull-many (dc/db conn) [:client/name]) (map :client/name) (str/join "-")) #" " "_" )]
     (format "Cash-flows-%s-to-%s-for-%s" min-date max-date names)))
 
 (defn journal-detail-args->name [args]