checks are now stored

src/clj/auto_ap/db/checks.clj

@@ -31,6 +31,16 @@
       (dissoc :pdf-data)
       (dissoc :invoices)))
 
+(defn insert! [row]
+  (-> (j/insert! (get-conn)
+                 :checks
+                 (-> row
+                     fields->data
+                     clj->db))
+      first
+      db->clj
+      data->fields))
+
 (defn insert-multi! [rows]
   (->> (j/insert-multi! (get-conn)
                         :checks

src/clj/auto_ap/db/invoices_checks.clj

@@ -0,0 +1,32 @@
+(ns auto-ap.db.invoices-checks
+  (:require [auto-ap.db.utils :refer [clj->db db->clj get-conn execute!] :as u]
+            [auto-ap.entities.companies :as entity]
+            [clojure.edn :as edn]
+            [clojure.java.jdbc :as j]
+            [honeysql.core :as sql]
+            [honeysql.helpers :as helpers]))
+
+(def base-query (sql/build :select :*
+                           :from :invoices-checks))
+
+(defn query [q]
+  (map data->fields (u/query q)))
+
+(defn get-all []
+  (query base-query))
+
+(defn get-for-invoice-id [id]
+  (query (-> base-query
+             (helpers/merge-where [:= :invoice-id id]))))
+
+(defn get-by-id [id]
+  (first (query (-> base-query
+                    (helpers/merge-where [:= :id id])))))
+
+(defn insert-multi! [rows]
+  (->> (j/insert-multi! (get-conn)
+                        :invoices_checks
+                        (->> rows 
+                             (map clj->db)))
+       (map db->clj)
+       ))