automated imports.

src/cljs/auto_ap/routes.cljs

@@ -15,4 +15,5 @@
                                "import" :import-invoices
                                "unpaid" :unpaid-invoices
                                "paid" :paid-invoices
-                               "new" :new-invoice}}])
+                               "new" :new-invoice}
+                  "transactions/" {"" :transactions}}])

src/cljs/auto_ap/views/components/typeahead.cljs

@@ -10,7 +10,6 @@
         select (fn [[id text-description text-value]]
                  (reset! selected  id)
                  (reset! text text-description)
-                 (println (= :not-found id))
                  (when on-change
                    (if (= :not-found id)
                      (on-change nil text-description text-value)

src/cljs/auto_ap/views/main.cljs

@@ -15,6 +15,7 @@
     :needs-activation :blank
     :index :left-panel
     :invoices :left-panel
+    :transactions :left-panel
     :import-invoices :left-panel
     :unpaid-invoices :left-panel
     :paid-invoices :left-panel
@@ -191,8 +192,14 @@
          [:li.menu-item
           [:a {:href (bidi/path-for routes/routes :checks), :class (str "item" (active-when= ap :checks))}
            [:span {:class "icon"}
-            [:i {:class "fa fa-envelope-o"}]]
-           [:span {:class "name"} "Payments"]]]
+            [:i {:class "fa fa-money"}]]
+           [:span {:class "name"} "Checks"]]]
+
+         [:li.menu-item
+          [:a {:href (bidi/path-for routes/routes :transactions), :class (str "item" (active-when= ap :transactions))}
+           [:span {:class "icon"}
+            [:i {:class "fa fa-exchange"}]]
+           [:span {:class "name"} "Transactions"]]]
 
          [:ul ]]]
 

src/cljs/auto_ap/views/pages.cljs

@@ -15,6 +15,7 @@
             [auto-ap.views.pages.admin.reminders :refer [admin-reminders-page]]
             [auto-ap.views.pages.unpaid-invoices :refer [unpaid-invoices-page]]
             [auto-ap.views.pages.checks :refer [checks-page]]
+            [auto-ap.views.pages.transactions :refer [transactions-page]]
             [auto-ap.views.pages.new-invoice :refer [new-invoice-page]]
             [auto-ap.views.pages.import-invoices :refer [import-invoices-page]]
             [auto-ap.views.pages.admin.excel-import :refer [admin-excel-import-page]]
@@ -68,6 +69,9 @@
 (defmethod active-page :checks []
   [checks-page])
 
+(defmethod active-page :transactions []
+  [transactions-page])
+
 (defmethod active-page :invoices []
   [(with-meta
      (fn []

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

@@ -131,7 +131,7 @@
     (fn []
       (let [current-company @(re-frame/subscribe [::subs/company])]
         [:div 
-         [:h1.title "Payments"]
+         [:h1.title "Checks"]
          [check-table {:id :checks
                        :params (re-frame/subscribe [::params])
                        :check-page (re-frame/subscribe [::check-page])

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

@@ -207,7 +207,6 @@
  ::create-invoice
  (fn [{:keys [db]} _]
    (let [new-invoice @(re-frame/subscribe [::new-invoice])]
-     (println new-invoice)
      {:graphql
       {:token (-> db :user)
        :query-obj {:venia/operation {:operation/type :mutation

src/cljs/auto_ap/views/utils.cljs

@@ -73,7 +73,6 @@
         event (if (keyword? event) [event] event)
         keys (assoc keys
                     :on-change (fn [selected text-description text-value]
-                                 (println "HERE " selected text-description text-value)
                                  (re-frame/dispatch (conj (conj event field) selected))
                                  (when text-field
                                    (re-frame/dispatch (conj (conj event text-field) text-value))))