notid/integreat
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

also update client

Browse Source
This commit is contained in:
Bryce
2025-01-30 13:43:28 -08:00
parent c57775eddd
commit 2826fd5099
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/clj/auto_ap/ssr/ledger/new.clj
View File

@@ -303,7 +303,9 @@
li)))) li))))
(assoc :journal-entry/external-id (str "manual-" (UUID/randomUUID)))) (assoc :journal-entry/external-id (str "manual-" (UUID/randomUUID))))
(= :post (:request-method request)) (assoc :db/id "new")) (= :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)) (:identity request))
updated-entity (dc/pull (dc/db conn) updated-entity (dc/pull (dc/db conn)
ledger.common/default-read ledger.common/default-read