notid/integreat
1
0
Fork 0
Code Issues Pull Requests 2 Actions Packages Projects Releases Wiki Activity

docker-ifyed.

Browse Source
This commit is contained in:
Bryce Covert
2017-12-20 10:57:08 -08:00
parent ee3ea0be2c
commit 4625ef4474
15 changed files with 63 additions and 32 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
src/clj/auto_ap/db/invoices.clj
View File

@@ -1,28 +1,28 @@
(ns auto-ap.db.invoices
(:require [clojure.java.jdbc :as j]
[auto-ap.db.utils :refer [clj->db db->clj conn]]))
[auto-ap.db.utils :refer [clj->db db->clj get-conn]]))
(defn insert-multi! [rows]
(j/insert-multi! conn
(j/insert-multi! (get-conn)
:invoices
(map clj->db rows)))
(defn get-all []
(map db->clj (j/query conn "SELECT * FROM invoices")))
(map db->clj (j/query (get-conn) "SELECT * FROM invoices")))
(defn approve []
(map db->clj (j/update! conn :invoices {:imported true} [] )))
(map db->clj (j/update! (get-conn) :invoices {:imported true} [] )))
(defn reject []
(j/delete! conn :invoices ["imported = false"]))
(j/delete! (get-conn) :invoices ["imported = false"]))
(defn get-unpaid [company]
(if company
(map db->clj (j/query conn ["SELECT * FROM invoices WHERE imported=true AND company = ?" company]))
(map db->clj (j/query conn "SELECT * FROM invoices WHERE imported=true"))))
(map db->clj (j/query (get-conn) ["SELECT * FROM invoices WHERE imported=true AND company = ?" company]))
(map db->clj (j/query (get-conn) "SELECT * FROM invoices WHERE imported=true"))))
(defn get-pending [company]
(if company
(map db->clj (j/query conn ["SELECT * FROM invoices WHERE (imported=false or imported is null) AND company = ?" company]))
(map db->clj (j/query conn"SELECT * FROM invoices WHERE imported=false or imported is null"))))
(map db->clj (j/query (get-conn) ["SELECT * FROM invoices WHERE (imported=false or imported is null) AND company = ?" company]))
(map db->clj (j/query (get-conn) "SELECT * FROM invoices WHERE imported=false or imported is null"))))