Fixes balance sheet export

src/cljc/auto_ap/ledger/reports.cljc

@@ -808,13 +808,15 @@
                                    {:value "+/-"}]))))))))
 
 (defn append-deltas [table]
+  (println "APENDATION")
   (->> table 
        (map (fn [[title a b]]
               [title a b (and (:value a) (:value b)
+                              (number? a) (number? b)
                               {:border (:border b)
                                                     :format :dollar
-                               :value  (- (or (:value a) 0.0)
-                                          (or (:value b) 0.0))})]))))
+                               :value  (- (doto (or (:value a) 0.0) println)
+                                          (doto (or (:value b) 0.0) println))})]))))
 
 
 #_(defn summarize-balance-sheet [pnl-data]