now all payments can go through datomic, but pdfs need work.

src/cljs/auto_ap/views/pages/checks.cljs

@@ -155,8 +155,8 @@
                   [:td (:name client)])
                 [:td (:name vendor)]
                 [:td (cond
-                       (= "cash" type) "Cash"
-                       (= "debit" type) "Debit"
+                       (= :cash type) "Cash"
+                       (= :debit type) "Debit"
                        :else check-number)]
                 [:td (date->str date) ]
                 [:td (gstring/format "$%.2f" amount )]

src/cljs/auto_ap/views/pages/unpaid_invoices.cljs

@@ -164,6 +164,7 @@
 (re-frame/reg-event-fx
  ::print-checks
  (fn [{:keys [db]} [_ bank-account-id type]]
+   (println type)
    (let [invoice-amounts (by :id :outstanding-balance (get-in db [::invoice-page :invoices]))]
 
      {:db (-> db
@@ -203,7 +204,13 @@
                                               :amount (invoice-amounts (:id x))})
                                            (get-in db [::advanced-print-checks :invoices]))
                                       bank-account-id
-                                      (or type "check")
+                                      (cond (= type :check)
+                                            :check
+                                            (= type :cash)
+                                            :cash
+
+                                            :else
+                                            :check) 
                                       (:company db))  
 
        :on-success [::checks-created]}})))
@@ -809,11 +816,11 @@
               [:div.dropdown-content
                (list
                 (for [{:keys [id number name type]} (:bank-accounts current-company)]
-                  (if (= "cash" type)
-                    ^{:key id} [:a.dropdown-item {:on-click (dispatch-event [::print-checks id "cash"])} "With cash"]
+                  (if (= :cash type)
+                    ^{:key id} [:a.dropdown-item {:on-click (dispatch-event [::print-checks id :cash])} "With cash"]
                     (list
-                     ^{:key (str id "-check")} [:a.dropdown-item {:on-click (dispatch-event [::print-checks id "check"])} "Print checks from " name]
-                     ^{:key (str id "-debit")} [:a.dropdown-item {:on-click (dispatch-event [::print-checks id "debit"])} "Debit from " name])))
+                     ^{:key (str id "-check")} [:a.dropdown-item {:on-click (dispatch-event [::print-checks id :check])} "Print checks from " name]
+                     ^{:key (str id "-debit")} [:a.dropdown-item {:on-click (dispatch-event [::print-checks id :debit])} "Debit from " name])))
                 ^{:key "advanced-divider"} [:hr.dropdown-divider]
 
                 (when (= 1 (count checked))