locations.

src/clj/auto_ap/datomic/migrate/add_general_ledger.clj

@@ -225,10 +225,17 @@
       (fn [[transaction-id vendor-id]]
         (remove-nils {:db/id transaction-id 
                       :transaction/vendor vendor-id
+                      :transaction/location "A"
                       :transaction/account (:db/id (accounts/get-account-by-numeric-code-and-sets 2110 ["default"]))
                       }))
       matched-transactions)]))
 
+(def add-location-to-transaction
+  [[{:db/ident :transaction/location
+     :db/valueType :db.type/string
+     :db/cardinality :db.cardinality/one
+     :db/doc "Location of the transaction's target"}]])
+
 
 #_(do (doseq [tran (convert-transactions (d/connect auto-ap.datomic/uri))]
         @(d/transact (d/connect auto-ap.datomic/uri) tran))