started on expense accounts.

This commit is contained in:
Bryce Covert
2018-05-31 18:43:12 -07:00
parent d38059cb1d
commit b98d00a196
14 changed files with 128 additions and 12 deletions

View File

@@ -0,0 +1,9 @@
(ns auto-ap.graphql.expense-accounts
(:require [auto-ap.graphql.utils :refer [->graphql]]
[auto-ap.expense-accounts :as expense-accounts]))
(defn get-expense-account [context args value]
(->graphql (expense-accounts/expense-accounts (:expense_account_id value))))
(defn get-parent [context args value]
(->graphql (expense-accounts/expense-accounts (:parent value))))

View File

@@ -1,6 +1,7 @@
(ns auto-ap.graphql.invoices
(:require [auto-ap.graphql.utils :refer [->graphql]]
[auto-ap.db.invoices :as invoices]
[auto-ap.db.invoices-expense-accounts :as invoices-expense-accounts]
[auto-ap.time :refer [parse normal-date]]))
(defn add-invoice [context {{:keys [total invoice_number company_id vendor_id date] :as in} :invoice} value]
@@ -15,3 +16,8 @@
:date (parse date normal-date)}])
(first)
(->graphql)))
(defn get-invoices-expense-accounts [context args value]
(->graphql
(invoices-expense-accounts/get-for-invoice (:id value))))