you can now edit invoices.

This commit is contained in:
Bryce Covert
2018-07-25 16:01:36 -07:00
parent 2c4d8f9ded
commit 2cb540c1fa
6 changed files with 151 additions and 25 deletions

View File

@@ -33,6 +33,17 @@
(->graphql))))
(defn edit-invoice [context {{:keys [id] :as in} :invoice} value]
(let [invoice (invoices/get-by-id id)
paid-amount (- (:total invoice) (:outstanding-balance invoice))
_ (assert-can-see-company (:id context) (:company-id invoice))
updated-invoice (invoices/update (-> in
(update :date parse iso-date)
(assoc :outstanding_balance (- (:total in) paid-amount))))]
(-> updated-invoice
(->graphql))))
(defn get-invoices-expense-accounts [context args value]
(->graphql
(invoices-expense-accounts/get-for-invoice (:id value))))