also update client
This commit is contained in:
@@ -303,7 +303,9 @@
|
||||
li))))
|
||||
(assoc :journal-entry/external-id (str "manual-" (UUID/randomUUID))))
|
||||
(= :post (:request-method request)) (assoc :db/id "new"))
|
||||
{:keys [tempids]} (audit-transact [[:upsert-entity entity]]
|
||||
{:keys [tempids]} (audit-transact [[:upsert-entity entity]
|
||||
{:db/id (-> request :form-params :journal-entry/client :db/id)
|
||||
:client/ledger-last-change (iol-ion.tx.upsert-ledger/current-date (dc/db conn))}]
|
||||
(:identity request))
|
||||
updated-entity (dc/pull (dc/db conn)
|
||||
ledger.common/default-read
|
||||
|
||||
Reference in New Issue
Block a user