modal typeahead improvements.

src/clj/auto_ap/graphql/invoices.clj

@@ -2,6 +2,7 @@
   (:require [auto-ap.graphql.utils :refer [->graphql]]
             [auto-ap.db.invoices :as invoices]
             [auto-ap.db.vendors :as vendors]
+            [auto-ap.db.companies :as companies]
             [auto-ap.db.invoices-expense-accounts :as invoices-expense-accounts]
             [auto-ap.time :refer [parse iso-date]]))
 
@@ -12,6 +13,7 @@
 
 (defn add-invoice [context {{:keys [total invoice_number company_id vendor_id vendor_name date] :as in} :invoice} value]
   (let [vendor (-create-or-get-vendor vendor_id vendor_name)
+        company (companies/get-by-id company_id)
 
         [invoice] (invoices/insert-multi! [{:invoice-number invoice_number
                                             :company-id company_id
@@ -24,6 +26,7 @@
                                           )]
     (invoices-expense-accounts/replace-for-invoice
      (:id invoice) [{:expense-account-id (:default-expense-account vendor)
+                     :location (first (:locations company))
                      :amount total}] )
     (-> invoice
         (->graphql))))